diff --git a/DATABASE/smarmotech.4db b/DATABASE/smarmotech.4db
index c902f32..c316de8 100644
--- a/DATABASE/smarmotech.4db
+++ b/DATABASE/smarmotech.4db
@@ -10,126 +10,12922 @@
-
-
-
-
-
-
-
-
-
-
-
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
-
-
-
-
-
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
-
-
-
-
-
+
-
-
-
-
-
+
+
+
+
+
+
+
+
+
+
+
+
+
+
-
-
-
-
-
-
-
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
-
-
-
-
-
-
-
-
-
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
-
-
-
-
-
-
-
-
-
-
-
+
-
-
-
-
-
-
-
-
-
-
+
-
-
-
-
-
-
-
-
-
-
-
-
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
-
-
-
-
-
-
-
+
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
-
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
\ No newline at end of file
diff --git a/DATABASE/smarmotech.sch b/DATABASE/smarmotech.sch
deleted file mode 100644
index 8102b0b..0000000
--- a/DATABASE/smarmotech.sch
+++ /dev/null
@@ -1,90 +0,0 @@
-_tmpboni2021_^no^3^8^1^
-_tmpboni2021_^num_emp^3^8^2^
-_tmpboni2021_^nombre^201^255^3^
-_tmpboni2021_^apellido^201^255^4^
-_tmpboni2021_^bono_bruto^3^8^5^
-_tmpboni2021_^infotep^3^8^6^
-_tmpboni2021_^bonificacion_neta^3^8^7^
-intb00043_^cod_bodega^3^8^1^
-intb00043_^cod_seccion^3^8^2^
-intb00043_^cod_tramo^3^8^3^
-intb00043_^descripcion^201^255^4^
-lajas2_^cod_n^1^2^1^
-lajas2_^cod_grupo^1^2^2^
-lajas2_^cod_tipo^1^2^3^
-lajas2_^cod_sec^1^2^4^
-marzo_^mes^3^8^1^
-marzo_^ano^3^8^2^
-marzo_^codprod^3^8^3^
-marzo_^cantidad^3^8^4^
-msreplication_options^optname^457^128^1^
-msreplication_options^value^301^1^2^
-msreplication_options^major_version^258^4^3^
-msreplication_options^minor_version^258^4^4^
-msreplication_options^revision^258^4^5^
-msreplication_options^install_failures^258^4^6^
-spt_fallback_db^xserver_name^457^30^1^
-spt_fallback_db^xdttm_ins^266^4365^2^
-spt_fallback_db^xdttm_last_ins_upd^266^4365^3^
-spt_fallback_db^xfallback_dbid^1^2^4^
-spt_fallback_db^name^457^30^5^
-spt_fallback_db^dbid^257^2^6^
-spt_fallback_db^status^257^2^7^
-spt_fallback_db^version^257^2^8^
-spt_fallback_dev^xserver_name^457^30^1^
-spt_fallback_dev^xdttm_ins^266^4365^2^
-spt_fallback_dev^xdttm_last_ins_upd^266^4365^3^
-spt_fallback_dev^xfallback_low^2^4^4^
-spt_fallback_dev^xfallback_drive^0^2^5^
-spt_fallback_dev^low^258^4^6^
-spt_fallback_dev^high^258^4^7^
-spt_fallback_dev^status^257^2^8^
-spt_fallback_dev^name^457^30^9^
-spt_fallback_dev^phyname^457^127^10^
-spt_fallback_usg^xserver_name^457^30^1^
-spt_fallback_usg^xdttm_ins^266^4365^2^
-spt_fallback_usg^xdttm_last_ins_upd^266^4365^3^
-spt_fallback_usg^xfallback_vstart^2^4^4^
-spt_fallback_usg^dbid^257^2^5^
-spt_fallback_usg^segmap^258^4^6^
-spt_fallback_usg^lstart^258^4^7^
-spt_fallback_usg^sizepg^258^4^8^
-spt_fallback_usg^vstart^258^4^9^
-spt_monitor^lastrun^266^4365^1^
-spt_monitor^cpu_busy^258^4^2^
-spt_monitor^io_busy^258^4^3^
-spt_monitor^idle^258^4^4^
-spt_monitor^pack_received^258^4^5^
-spt_monitor^pack_sent^258^4^6^
-spt_monitor^connections^258^4^7^
-spt_monitor^pack_errors^258^4^8^
-spt_monitor^total_read^258^4^9^
-spt_monitor^total_write^258^4^10^
-spt_monitor^total_errors^258^4^11^
-spt_values^name^201^35^1^
-spt_values^number^258^4^2^
-spt_values^type^256^3^3^
-spt_values^low^2^4^4^
-spt_values^high^2^4^5^
-spt_values^status^2^4^6^
-templateproductos_roca^tipo_data^457^50^1^
-templateproductos_roca^cod_n^258^4^2^
-templateproductos_roca^cod_grupo^258^4^3^
-templateproductos_roca^cod_tipo^258^4^4^
-templateproductos_roca^cod_sec^258^4^5^
-templateproductos_roca^unidad_med^201^1^6^
-templateproductos_roca^existencia^201^1^7^
-templateproductos_roca^precio_usd^201^1^8^
-templateproductos_roca^tasa^201^1^9^
-templateproductos_roca^id_categoria^457^50^10^
-templateproductos_roca^id_familia^457^50^11^
-templateproductos_roca^id_brand^457^50^12^
-templateproductos_roca^id_color^201^1^13^
-templateproductos_roca^descripcion_esp^457^100^14^
-templateproductos_roca^descripcion_us^201^100^15^
-templateproductos_roca^propiedades_esp^457^300^16^
-templateproductos_roca^propiedades_us^457^300^17^
-templateproductos_roca^nombre_file_foto^201^1^18^
-templateproductos_roca^nombre_file_ficha^201^1^19^
-templateproductos_roca^nombre_file_ficha1^201^1^20^
-templateproductos_roca^meta_data^201^300^21^
diff --git a/DATABASE/smarmotech_dbxconstraints.4gl b/DATABASE/smarmotech_dbxconstraints.4gl
deleted file mode 100644
index 2c65afd..0000000
--- a/DATABASE/smarmotech_dbxconstraints.4gl
+++ /dev/null
@@ -1,142714 +0,0 @@
-#+ Constraints Management from DB schema (smarmotech)
-
---------------------------------------------------------------------------------
---This code is generated by the 'dbxconstraints.tcl' template
---Warning: Enter your changes within a or section, otherwise they will be lost.
-{}
-{}
-
---------------------------------------------------------------------------------
---Importing modules
-IMPORT FGL libdbappCommon
-{}
-{}
-
---------------------------------------------------------------------------------
---Database schema
-SCHEMA smarmotech
-
---------------------------------------------------------------------------------
---DB constraints functions
-
-{}
-#+ Check constraints on the "vwventasvendedor" table
-#+
-#+ @param p_data - a row data LIKE vwventasvendedor.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventasvendedor_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vwventasvendedor.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vwventasvendedor_ano_checkColumnConstraints(p_data.ano) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventasvendedor_apellidov_checkColumnConstraints(p_data.apellidov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventasvendedor_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventasvendedor_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventasvendedor_cod_mov_checkColumnConstraints(p_data.cod_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventasvendedor_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventasvendedor_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventasvendedor_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventasvendedor_compania_checkColumnConstraints(p_data.compania) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventasvendedor_cond_pago_checkColumnConstraints(p_data.cond_pago) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventasvendedor_descrip_p_checkColumnConstraints(p_data.descrip_p) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventasvendedor_descripcionp_checkColumnConstraints(p_data.descripcionp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventasvendedor_descuento_checkColumnConstraints(p_data.descuento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventasvendedor_descuentord_checkColumnConstraints(p_data.descuentord) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventasvendedor_documentodev_checkColumnConstraints(p_data.documentodev) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventasvendedor_factura_checkColumnConstraints(p_data.factura) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventasvendedor_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventasvendedor_itbis_checkColumnConstraints(p_data.itbis) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventasvendedor_itbisrd_checkColumnConstraints(p_data.itbisrd) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventasvendedor_localidad_checkColumnConstraints(p_data.localidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventasvendedor_mes_checkColumnConstraints(p_data.mes) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventasvendedor_neto_checkColumnConstraints(p_data.neto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventasvendedor_netord_checkColumnConstraints(p_data.netord) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventasvendedor_nombre_cliente_checkColumnConstraints(p_data.nombre_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventasvendedor_nombrev_checkColumnConstraints(p_data.nombrev) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventasvendedor_numero_mes_checkColumnConstraints(p_data.numero_mes) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventasvendedor_orden_checkColumnConstraints(p_data.orden) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventasvendedor_origen_producto_checkColumnConstraints(p_data.origen_producto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventasvendedor_porc_itbi_checkColumnConstraints(p_data.porc_itbi) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventasvendedor_precio_checkColumnConstraints(p_data.precio) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventasvendedor_producto_checkColumnConstraints(p_data.producto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventasvendedor_rnc_checkColumnConstraints(p_data.rnc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventasvendedor_sec_cliente_checkColumnConstraints(p_data.sec_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventasvendedor_sec_vend_checkColumnConstraints(p_data.sec_vend) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventasvendedor_tasa_checkColumnConstraints(p_data.tasa) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventasvendedor_tipo_cliente_checkColumnConstraints(p_data.tipo_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventasvendedor_tipotransaccion_checkColumnConstraints(p_data.tipotransaccion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventasvendedor_tipo_ventas_checkColumnConstraints(p_data.tipo_ventas) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventasvendedor_unidadmed_checkColumnConstraints(p_data.unidadmed) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventasvendedor_valor_bruto_checkColumnConstraints(p_data.valor_bruto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventasvendedor_valorrd_checkColumnConstraints(p_data.valorrd) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwventasvendedor_checkTableConstraints
-
-{}
-#+ Check constraints on the "vwventasvendedor.ano" column
-#+
-#+ @param p_ano - CHAR(4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventasvendedor_ano_checkColumnConstraints(p_ano)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ano LIKE vwventasvendedor.ano
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwventasvendedor_ano_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwventasvendedor.apellidov" column
-#+
-#+ @param p_apellidov - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventasvendedor_apellidov_checkColumnConstraints(p_apellidov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_apellidov LIKE vwventasvendedor.apellidov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwventasvendedor_apellidov_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwventasvendedor.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventasvendedor_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE vwventasvendedor.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwventasvendedor_cantidad_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwventasvendedor.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventasvendedor_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE vwventasvendedor.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwventasvendedor_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwventasvendedor.cod_mov" column
-#+
-#+ @param p_cod_mov - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventasvendedor_cod_mov_checkColumnConstraints(p_cod_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mov LIKE vwventasvendedor.cod_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwventasvendedor_cod_mov_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwventasvendedor.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventasvendedor_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE vwventasvendedor.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwventasvendedor_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwventasvendedor.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventasvendedor_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE vwventasvendedor.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwventasvendedor_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwventasvendedor.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventasvendedor_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE vwventasvendedor.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwventasvendedor_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwventasvendedor.compania" column
-#+
-#+ @param p_compania - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventasvendedor_compania_checkColumnConstraints(p_compania)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_compania LIKE vwventasvendedor.compania
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwventasvendedor_compania_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwventasvendedor.cond_pago" column
-#+
-#+ @param p_cond_pago - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventasvendedor_cond_pago_checkColumnConstraints(p_cond_pago)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cond_pago LIKE vwventasvendedor.cond_pago
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwventasvendedor_cond_pago_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwventasvendedor.descrip_p" column
-#+
-#+ @param p_descrip_p - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventasvendedor_descrip_p_checkColumnConstraints(p_descrip_p)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descrip_p LIKE vwventasvendedor.descrip_p
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwventasvendedor_descrip_p_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwventasvendedor.descripcionp" column
-#+
-#+ @param p_descripcionp - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventasvendedor_descripcionp_checkColumnConstraints(p_descripcionp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcionp LIKE vwventasvendedor.descripcionp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwventasvendedor_descripcionp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwventasvendedor.descuento" column
-#+
-#+ @param p_descuento - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventasvendedor_descuento_checkColumnConstraints(p_descuento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descuento LIKE vwventasvendedor.descuento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwventasvendedor_descuento_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwventasvendedor.descuentord" column
-#+
-#+ @param p_descuentord - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventasvendedor_descuentord_checkColumnConstraints(p_descuentord)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descuentord LIKE vwventasvendedor.descuentord
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwventasvendedor_descuentord_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwventasvendedor.documentodev" column
-#+
-#+ @param p_documentodev - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventasvendedor_documentodev_checkColumnConstraints(p_documentodev)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_documentodev LIKE vwventasvendedor.documentodev
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwventasvendedor_documentodev_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwventasvendedor.factura" column
-#+
-#+ @param p_factura - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventasvendedor_factura_checkColumnConstraints(p_factura)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_factura LIKE vwventasvendedor.factura
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwventasvendedor_factura_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwventasvendedor.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventasvendedor_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE vwventasvendedor.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwventasvendedor_fecha_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwventasvendedor.itbis" column
-#+
-#+ @param p_itbis - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventasvendedor_itbis_checkColumnConstraints(p_itbis)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_itbis LIKE vwventasvendedor.itbis
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwventasvendedor_itbis_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwventasvendedor.itbisrd" column
-#+
-#+ @param p_itbisrd - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventasvendedor_itbisrd_checkColumnConstraints(p_itbisrd)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_itbisrd LIKE vwventasvendedor.itbisrd
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwventasvendedor_itbisrd_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwventasvendedor.localidad" column
-#+
-#+ @param p_localidad - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventasvendedor_localidad_checkColumnConstraints(p_localidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_localidad LIKE vwventasvendedor.localidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwventasvendedor_localidad_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwventasvendedor.mes" column
-#+
-#+ @param p_mes - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventasvendedor_mes_checkColumnConstraints(p_mes)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mes LIKE vwventasvendedor.mes
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwventasvendedor_mes_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwventasvendedor.neto" column
-#+
-#+ @param p_neto - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventasvendedor_neto_checkColumnConstraints(p_neto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_neto LIKE vwventasvendedor.neto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwventasvendedor_neto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwventasvendedor.netord" column
-#+
-#+ @param p_netord - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventasvendedor_netord_checkColumnConstraints(p_netord)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_netord LIKE vwventasvendedor.netord
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwventasvendedor_netord_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwventasvendedor.nombre_cliente" column
-#+
-#+ @param p_nombre_cliente - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventasvendedor_nombre_cliente_checkColumnConstraints(p_nombre_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombre_cliente LIKE vwventasvendedor.nombre_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwventasvendedor_nombre_cliente_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwventasvendedor.nombrev" column
-#+
-#+ @param p_nombrev - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventasvendedor_nombrev_checkColumnConstraints(p_nombrev)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombrev LIKE vwventasvendedor.nombrev
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwventasvendedor_nombrev_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwventasvendedor.numero_mes" column
-#+
-#+ @param p_numero_mes - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventasvendedor_numero_mes_checkColumnConstraints(p_numero_mes)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_numero_mes LIKE vwventasvendedor.numero_mes
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwventasvendedor_numero_mes_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwventasvendedor.orden" column
-#+
-#+ @param p_orden - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventasvendedor_orden_checkColumnConstraints(p_orden)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_orden LIKE vwventasvendedor.orden
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwventasvendedor_orden_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwventasvendedor.origen_producto" column
-#+
-#+ @param p_origen_producto - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventasvendedor_origen_producto_checkColumnConstraints(p_origen_producto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_origen_producto LIKE vwventasvendedor.origen_producto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwventasvendedor_origen_producto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwventasvendedor.porc_itbi" column
-#+
-#+ @param p_porc_itbi - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventasvendedor_porc_itbi_checkColumnConstraints(p_porc_itbi)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_porc_itbi LIKE vwventasvendedor.porc_itbi
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwventasvendedor_porc_itbi_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwventasvendedor.precio" column
-#+
-#+ @param p_precio - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventasvendedor_precio_checkColumnConstraints(p_precio)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_precio LIKE vwventasvendedor.precio
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwventasvendedor_precio_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwventasvendedor.producto" column
-#+
-#+ @param p_producto - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventasvendedor_producto_checkColumnConstraints(p_producto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_producto LIKE vwventasvendedor.producto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwventasvendedor_producto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwventasvendedor.rnc" column
-#+
-#+ @param p_rnc - CHAR(11) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventasvendedor_rnc_checkColumnConstraints(p_rnc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_rnc LIKE vwventasvendedor.rnc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwventasvendedor_rnc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwventasvendedor.sec_cliente" column
-#+
-#+ @param p_sec_cliente - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventasvendedor_sec_cliente_checkColumnConstraints(p_sec_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_cliente LIKE vwventasvendedor.sec_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwventasvendedor_sec_cliente_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwventasvendedor.sec_vend" column
-#+
-#+ @param p_sec_vend - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventasvendedor_sec_vend_checkColumnConstraints(p_sec_vend)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_vend LIKE vwventasvendedor.sec_vend
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwventasvendedor_sec_vend_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwventasvendedor.tasa" column
-#+
-#+ @param p_tasa - DECIMAL(8,3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventasvendedor_tasa_checkColumnConstraints(p_tasa)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tasa LIKE vwventasvendedor.tasa
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwventasvendedor_tasa_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwventasvendedor.tipo_cliente" column
-#+
-#+ @param p_tipo_cliente - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventasvendedor_tipo_cliente_checkColumnConstraints(p_tipo_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_cliente LIKE vwventasvendedor.tipo_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwventasvendedor_tipo_cliente_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwventasvendedor.tipotransaccion" column
-#+
-#+ @param p_tipotransaccion - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventasvendedor_tipotransaccion_checkColumnConstraints(p_tipotransaccion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipotransaccion LIKE vwventasvendedor.tipotransaccion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwventasvendedor_tipotransaccion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwventasvendedor.tipo_ventas" column
-#+
-#+ @param p_tipo_ventas - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventasvendedor_tipo_ventas_checkColumnConstraints(p_tipo_ventas)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_ventas LIKE vwventasvendedor.tipo_ventas
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwventasvendedor_tipo_ventas_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwventasvendedor.unidadmed" column
-#+
-#+ @param p_unidadmed - CHAR(4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventasvendedor_unidadmed_checkColumnConstraints(p_unidadmed)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_unidadmed LIKE vwventasvendedor.unidadmed
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwventasvendedor_unidadmed_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwventasvendedor.valor_bruto" column
-#+
-#+ @param p_valor_bruto - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventasvendedor_valor_bruto_checkColumnConstraints(p_valor_bruto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valor_bruto LIKE vwventasvendedor.valor_bruto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwventasvendedor_valor_bruto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwventasvendedor.valorrd" column
-#+
-#+ @param p_valorrd - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventasvendedor_valorrd_checkColumnConstraints(p_valorrd)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valorrd LIKE vwventasvendedor.valorrd
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwventasvendedor_valorrd_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwventas" table
-#+
-#+ @param p_data - a row data LIKE vwventas.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventas_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vwventas.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vwventas_compania_checkColumnConstraints(p_data.compania) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventas_localidad_checkColumnConstraints(p_data.localidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventas_tipotransaccion_checkColumnConstraints(p_data.tipotransaccion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventas_tipo_ventas_checkColumnConstraints(p_data.tipo_ventas) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventas_origen_producto_checkColumnConstraints(p_data.origen_producto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventas_producto_checkColumnConstraints(p_data.producto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventas_tipoproducto_checkColumnConstraints(p_data.tipoproducto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventas_valor_bruto_checkColumnConstraints(p_data.valor_bruto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventas_porc_itbi_checkColumnConstraints(p_data.porc_itbi) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventas_descuento_checkColumnConstraints(p_data.descuento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventas_itbis_checkColumnConstraints(p_data.itbis) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventas_factura_checkColumnConstraints(p_data.factura) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventas_conduce_checkColumnConstraints(p_data.conduce) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventas_documentodev_checkColumnConstraints(p_data.documentodev) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventas_documentocxc_checkColumnConstraints(p_data.documentocxc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventas_observaciones_checkColumnConstraints(p_data.observaciones) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventas_cod_mov_checkColumnConstraints(p_data.cod_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventas_cond_pago_checkColumnConstraints(p_data.cond_pago) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventas_descrip_p_checkColumnConstraints(p_data.descrip_p) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventas_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventas_numero_mes_checkColumnConstraints(p_data.numero_mes) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventas_ano_checkColumnConstraints(p_data.ano) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventas_mes_checkColumnConstraints(p_data.mes) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventas_tipo_cliente_checkColumnConstraints(p_data.tipo_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventas_sec_cliente_checkColumnConstraints(p_data.sec_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventas_nombre_cliente_checkColumnConstraints(p_data.nombre_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventas_rnc_checkColumnConstraints(p_data.rnc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventas_orden_checkColumnConstraints(p_data.orden) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventas_sec_vend_checkColumnConstraints(p_data.sec_vend) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventas_nombrev_checkColumnConstraints(p_data.nombrev) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventas_apellidov_checkColumnConstraints(p_data.apellidov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventas_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventas_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventas_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventas_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventas_descripcionp_checkColumnConstraints(p_data.descripcionp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventas_unidadmed_checkColumnConstraints(p_data.unidadmed) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventas_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventas_precio_checkColumnConstraints(p_data.precio) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventas_material_checkColumnConstraints(p_data.material) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventas_labor_checkColumnConstraints(p_data.labor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventas_gasto_checkColumnConstraints(p_data.gasto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventas_valormaterial_checkColumnConstraints(p_data.valormaterial) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventas_valorlabor_checkColumnConstraints(p_data.valorlabor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventas_valorgasto_checkColumnConstraints(p_data.valorgasto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventas_tasa_checkColumnConstraints(p_data.tasa) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventas_valorrd_checkColumnConstraints(p_data.valorrd) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventas_descuentord_checkColumnConstraints(p_data.descuentord) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventas_itbisrd_checkColumnConstraints(p_data.itbisrd) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventas_netord_checkColumnConstraints(p_data.netord) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventas_neto_checkColumnConstraints(p_data.neto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventas_margen_checkColumnConstraints(p_data.margen) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventas_transportista_checkColumnConstraints(p_data.transportista) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventas_pventas_checkColumnConstraints(p_data.pventas) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventas_preciolista_checkColumnConstraints(p_data.preciolista) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwventas_checkTableConstraints
-
-{}
-#+ Check constraints on the "vwventas.compania" column
-#+
-#+ @param p_compania - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventas_compania_checkColumnConstraints(p_compania)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_compania LIKE vwventas.compania
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwventas_compania_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwventas.localidad" column
-#+
-#+ @param p_localidad - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventas_localidad_checkColumnConstraints(p_localidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_localidad LIKE vwventas.localidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwventas_localidad_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwventas.tipotransaccion" column
-#+
-#+ @param p_tipotransaccion - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventas_tipotransaccion_checkColumnConstraints(p_tipotransaccion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipotransaccion LIKE vwventas.tipotransaccion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwventas_tipotransaccion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwventas.tipo_ventas" column
-#+
-#+ @param p_tipo_ventas - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventas_tipo_ventas_checkColumnConstraints(p_tipo_ventas)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_ventas LIKE vwventas.tipo_ventas
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwventas_tipo_ventas_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwventas.origen_producto" column
-#+
-#+ @param p_origen_producto - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventas_origen_producto_checkColumnConstraints(p_origen_producto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_origen_producto LIKE vwventas.origen_producto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwventas_origen_producto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwventas.producto" column
-#+
-#+ @param p_producto - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventas_producto_checkColumnConstraints(p_producto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_producto LIKE vwventas.producto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwventas_producto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwventas.tipoproducto" column
-#+
-#+ @param p_tipoproducto - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventas_tipoproducto_checkColumnConstraints(p_tipoproducto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipoproducto LIKE vwventas.tipoproducto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwventas_tipoproducto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwventas.valor_bruto" column
-#+
-#+ @param p_valor_bruto - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventas_valor_bruto_checkColumnConstraints(p_valor_bruto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valor_bruto LIKE vwventas.valor_bruto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwventas_valor_bruto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwventas.porc_itbi" column
-#+
-#+ @param p_porc_itbi - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventas_porc_itbi_checkColumnConstraints(p_porc_itbi)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_porc_itbi LIKE vwventas.porc_itbi
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwventas_porc_itbi_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwventas.descuento" column
-#+
-#+ @param p_descuento - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventas_descuento_checkColumnConstraints(p_descuento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descuento LIKE vwventas.descuento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwventas_descuento_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwventas.itbis" column
-#+
-#+ @param p_itbis - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventas_itbis_checkColumnConstraints(p_itbis)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_itbis LIKE vwventas.itbis
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwventas_itbis_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwventas.factura" column
-#+
-#+ @param p_factura - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventas_factura_checkColumnConstraints(p_factura)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_factura LIKE vwventas.factura
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwventas_factura_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwventas.conduce" column
-#+
-#+ @param p_conduce - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventas_conduce_checkColumnConstraints(p_conduce)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_conduce LIKE vwventas.conduce
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwventas_conduce_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwventas.documentodev" column
-#+
-#+ @param p_documentodev - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventas_documentodev_checkColumnConstraints(p_documentodev)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_documentodev LIKE vwventas.documentodev
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwventas_documentodev_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwventas.documentocxc" column
-#+
-#+ @param p_documentocxc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventas_documentocxc_checkColumnConstraints(p_documentocxc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_documentocxc LIKE vwventas.documentocxc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwventas_documentocxc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwventas.observaciones" column
-#+
-#+ @param p_observaciones - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventas_observaciones_checkColumnConstraints(p_observaciones)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_observaciones LIKE vwventas.observaciones
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwventas_observaciones_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwventas.cod_mov" column
-#+
-#+ @param p_cod_mov - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventas_cod_mov_checkColumnConstraints(p_cod_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mov LIKE vwventas.cod_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwventas_cod_mov_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwventas.cond_pago" column
-#+
-#+ @param p_cond_pago - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventas_cond_pago_checkColumnConstraints(p_cond_pago)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cond_pago LIKE vwventas.cond_pago
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwventas_cond_pago_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwventas.descrip_p" column
-#+
-#+ @param p_descrip_p - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventas_descrip_p_checkColumnConstraints(p_descrip_p)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descrip_p LIKE vwventas.descrip_p
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwventas_descrip_p_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwventas.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventas_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE vwventas.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwventas_fecha_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwventas.numero_mes" column
-#+
-#+ @param p_numero_mes - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventas_numero_mes_checkColumnConstraints(p_numero_mes)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_numero_mes LIKE vwventas.numero_mes
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwventas_numero_mes_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwventas.ano" column
-#+
-#+ @param p_ano - CHAR(4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventas_ano_checkColumnConstraints(p_ano)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ano LIKE vwventas.ano
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwventas_ano_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwventas.mes" column
-#+
-#+ @param p_mes - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventas_mes_checkColumnConstraints(p_mes)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mes LIKE vwventas.mes
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwventas_mes_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwventas.tipo_cliente" column
-#+
-#+ @param p_tipo_cliente - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventas_tipo_cliente_checkColumnConstraints(p_tipo_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_cliente LIKE vwventas.tipo_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwventas_tipo_cliente_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwventas.sec_cliente" column
-#+
-#+ @param p_sec_cliente - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventas_sec_cliente_checkColumnConstraints(p_sec_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_cliente LIKE vwventas.sec_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwventas_sec_cliente_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwventas.nombre_cliente" column
-#+
-#+ @param p_nombre_cliente - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventas_nombre_cliente_checkColumnConstraints(p_nombre_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombre_cliente LIKE vwventas.nombre_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwventas_nombre_cliente_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwventas.rnc" column
-#+
-#+ @param p_rnc - CHAR(11) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventas_rnc_checkColumnConstraints(p_rnc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_rnc LIKE vwventas.rnc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwventas_rnc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwventas.orden" column
-#+
-#+ @param p_orden - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventas_orden_checkColumnConstraints(p_orden)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_orden LIKE vwventas.orden
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwventas_orden_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwventas.sec_vend" column
-#+
-#+ @param p_sec_vend - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventas_sec_vend_checkColumnConstraints(p_sec_vend)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_vend LIKE vwventas.sec_vend
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwventas_sec_vend_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwventas.nombrev" column
-#+
-#+ @param p_nombrev - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventas_nombrev_checkColumnConstraints(p_nombrev)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombrev LIKE vwventas.nombrev
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwventas_nombrev_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwventas.apellidov" column
-#+
-#+ @param p_apellidov - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventas_apellidov_checkColumnConstraints(p_apellidov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_apellidov LIKE vwventas.apellidov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwventas_apellidov_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwventas.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventas_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE vwventas.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwventas_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwventas.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventas_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE vwventas.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwventas_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwventas.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventas_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE vwventas.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwventas_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwventas.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventas_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE vwventas.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwventas_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwventas.descripcionp" column
-#+
-#+ @param p_descripcionp - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventas_descripcionp_checkColumnConstraints(p_descripcionp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcionp LIKE vwventas.descripcionp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwventas_descripcionp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwventas.unidadmed" column
-#+
-#+ @param p_unidadmed - CHAR(4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventas_unidadmed_checkColumnConstraints(p_unidadmed)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_unidadmed LIKE vwventas.unidadmed
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwventas_unidadmed_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwventas.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventas_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE vwventas.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwventas_cantidad_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwventas.precio" column
-#+
-#+ @param p_precio - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventas_precio_checkColumnConstraints(p_precio)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_precio LIKE vwventas.precio
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwventas_precio_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwventas.material" column
-#+
-#+ @param p_material - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventas_material_checkColumnConstraints(p_material)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_material LIKE vwventas.material
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwventas_material_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwventas.labor" column
-#+
-#+ @param p_labor - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventas_labor_checkColumnConstraints(p_labor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_labor LIKE vwventas.labor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwventas_labor_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwventas.gasto" column
-#+
-#+ @param p_gasto - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventas_gasto_checkColumnConstraints(p_gasto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_gasto LIKE vwventas.gasto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwventas_gasto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwventas.valormaterial" column
-#+
-#+ @param p_valormaterial - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventas_valormaterial_checkColumnConstraints(p_valormaterial)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valormaterial LIKE vwventas.valormaterial
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwventas_valormaterial_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwventas.valorlabor" column
-#+
-#+ @param p_valorlabor - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventas_valorlabor_checkColumnConstraints(p_valorlabor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valorlabor LIKE vwventas.valorlabor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwventas_valorlabor_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwventas.valorgasto" column
-#+
-#+ @param p_valorgasto - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventas_valorgasto_checkColumnConstraints(p_valorgasto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valorgasto LIKE vwventas.valorgasto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwventas_valorgasto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwventas.tasa" column
-#+
-#+ @param p_tasa - DECIMAL(8,3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventas_tasa_checkColumnConstraints(p_tasa)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tasa LIKE vwventas.tasa
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwventas_tasa_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwventas.valorrd" column
-#+
-#+ @param p_valorrd - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventas_valorrd_checkColumnConstraints(p_valorrd)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valorrd LIKE vwventas.valorrd
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwventas_valorrd_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwventas.descuentord" column
-#+
-#+ @param p_descuentord - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventas_descuentord_checkColumnConstraints(p_descuentord)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descuentord LIKE vwventas.descuentord
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwventas_descuentord_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwventas.itbisrd" column
-#+
-#+ @param p_itbisrd - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventas_itbisrd_checkColumnConstraints(p_itbisrd)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_itbisrd LIKE vwventas.itbisrd
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwventas_itbisrd_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwventas.netord" column
-#+
-#+ @param p_netord - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventas_netord_checkColumnConstraints(p_netord)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_netord LIKE vwventas.netord
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwventas_netord_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwventas.neto" column
-#+
-#+ @param p_neto - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventas_neto_checkColumnConstraints(p_neto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_neto LIKE vwventas.neto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwventas_neto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwventas.margen" column
-#+
-#+ @param p_margen - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventas_margen_checkColumnConstraints(p_margen)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_margen LIKE vwventas.margen
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwventas_margen_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwventas.transportista" column
-#+
-#+ @param p_transportista - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventas_transportista_checkColumnConstraints(p_transportista)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_transportista LIKE vwventas.transportista
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwventas_transportista_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwventas.pventas" column
-#+
-#+ @param p_pventas - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventas_pventas_checkColumnConstraints(p_pventas)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_pventas LIKE vwventas.pventas
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwventas_pventas_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwventas.preciolista" column
-#+
-#+ @param p_preciolista - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventas_preciolista_checkColumnConstraints(p_preciolista)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_preciolista LIKE vwventas.preciolista
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_preciolista IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- preciolista: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwventas_preciolista_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwvacaciones" table
-#+
-#+ @param p_data - a row data LIKE vwvacaciones.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwvacaciones_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vwvacaciones.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vwvacaciones_nom_puesto_checkColumnConstraints(p_data.nom_puesto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwvacaciones_num_emp_checkColumnConstraints(p_data.num_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwvacaciones_departamento_checkColumnConstraints(p_data.departamento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwvacaciones_cod_puesto_checkColumnConstraints(p_data.cod_puesto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwvacaciones_nom1_emp_checkColumnConstraints(p_data.nom1_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwvacaciones_nom2_emp_checkColumnConstraints(p_data.nom2_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwvacaciones_apell1_emp_checkColumnConstraints(p_data.apell1_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwvacaciones_apell2_emp_checkColumnConstraints(p_data.apell2_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwvacaciones_tipo_empleado_checkColumnConstraints(p_data.tipo_empleado) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwvacaciones_fecha_termino_c_checkColumnConstraints(p_data.fecha_termino_c) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwvacaciones_calle_checkColumnConstraints(p_data.calle) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwvacaciones_casa_num_checkColumnConstraints(p_data.casa_num) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwvacaciones_barrio_checkColumnConstraints(p_data.barrio) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwvacaciones_urbanizacion_checkColumnConstraints(p_data.urbanizacion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwvacaciones_telefono_checkColumnConstraints(p_data.telefono) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwvacaciones_fech_nac_checkColumnConstraints(p_data.fech_nac) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwvacaciones_tipo_sangre_checkColumnConstraints(p_data.tipo_sangre) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwvacaciones_cedula_checkColumnConstraints(p_data.cedula) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwvacaciones_serie_checkColumnConstraints(p_data.serie) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwvacaciones_sueldo_ac_checkColumnConstraints(p_data.sueldo_ac) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwvacaciones_nomina_checkColumnConstraints(p_data.nomina) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwvacaciones_fech_efec_checkColumnConstraints(p_data.fech_efec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwvacaciones_fecha_salida_checkColumnConstraints(p_data.fecha_salida) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwvacaciones_cuenta_no_checkColumnConstraints(p_data.cuenta_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwvacaciones_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwvacaciones_sucid_checkColumnConstraints(p_data.sucid) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwvacaciones_nom_dpto_checkColumnConstraints(p_data.nom_dpto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwvacaciones_ano_checkColumnConstraints(p_data.ano) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwvacaciones_descrip_checkColumnConstraints(p_data.descrip) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwvacaciones_checkTableConstraints
-
-{}
-#+ Check constraints on the "vwvacaciones.nom_puesto" column
-#+
-#+ @param p_nom_puesto - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwvacaciones_nom_puesto_checkColumnConstraints(p_nom_puesto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nom_puesto LIKE vwvacaciones.nom_puesto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwvacaciones_nom_puesto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwvacaciones.num_emp" column
-#+
-#+ @param p_num_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwvacaciones_num_emp_checkColumnConstraints(p_num_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_emp LIKE vwvacaciones.num_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_num_emp IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- num_emp: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwvacaciones_num_emp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwvacaciones.departamento" column
-#+
-#+ @param p_departamento - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwvacaciones_departamento_checkColumnConstraints(p_departamento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_departamento LIKE vwvacaciones.departamento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwvacaciones_departamento_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwvacaciones.cod_puesto" column
-#+
-#+ @param p_cod_puesto - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwvacaciones_cod_puesto_checkColumnConstraints(p_cod_puesto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_puesto LIKE vwvacaciones.cod_puesto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwvacaciones_cod_puesto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwvacaciones.nom1_emp" column
-#+
-#+ @param p_nom1_emp - CHAR(15) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwvacaciones_nom1_emp_checkColumnConstraints(p_nom1_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nom1_emp LIKE vwvacaciones.nom1_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwvacaciones_nom1_emp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwvacaciones.nom2_emp" column
-#+
-#+ @param p_nom2_emp - CHAR(15) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwvacaciones_nom2_emp_checkColumnConstraints(p_nom2_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nom2_emp LIKE vwvacaciones.nom2_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwvacaciones_nom2_emp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwvacaciones.apell1_emp" column
-#+
-#+ @param p_apell1_emp - CHAR(15) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwvacaciones_apell1_emp_checkColumnConstraints(p_apell1_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_apell1_emp LIKE vwvacaciones.apell1_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwvacaciones_apell1_emp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwvacaciones.apell2_emp" column
-#+
-#+ @param p_apell2_emp - CHAR(15) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwvacaciones_apell2_emp_checkColumnConstraints(p_apell2_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_apell2_emp LIKE vwvacaciones.apell2_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwvacaciones_apell2_emp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwvacaciones.tipo_empleado" column
-#+
-#+ @param p_tipo_empleado - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwvacaciones_tipo_empleado_checkColumnConstraints(p_tipo_empleado)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_empleado LIKE vwvacaciones.tipo_empleado
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwvacaciones_tipo_empleado_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwvacaciones.fecha_termino_c" column
-#+
-#+ @param p_fecha_termino_c - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwvacaciones_fecha_termino_c_checkColumnConstraints(p_fecha_termino_c)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_termino_c LIKE vwvacaciones.fecha_termino_c
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwvacaciones_fecha_termino_c_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwvacaciones.calle" column
-#+
-#+ @param p_calle - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwvacaciones_calle_checkColumnConstraints(p_calle)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_calle LIKE vwvacaciones.calle
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwvacaciones_calle_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwvacaciones.casa_num" column
-#+
-#+ @param p_casa_num - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwvacaciones_casa_num_checkColumnConstraints(p_casa_num)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_casa_num LIKE vwvacaciones.casa_num
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwvacaciones_casa_num_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwvacaciones.barrio" column
-#+
-#+ @param p_barrio - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwvacaciones_barrio_checkColumnConstraints(p_barrio)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_barrio LIKE vwvacaciones.barrio
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwvacaciones_barrio_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwvacaciones.urbanizacion" column
-#+
-#+ @param p_urbanizacion - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwvacaciones_urbanizacion_checkColumnConstraints(p_urbanizacion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_urbanizacion LIKE vwvacaciones.urbanizacion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwvacaciones_urbanizacion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwvacaciones.telefono" column
-#+
-#+ @param p_telefono - CHAR(15) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwvacaciones_telefono_checkColumnConstraints(p_telefono)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_telefono LIKE vwvacaciones.telefono
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwvacaciones_telefono_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwvacaciones.fech_nac" column
-#+
-#+ @param p_fech_nac - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwvacaciones_fech_nac_checkColumnConstraints(p_fech_nac)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_nac LIKE vwvacaciones.fech_nac
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwvacaciones_fech_nac_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwvacaciones.tipo_sangre" column
-#+
-#+ @param p_tipo_sangre - CHAR(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwvacaciones_tipo_sangre_checkColumnConstraints(p_tipo_sangre)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_sangre LIKE vwvacaciones.tipo_sangre
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwvacaciones_tipo_sangre_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwvacaciones.cedula" column
-#+
-#+ @param p_cedula - CHAR(11) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwvacaciones_cedula_checkColumnConstraints(p_cedula)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cedula LIKE vwvacaciones.cedula
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwvacaciones_cedula_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwvacaciones.serie" column
-#+
-#+ @param p_serie - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwvacaciones_serie_checkColumnConstraints(p_serie)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_serie LIKE vwvacaciones.serie
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwvacaciones_serie_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwvacaciones.sueldo_ac" column
-#+
-#+ @param p_sueldo_ac - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwvacaciones_sueldo_ac_checkColumnConstraints(p_sueldo_ac)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sueldo_ac LIKE vwvacaciones.sueldo_ac
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwvacaciones_sueldo_ac_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwvacaciones.nomina" column
-#+
-#+ @param p_nomina - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwvacaciones_nomina_checkColumnConstraints(p_nomina)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nomina LIKE vwvacaciones.nomina
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwvacaciones_nomina_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwvacaciones.fech_efec" column
-#+
-#+ @param p_fech_efec - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwvacaciones_fech_efec_checkColumnConstraints(p_fech_efec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_efec LIKE vwvacaciones.fech_efec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwvacaciones_fech_efec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwvacaciones.fecha_salida" column
-#+
-#+ @param p_fecha_salida - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwvacaciones_fecha_salida_checkColumnConstraints(p_fecha_salida)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_salida LIKE vwvacaciones.fecha_salida
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwvacaciones_fecha_salida_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwvacaciones.cuenta_no" column
-#+
-#+ @param p_cuenta_no - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwvacaciones_cuenta_no_checkColumnConstraints(p_cuenta_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cuenta_no LIKE vwvacaciones.cuenta_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwvacaciones_cuenta_no_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwvacaciones.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwvacaciones_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE vwvacaciones.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwvacaciones_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwvacaciones.sucid" column
-#+
-#+ @param p_sucid - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwvacaciones_sucid_checkColumnConstraints(p_sucid)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sucid LIKE vwvacaciones.sucid
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwvacaciones_sucid_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwvacaciones.nom_dpto" column
-#+
-#+ @param p_nom_dpto - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwvacaciones_nom_dpto_checkColumnConstraints(p_nom_dpto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nom_dpto LIKE vwvacaciones.nom_dpto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwvacaciones_nom_dpto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwvacaciones.ano" column
-#+
-#+ @param p_ano - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwvacaciones_ano_checkColumnConstraints(p_ano)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ano LIKE vwvacaciones.ano
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwvacaciones_ano_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwvacaciones.descrip" column
-#+
-#+ @param p_descrip - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwvacaciones_descrip_checkColumnConstraints(p_descrip)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descrip LIKE vwvacaciones.descrip
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwvacaciones_descrip_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwseguimientoclientes" table
-#+
-#+ @param p_data - a row data LIKE vwseguimientoclientes.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwseguimientoclientes_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vwseguimientoclientes.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vwseguimientoclientes_cotizacion_no_checkColumnConstraints(p_data.cotizacion_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwseguimientoclientes_nombrecliente_checkColumnConstraints(p_data.nombrecliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwseguimientoclientes_tipo_cliente_checkColumnConstraints(p_data.tipo_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwseguimientoclientes_sec_cliente_checkColumnConstraints(p_data.sec_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwseguimientoclientes_telefono_checkColumnConstraints(p_data.telefono) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwseguimientoclientes_fax_checkColumnConstraints(p_data.fax) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwseguimientoclientes_rnc_checkColumnConstraints(p_data.rnc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwseguimientoclientes_calle_checkColumnConstraints(p_data.calle) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwseguimientoclientes_casa_num_checkColumnConstraints(p_data.casa_num) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwseguimientoclientes_barrio_checkColumnConstraints(p_data.barrio) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwseguimientoclientes_urbanizacion_checkColumnConstraints(p_data.urbanizacion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwseguimientoclientes_nombre_proyecto_checkColumnConstraints(p_data.nombre_proyecto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwseguimientoclientes_direccion_cliente_checkColumnConstraints(p_data.direccion_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwseguimientoclientes_direccion_proyecto_checkColumnConstraints(p_data.direccion_proyecto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwseguimientoclientes_telefono_r_checkColumnConstraints(p_data.telefono_r) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwseguimientoclientes_telefono_o_checkColumnConstraints(p_data.telefono_o) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwseguimientoclientes_email_checkColumnConstraints(p_data.email) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwseguimientoclientes_celular_checkColumnConstraints(p_data.celular) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwseguimientoclientes_fax1_checkColumnConstraints(p_data.fax1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwseguimientoclientes_celular1_checkColumnConstraints(p_data.celular1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwseguimientoclientes_fechacotizacion_checkColumnConstraints(p_data.fechacotizacion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwseguimientoclientes_orden_checkColumnConstraints(p_data.orden) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwseguimientoclientes_fechaorden_checkColumnConstraints(p_data.fechaorden) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwseguimientoclientes_cantidaddespachada_checkColumnConstraints(p_data.cantidaddespachada) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwseguimientoclientes_documentodespacho_checkColumnConstraints(p_data.documentodespacho) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwseguimientoclientes_cod_mov_checkColumnConstraints(p_data.cod_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwseguimientoclientes_fechaconduce_checkColumnConstraints(p_data.fechaconduce) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwseguimientoclientes_comentario_checkColumnConstraints(p_data.comentario) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwseguimientoclientes_descrip_esp_checkColumnConstraints(p_data.descrip_esp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwseguimientoclientes_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwseguimientoclientes_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwseguimientoclientes_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwseguimientoclientes_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwseguimientoclientes_ano_checkColumnConstraints(p_data.ano) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwseguimientoclientes_numeromes_checkColumnConstraints(p_data.numeromes) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwseguimientoclientes_mes_checkColumnConstraints(p_data.mes) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwseguimientoclientes_checkTableConstraints
-
-{}
-#+ Check constraints on the "vwseguimientoclientes.cotizacion_no" column
-#+
-#+ @param p_cotizacion_no - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwseguimientoclientes_cotizacion_no_checkColumnConstraints(p_cotizacion_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cotizacion_no LIKE vwseguimientoclientes.cotizacion_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cotizacion_no IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cotizacion_no: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwseguimientoclientes_cotizacion_no_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwseguimientoclientes.nombrecliente" column
-#+
-#+ @param p_nombrecliente - CHAR(100) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwseguimientoclientes_nombrecliente_checkColumnConstraints(p_nombrecliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombrecliente LIKE vwseguimientoclientes.nombrecliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwseguimientoclientes_nombrecliente_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwseguimientoclientes.tipo_cliente" column
-#+
-#+ @param p_tipo_cliente - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwseguimientoclientes_tipo_cliente_checkColumnConstraints(p_tipo_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_cliente LIKE vwseguimientoclientes.tipo_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwseguimientoclientes_tipo_cliente_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwseguimientoclientes.sec_cliente" column
-#+
-#+ @param p_sec_cliente - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwseguimientoclientes_sec_cliente_checkColumnConstraints(p_sec_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_cliente LIKE vwseguimientoclientes.sec_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwseguimientoclientes_sec_cliente_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwseguimientoclientes.telefono" column
-#+
-#+ @param p_telefono - CHAR(16) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwseguimientoclientes_telefono_checkColumnConstraints(p_telefono)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_telefono LIKE vwseguimientoclientes.telefono
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwseguimientoclientes_telefono_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwseguimientoclientes.fax" column
-#+
-#+ @param p_fax - CHAR(16) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwseguimientoclientes_fax_checkColumnConstraints(p_fax)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fax LIKE vwseguimientoclientes.fax
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwseguimientoclientes_fax_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwseguimientoclientes.rnc" column
-#+
-#+ @param p_rnc - CHAR(11) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwseguimientoclientes_rnc_checkColumnConstraints(p_rnc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_rnc LIKE vwseguimientoclientes.rnc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwseguimientoclientes_rnc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwseguimientoclientes.calle" column
-#+
-#+ @param p_calle - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwseguimientoclientes_calle_checkColumnConstraints(p_calle)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_calle LIKE vwseguimientoclientes.calle
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwseguimientoclientes_calle_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwseguimientoclientes.casa_num" column
-#+
-#+ @param p_casa_num - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwseguimientoclientes_casa_num_checkColumnConstraints(p_casa_num)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_casa_num LIKE vwseguimientoclientes.casa_num
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwseguimientoclientes_casa_num_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwseguimientoclientes.barrio" column
-#+
-#+ @param p_barrio - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwseguimientoclientes_barrio_checkColumnConstraints(p_barrio)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_barrio LIKE vwseguimientoclientes.barrio
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwseguimientoclientes_barrio_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwseguimientoclientes.urbanizacion" column
-#+
-#+ @param p_urbanizacion - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwseguimientoclientes_urbanizacion_checkColumnConstraints(p_urbanizacion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_urbanizacion LIKE vwseguimientoclientes.urbanizacion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwseguimientoclientes_urbanizacion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwseguimientoclientes.nombre_proyecto" column
-#+
-#+ @param p_nombre_proyecto - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwseguimientoclientes_nombre_proyecto_checkColumnConstraints(p_nombre_proyecto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombre_proyecto LIKE vwseguimientoclientes.nombre_proyecto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwseguimientoclientes_nombre_proyecto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwseguimientoclientes.direccion_cliente" column
-#+
-#+ @param p_direccion_cliente - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwseguimientoclientes_direccion_cliente_checkColumnConstraints(p_direccion_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_direccion_cliente LIKE vwseguimientoclientes.direccion_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwseguimientoclientes_direccion_cliente_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwseguimientoclientes.direccion_proyecto" column
-#+
-#+ @param p_direccion_proyecto - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwseguimientoclientes_direccion_proyecto_checkColumnConstraints(p_direccion_proyecto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_direccion_proyecto LIKE vwseguimientoclientes.direccion_proyecto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwseguimientoclientes_direccion_proyecto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwseguimientoclientes.telefono_r" column
-#+
-#+ @param p_telefono_r - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwseguimientoclientes_telefono_r_checkColumnConstraints(p_telefono_r)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_telefono_r LIKE vwseguimientoclientes.telefono_r
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwseguimientoclientes_telefono_r_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwseguimientoclientes.telefono_o" column
-#+
-#+ @param p_telefono_o - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwseguimientoclientes_telefono_o_checkColumnConstraints(p_telefono_o)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_telefono_o LIKE vwseguimientoclientes.telefono_o
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwseguimientoclientes_telefono_o_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwseguimientoclientes.email" column
-#+
-#+ @param p_email - CHAR(100) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwseguimientoclientes_email_checkColumnConstraints(p_email)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_email LIKE vwseguimientoclientes.email
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwseguimientoclientes_email_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwseguimientoclientes.celular" column
-#+
-#+ @param p_celular - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwseguimientoclientes_celular_checkColumnConstraints(p_celular)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_celular LIKE vwseguimientoclientes.celular
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwseguimientoclientes_celular_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwseguimientoclientes.fax1" column
-#+
-#+ @param p_fax1 - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwseguimientoclientes_fax1_checkColumnConstraints(p_fax1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fax1 LIKE vwseguimientoclientes.fax1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwseguimientoclientes_fax1_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwseguimientoclientes.celular1" column
-#+
-#+ @param p_celular1 - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwseguimientoclientes_celular1_checkColumnConstraints(p_celular1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_celular1 LIKE vwseguimientoclientes.celular1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwseguimientoclientes_celular1_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwseguimientoclientes.fechacotizacion" column
-#+
-#+ @param p_fechacotizacion - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwseguimientoclientes_fechacotizacion_checkColumnConstraints(p_fechacotizacion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fechacotizacion LIKE vwseguimientoclientes.fechacotizacion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwseguimientoclientes_fechacotizacion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwseguimientoclientes.orden" column
-#+
-#+ @param p_orden - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwseguimientoclientes_orden_checkColumnConstraints(p_orden)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_orden LIKE vwseguimientoclientes.orden
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwseguimientoclientes_orden_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwseguimientoclientes.fechaorden" column
-#+
-#+ @param p_fechaorden - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwseguimientoclientes_fechaorden_checkColumnConstraints(p_fechaorden)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fechaorden LIKE vwseguimientoclientes.fechaorden
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwseguimientoclientes_fechaorden_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwseguimientoclientes.cantidaddespachada" column
-#+
-#+ @param p_cantidaddespachada - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwseguimientoclientes_cantidaddespachada_checkColumnConstraints(p_cantidaddespachada)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidaddespachada LIKE vwseguimientoclientes.cantidaddespachada
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwseguimientoclientes_cantidaddespachada_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwseguimientoclientes.documentodespacho" column
-#+
-#+ @param p_documentodespacho - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwseguimientoclientes_documentodespacho_checkColumnConstraints(p_documentodespacho)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_documentodespacho LIKE vwseguimientoclientes.documentodespacho
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwseguimientoclientes_documentodespacho_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwseguimientoclientes.cod_mov" column
-#+
-#+ @param p_cod_mov - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwseguimientoclientes_cod_mov_checkColumnConstraints(p_cod_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mov LIKE vwseguimientoclientes.cod_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwseguimientoclientes_cod_mov_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwseguimientoclientes.fechaconduce" column
-#+
-#+ @param p_fechaconduce - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwseguimientoclientes_fechaconduce_checkColumnConstraints(p_fechaconduce)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fechaconduce LIKE vwseguimientoclientes.fechaconduce
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwseguimientoclientes_fechaconduce_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwseguimientoclientes.comentario" column
-#+
-#+ @param p_comentario - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwseguimientoclientes_comentario_checkColumnConstraints(p_comentario)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_comentario LIKE vwseguimientoclientes.comentario
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwseguimientoclientes_comentario_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwseguimientoclientes.descrip_esp" column
-#+
-#+ @param p_descrip_esp - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwseguimientoclientes_descrip_esp_checkColumnConstraints(p_descrip_esp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descrip_esp LIKE vwseguimientoclientes.descrip_esp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwseguimientoclientes_descrip_esp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwseguimientoclientes.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwseguimientoclientes_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE vwseguimientoclientes.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_n IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_n: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwseguimientoclientes_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwseguimientoclientes.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwseguimientoclientes_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE vwseguimientoclientes.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_grupo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_grupo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwseguimientoclientes_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwseguimientoclientes.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwseguimientoclientes_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE vwseguimientoclientes.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_tipo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_tipo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwseguimientoclientes_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwseguimientoclientes.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwseguimientoclientes_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE vwseguimientoclientes.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_sec IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_sec: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwseguimientoclientes_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwseguimientoclientes.ano" column
-#+
-#+ @param p_ano - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwseguimientoclientes_ano_checkColumnConstraints(p_ano)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ano LIKE vwseguimientoclientes.ano
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwseguimientoclientes_ano_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwseguimientoclientes.numeromes" column
-#+
-#+ @param p_numeromes - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwseguimientoclientes_numeromes_checkColumnConstraints(p_numeromes)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_numeromes LIKE vwseguimientoclientes.numeromes
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwseguimientoclientes_numeromes_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwseguimientoclientes.mes" column
-#+
-#+ @param p_mes - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwseguimientoclientes_mes_checkColumnConstraints(p_mes)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mes LIKE vwseguimientoclientes.mes
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwseguimientoclientes_mes_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwrepuestos" table
-#+
-#+ @param p_data - a row data LIKE vwrepuestos.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwrepuestos_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vwrepuestos.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vwrepuestos_ano_checkColumnConstraints(p_data.ano) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwrepuestos_numeromes_checkColumnConstraints(p_data.numeromes) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwrepuestos_mes_checkColumnConstraints(p_data.mes) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwrepuestos_codigodepto_checkColumnConstraints(p_data.codigodepto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwrepuestos_departamento_checkColumnConstraints(p_data.departamento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwrepuestos_codigomovimiento_checkColumnConstraints(p_data.codigomovimiento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwrepuestos_transaccion_checkColumnConstraints(p_data.transaccion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwrepuestos_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwrepuestos_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwrepuestos_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwrepuestos_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwrepuestos_codigo_checkColumnConstraints(p_data.codigo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwrepuestos_nombreporducto_checkColumnConstraints(p_data.nombreporducto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwrepuestos_unidad_med_checkColumnConstraints(p_data.unidad_med) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwrepuestos_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwrepuestos_costo_checkColumnConstraints(p_data.costo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwrepuestos_numerodocumento_checkColumnConstraints(p_data.numerodocumento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwrepuestos_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwrepuestos_ordencompra_checkColumnConstraints(p_data.ordencompra) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwrepuestos_conduce_checkColumnConstraints(p_data.conduce) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwrepuestos_codigomaquina_checkColumnConstraints(p_data.codigomaquina) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwrepuestos_maquina_checkColumnConstraints(p_data.maquina) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwrepuestos_valor_checkColumnConstraints(p_data.valor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwrepuestos_checkTableConstraints
-
-{}
-#+ Check constraints on the "vwrepuestos.ano" column
-#+
-#+ @param p_ano - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwrepuestos_ano_checkColumnConstraints(p_ano)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ano LIKE vwrepuestos.ano
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwrepuestos_ano_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwrepuestos.numeromes" column
-#+
-#+ @param p_numeromes - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwrepuestos_numeromes_checkColumnConstraints(p_numeromes)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_numeromes LIKE vwrepuestos.numeromes
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwrepuestos_numeromes_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwrepuestos.mes" column
-#+
-#+ @param p_mes - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwrepuestos_mes_checkColumnConstraints(p_mes)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mes LIKE vwrepuestos.mes
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwrepuestos_mes_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwrepuestos.codigodepto" column
-#+
-#+ @param p_codigodepto - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwrepuestos_codigodepto_checkColumnConstraints(p_codigodepto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codigodepto LIKE vwrepuestos.codigodepto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwrepuestos_codigodepto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwrepuestos.departamento" column
-#+
-#+ @param p_departamento - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwrepuestos_departamento_checkColumnConstraints(p_departamento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_departamento LIKE vwrepuestos.departamento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwrepuestos_departamento_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwrepuestos.codigomovimiento" column
-#+
-#+ @param p_codigomovimiento - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwrepuestos_codigomovimiento_checkColumnConstraints(p_codigomovimiento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codigomovimiento LIKE vwrepuestos.codigomovimiento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwrepuestos_codigomovimiento_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwrepuestos.transaccion" column
-#+
-#+ @param p_transaccion - VARCHAR2(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwrepuestos_transaccion_checkColumnConstraints(p_transaccion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_transaccion LIKE vwrepuestos.transaccion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwrepuestos_transaccion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwrepuestos.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwrepuestos_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE vwrepuestos.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwrepuestos_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwrepuestos.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwrepuestos_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE vwrepuestos.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwrepuestos_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwrepuestos.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwrepuestos_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE vwrepuestos.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwrepuestos_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwrepuestos.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwrepuestos_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE vwrepuestos.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwrepuestos_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwrepuestos.codigo" column
-#+
-#+ @param p_codigo - CHAR(120) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwrepuestos_codigo_checkColumnConstraints(p_codigo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codigo LIKE vwrepuestos.codigo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwrepuestos_codigo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwrepuestos.nombreporducto" column
-#+
-#+ @param p_nombreporducto - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwrepuestos_nombreporducto_checkColumnConstraints(p_nombreporducto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombreporducto LIKE vwrepuestos.nombreporducto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwrepuestos_nombreporducto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwrepuestos.unidad_med" column
-#+
-#+ @param p_unidad_med - CHAR(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwrepuestos_unidad_med_checkColumnConstraints(p_unidad_med)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_unidad_med LIKE vwrepuestos.unidad_med
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwrepuestos_unidad_med_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwrepuestos.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwrepuestos_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE vwrepuestos.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwrepuestos_cantidad_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwrepuestos.costo" column
-#+
-#+ @param p_costo - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwrepuestos_costo_checkColumnConstraints(p_costo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_costo LIKE vwrepuestos.costo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwrepuestos_costo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwrepuestos.numerodocumento" column
-#+
-#+ @param p_numerodocumento - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwrepuestos_numerodocumento_checkColumnConstraints(p_numerodocumento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_numerodocumento LIKE vwrepuestos.numerodocumento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwrepuestos_numerodocumento_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwrepuestos.fecha" column
-#+
-#+ @param p_fecha - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwrepuestos_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE vwrepuestos.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwrepuestos_fecha_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwrepuestos.ordencompra" column
-#+
-#+ @param p_ordencompra - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwrepuestos_ordencompra_checkColumnConstraints(p_ordencompra)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ordencompra LIKE vwrepuestos.ordencompra
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwrepuestos_ordencompra_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwrepuestos.conduce" column
-#+
-#+ @param p_conduce - VARCHAR2(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwrepuestos_conduce_checkColumnConstraints(p_conduce)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_conduce LIKE vwrepuestos.conduce
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwrepuestos_conduce_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwrepuestos.codigomaquina" column
-#+
-#+ @param p_codigomaquina - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwrepuestos_codigomaquina_checkColumnConstraints(p_codigomaquina)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codigomaquina LIKE vwrepuestos.codigomaquina
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwrepuestos_codigomaquina_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwrepuestos.maquina" column
-#+
-#+ @param p_maquina - VARCHAR2(25) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwrepuestos_maquina_checkColumnConstraints(p_maquina)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_maquina LIKE vwrepuestos.maquina
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwrepuestos_maquina_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwrepuestos.valor" column
-#+
-#+ @param p_valor - DECIMAL(23,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwrepuestos_valor_checkColumnConstraints(p_valor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valor LIKE vwrepuestos.valor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwrepuestos_valor_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwprovincias" table
-#+
-#+ @param p_data - a row data LIKE vwprovincias.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwprovincias_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vwprovincias.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vwprovincias_cod_zona_checkColumnConstraints(p_data.cod_zona) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwprovincias_zona_checkColumnConstraints(p_data.zona) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwprovincias_provincia_checkColumnConstraints(p_data.provincia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwprovincias_cod_provincia_checkColumnConstraints(p_data.cod_provincia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwprovincias_tipo_cliente_checkColumnConstraints(p_data.tipo_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwprovincias_sec_cliente_checkColumnConstraints(p_data.sec_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwprovincias_nombre_checkColumnConstraints(p_data.nombre) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwprovincias_telefono_checkColumnConstraints(p_data.telefono) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwprovincias_fax_checkColumnConstraints(p_data.fax) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwprovincias_celular_checkColumnConstraints(p_data.celular) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwprovincias_email_checkColumnConstraints(p_data.email) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwprovincias_num_rnc_checkColumnConstraints(p_data.num_rnc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwprovincias_contacto_checkColumnConstraints(p_data.contacto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwprovincias_telefono_casa_checkColumnConstraints(p_data.telefono_casa) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwprovincias_tiponegocio_checkColumnConstraints(p_data.tiponegocio) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwprovincias_vendedor_checkColumnConstraints(p_data.vendedor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwprovincias_ciudad_checkColumnConstraints(p_data.ciudad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwprovincias_contacto_cliente_checkColumnConstraints(p_data.contacto_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwprovincias_puesto_checkColumnConstraints(p_data.puesto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwprovincias_email_contacto_checkColumnConstraints(p_data.email_contacto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwprovincias_celular_contacto_checkColumnConstraints(p_data.celular_contacto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwprovincias_telefono_oficina_checkColumnConstraints(p_data.telefono_oficina) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwprovincias_telefono_casa_contacto_checkColumnConstraints(p_data.telefono_casa_contacto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwprovincias_direccion_checkColumnConstraints(p_data.direccion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwprovincias_puestocontacto_checkColumnConstraints(p_data.puestocontacto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwprovincias_checkTableConstraints
-
-{}
-#+ Check constraints on the "vwprovincias.cod_zona" column
-#+
-#+ @param p_cod_zona - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwprovincias_cod_zona_checkColumnConstraints(p_cod_zona)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_zona LIKE vwprovincias.cod_zona
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwprovincias_cod_zona_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwprovincias.zona" column
-#+
-#+ @param p_zona - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwprovincias_zona_checkColumnConstraints(p_zona)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_zona LIKE vwprovincias.zona
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwprovincias_zona_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwprovincias.provincia" column
-#+
-#+ @param p_provincia - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwprovincias_provincia_checkColumnConstraints(p_provincia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_provincia LIKE vwprovincias.provincia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwprovincias_provincia_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwprovincias.cod_provincia" column
-#+
-#+ @param p_cod_provincia - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwprovincias_cod_provincia_checkColumnConstraints(p_cod_provincia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_provincia LIKE vwprovincias.cod_provincia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwprovincias_cod_provincia_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwprovincias.tipo_cliente" column
-#+
-#+ @param p_tipo_cliente - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwprovincias_tipo_cliente_checkColumnConstraints(p_tipo_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_cliente LIKE vwprovincias.tipo_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwprovincias_tipo_cliente_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwprovincias.sec_cliente" column
-#+
-#+ @param p_sec_cliente - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwprovincias_sec_cliente_checkColumnConstraints(p_sec_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_cliente LIKE vwprovincias.sec_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwprovincias_sec_cliente_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwprovincias.nombre" column
-#+
-#+ @param p_nombre - CHAR(100) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwprovincias_nombre_checkColumnConstraints(p_nombre)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombre LIKE vwprovincias.nombre
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwprovincias_nombre_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwprovincias.telefono" column
-#+
-#+ @param p_telefono - CHAR(16) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwprovincias_telefono_checkColumnConstraints(p_telefono)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_telefono LIKE vwprovincias.telefono
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwprovincias_telefono_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwprovincias.fax" column
-#+
-#+ @param p_fax - CHAR(16) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwprovincias_fax_checkColumnConstraints(p_fax)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fax LIKE vwprovincias.fax
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwprovincias_fax_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwprovincias.celular" column
-#+
-#+ @param p_celular - CHAR(16) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwprovincias_celular_checkColumnConstraints(p_celular)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_celular LIKE vwprovincias.celular
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwprovincias_celular_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwprovincias.email" column
-#+
-#+ @param p_email - VARCHAR2(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwprovincias_email_checkColumnConstraints(p_email)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_email LIKE vwprovincias.email
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwprovincias_email_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwprovincias.num_rnc" column
-#+
-#+ @param p_num_rnc - CHAR(11) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwprovincias_num_rnc_checkColumnConstraints(p_num_rnc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_rnc LIKE vwprovincias.num_rnc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwprovincias_num_rnc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwprovincias.contacto" column
-#+
-#+ @param p_contacto - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwprovincias_contacto_checkColumnConstraints(p_contacto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_contacto LIKE vwprovincias.contacto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwprovincias_contacto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwprovincias.telefono_casa" column
-#+
-#+ @param p_telefono_casa - CHAR(15) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwprovincias_telefono_casa_checkColumnConstraints(p_telefono_casa)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_telefono_casa LIKE vwprovincias.telefono_casa
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwprovincias_telefono_casa_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwprovincias.tiponegocio" column
-#+
-#+ @param p_tiponegocio - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwprovincias_tiponegocio_checkColumnConstraints(p_tiponegocio)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tiponegocio LIKE vwprovincias.tiponegocio
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwprovincias_tiponegocio_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwprovincias.vendedor" column
-#+
-#+ @param p_vendedor - VARCHAR2(31) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwprovincias_vendedor_checkColumnConstraints(p_vendedor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_vendedor LIKE vwprovincias.vendedor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwprovincias_vendedor_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwprovincias.ciudad" column
-#+
-#+ @param p_ciudad - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwprovincias_ciudad_checkColumnConstraints(p_ciudad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ciudad LIKE vwprovincias.ciudad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwprovincias_ciudad_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwprovincias.contacto_cliente" column
-#+
-#+ @param p_contacto_cliente - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwprovincias_contacto_cliente_checkColumnConstraints(p_contacto_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_contacto_cliente LIKE vwprovincias.contacto_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwprovincias_contacto_cliente_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwprovincias.puesto" column
-#+
-#+ @param p_puesto - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwprovincias_puesto_checkColumnConstraints(p_puesto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_puesto LIKE vwprovincias.puesto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwprovincias_puesto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwprovincias.email_contacto" column
-#+
-#+ @param p_email_contacto - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwprovincias_email_contacto_checkColumnConstraints(p_email_contacto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_email_contacto LIKE vwprovincias.email_contacto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwprovincias_email_contacto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwprovincias.celular_contacto" column
-#+
-#+ @param p_celular_contacto - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwprovincias_celular_contacto_checkColumnConstraints(p_celular_contacto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_celular_contacto LIKE vwprovincias.celular_contacto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwprovincias_celular_contacto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwprovincias.telefono_oficina" column
-#+
-#+ @param p_telefono_oficina - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwprovincias_telefono_oficina_checkColumnConstraints(p_telefono_oficina)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_telefono_oficina LIKE vwprovincias.telefono_oficina
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwprovincias_telefono_oficina_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwprovincias.telefono_casa_contacto" column
-#+
-#+ @param p_telefono_casa_contacto - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwprovincias_telefono_casa_contacto_checkColumnConstraints(p_telefono_casa_contacto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_telefono_casa_contacto LIKE vwprovincias.telefono_casa_contacto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwprovincias_telefono_casa_contacto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwprovincias.direccion" column
-#+
-#+ @param p_direccion - VARCHAR2(133) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwprovincias_direccion_checkColumnConstraints(p_direccion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_direccion LIKE vwprovincias.direccion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwprovincias_direccion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwprovincias.puestocontacto" column
-#+
-#+ @param p_puestocontacto - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwprovincias_puestocontacto_checkColumnConstraints(p_puestocontacto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_puestocontacto LIKE vwprovincias.puestocontacto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwprovincias_puestocontacto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwproductos" table
-#+
-#+ @param p_data - a row data LIKE vwproductos.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproductos_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vwproductos.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vwproductos_descrip_esp_checkColumnConstraints(p_data.descrip_esp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproductos_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproductos_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproductos_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproductos_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproductos_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproductos_precio_checkColumnConstraints(p_data.precio) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproductos_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproductos_cod_cia_checkColumnConstraints(p_data.cod_cia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproductos_tipo_checkColumnConstraints(p_data.tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproductos_grupo_checkColumnConstraints(p_data.grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproductos_origen_checkColumnConstraints(p_data.origen) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproductos_expr1_checkColumnConstraints(p_data.expr1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwproductos_checkTableConstraints
-
-{}
-#+ Check constraints on the "vwproductos.descrip_esp" column
-#+
-#+ @param p_descrip_esp - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproductos_descrip_esp_checkColumnConstraints(p_descrip_esp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descrip_esp LIKE vwproductos.descrip_esp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_descrip_esp IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- descrip_esp: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwproductos_descrip_esp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwproductos.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproductos_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE vwproductos.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_sec IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_sec: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwproductos_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwproductos.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproductos_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE vwproductos.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_tipo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_tipo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwproductos_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwproductos.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproductos_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE vwproductos.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_grupo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_grupo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwproductos_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwproductos.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproductos_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE vwproductos.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_n IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_n: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwproductos_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwproductos.descripcion" column
-#+
-#+ @param p_descripcion - VARCHAR2(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproductos_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE vwproductos.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwproductos_descripcion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwproductos.precio" column
-#+
-#+ @param p_precio - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproductos_precio_checkColumnConstraints(p_precio)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_precio LIKE vwproductos.precio
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwproductos_precio_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwproductos.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproductos_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE vwproductos.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwproductos_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwproductos.cod_cia" column
-#+
-#+ @param p_cod_cia - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproductos_cod_cia_checkColumnConstraints(p_cod_cia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_cia LIKE vwproductos.cod_cia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_cia IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_cia: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwproductos_cod_cia_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwproductos.tipo" column
-#+
-#+ @param p_tipo - VARCHAR2(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproductos_tipo_checkColumnConstraints(p_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo LIKE vwproductos.tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwproductos_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwproductos.grupo" column
-#+
-#+ @param p_grupo - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproductos_grupo_checkColumnConstraints(p_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_grupo LIKE vwproductos.grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwproductos_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwproductos.origen" column
-#+
-#+ @param p_origen - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproductos_origen_checkColumnConstraints(p_origen)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_origen LIKE vwproductos.origen
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwproductos_origen_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwproductos.expr1" column
-#+
-#+ @param p_expr1 - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproductos_expr1_checkColumnConstraints(p_expr1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_expr1 LIKE vwproductos.expr1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwproductos_expr1_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwproduccionvsventas" table
-#+
-#+ @param p_data - a row data LIKE vwproduccionvsventas.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccionvsventas_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vwproduccionvsventas.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vwproduccionvsventas_tipotransaccion_checkColumnConstraints(p_data.tipotransaccion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccionvsventas_ano_checkColumnConstraints(p_data.ano) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccionvsventas_mes_checkColumnConstraints(p_data.mes) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccionvsventas_producto_checkColumnConstraints(p_data.producto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccionvsventas_grupo_checkColumnConstraints(p_data.grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccionvsventas_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccionvsventas_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccionvsventas_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccionvsventas_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccionvsventas_descripcionp_checkColumnConstraints(p_data.descripcionp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccionvsventas_ventas_checkColumnConstraints(p_data.ventas) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccionvsventas_produccion_checkColumnConstraints(p_data.produccion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccionvsventas_documento_checkColumnConstraints(p_data.documento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwproduccionvsventas_checkTableConstraints
-
-{}
-#+ Check constraints on the "vwproduccionvsventas.tipotransaccion" column
-#+
-#+ @param p_tipotransaccion - VARCHAR2(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccionvsventas_tipotransaccion_checkColumnConstraints(p_tipotransaccion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipotransaccion LIKE vwproduccionvsventas.tipotransaccion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_tipotransaccion IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- tipotransaccion: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwproduccionvsventas_tipotransaccion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwproduccionvsventas.ano" column
-#+
-#+ @param p_ano - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccionvsventas_ano_checkColumnConstraints(p_ano)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ano LIKE vwproduccionvsventas.ano
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwproduccionvsventas_ano_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwproduccionvsventas.mes" column
-#+
-#+ @param p_mes - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccionvsventas_mes_checkColumnConstraints(p_mes)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mes LIKE vwproduccionvsventas.mes
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwproduccionvsventas_mes_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwproduccionvsventas.producto" column
-#+
-#+ @param p_producto - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccionvsventas_producto_checkColumnConstraints(p_producto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_producto LIKE vwproduccionvsventas.producto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwproduccionvsventas_producto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwproduccionvsventas.grupo" column
-#+
-#+ @param p_grupo - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccionvsventas_grupo_checkColumnConstraints(p_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_grupo LIKE vwproduccionvsventas.grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwproduccionvsventas_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwproduccionvsventas.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccionvsventas_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE vwproduccionvsventas.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwproduccionvsventas_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwproduccionvsventas.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccionvsventas_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE vwproduccionvsventas.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwproduccionvsventas_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwproduccionvsventas.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccionvsventas_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE vwproduccionvsventas.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwproduccionvsventas_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwproduccionvsventas.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccionvsventas_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE vwproduccionvsventas.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwproduccionvsventas_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwproduccionvsventas.descripcionp" column
-#+
-#+ @param p_descripcionp - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccionvsventas_descripcionp_checkColumnConstraints(p_descripcionp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcionp LIKE vwproduccionvsventas.descripcionp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwproduccionvsventas_descripcionp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwproduccionvsventas.ventas" column
-#+
-#+ @param p_ventas - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccionvsventas_ventas_checkColumnConstraints(p_ventas)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ventas LIKE vwproduccionvsventas.ventas
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwproduccionvsventas_ventas_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwproduccionvsventas.produccion" column
-#+
-#+ @param p_produccion - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccionvsventas_produccion_checkColumnConstraints(p_produccion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_produccion LIKE vwproduccionvsventas.produccion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_produccion IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- produccion: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwproduccionvsventas_produccion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwproduccionvsventas.documento" column
-#+
-#+ @param p_documento - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccionvsventas_documento_checkColumnConstraints(p_documento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_documento LIKE vwproduccionvsventas.documento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwproduccionvsventas_documento_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwproducciont" table
-#+
-#+ @param p_data - a row data LIKE vwproducciont.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproducciont_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vwproducciont.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vwproducciont_codigomov_checkColumnConstraints(p_data.codigomov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproducciont_descripcionmov_checkColumnConstraints(p_data.descripcionmov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproducciont_codigodepto_checkColumnConstraints(p_data.codigodepto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproducciont_descripciondpto_checkColumnConstraints(p_data.descripciondpto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproducciont_documento_checkColumnConstraints(p_data.documento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproducciont_fechadoc_checkColumnConstraints(p_data.fechadoc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproducciont_orden_checkColumnConstraints(p_data.orden) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproducciont_producto_checkColumnConstraints(p_data.producto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproducciont_grupo_checkColumnConstraints(p_data.grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproducciont_origen_checkColumnConstraints(p_data.origen) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproducciont_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproducciont_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproducciont_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproducciont_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproducciont_descripcionp_checkColumnConstraints(p_data.descripcionp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproducciont_unidadmed_checkColumnConstraints(p_data.unidadmed) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproducciont_unidades_checkColumnConstraints(p_data.unidades) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproducciont_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproducciont_nombrecliente_checkColumnConstraints(p_data.nombrecliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproducciont_cantidadorden_checkColumnConstraints(p_data.cantidadorden) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproducciont_ano_checkColumnConstraints(p_data.ano) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproducciont_mes_checkColumnConstraints(p_data.mes) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproducciont_metrosadicionales_checkColumnConstraints(p_data.metrosadicionales) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwproducciont_checkTableConstraints
-
-{}
-#+ Check constraints on the "vwproducciont.codigomov" column
-#+
-#+ @param p_codigomov - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproducciont_codigomov_checkColumnConstraints(p_codigomov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codigomov LIKE vwproducciont.codigomov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_codigomov IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- codigomov: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwproducciont_codigomov_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwproducciont.descripcionmov" column
-#+
-#+ @param p_descripcionmov - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproducciont_descripcionmov_checkColumnConstraints(p_descripcionmov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcionmov LIKE vwproducciont.descripcionmov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwproducciont_descripcionmov_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwproducciont.codigodepto" column
-#+
-#+ @param p_codigodepto - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproducciont_codigodepto_checkColumnConstraints(p_codigodepto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codigodepto LIKE vwproducciont.codigodepto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwproducciont_codigodepto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwproducciont.descripciondpto" column
-#+
-#+ @param p_descripciondpto - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproducciont_descripciondpto_checkColumnConstraints(p_descripciondpto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripciondpto LIKE vwproducciont.descripciondpto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwproducciont_descripciondpto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwproducciont.documento" column
-#+
-#+ @param p_documento - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproducciont_documento_checkColumnConstraints(p_documento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_documento LIKE vwproducciont.documento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_documento IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- documento: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwproducciont_documento_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwproducciont.fechadoc" column
-#+
-#+ @param p_fechadoc - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproducciont_fechadoc_checkColumnConstraints(p_fechadoc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fechadoc LIKE vwproducciont.fechadoc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_fechadoc IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- fechadoc: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwproducciont_fechadoc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwproducciont.orden" column
-#+
-#+ @param p_orden - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproducciont_orden_checkColumnConstraints(p_orden)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_orden LIKE vwproducciont.orden
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwproducciont_orden_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwproducciont.producto" column
-#+
-#+ @param p_producto - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproducciont_producto_checkColumnConstraints(p_producto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_producto LIKE vwproducciont.producto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwproducciont_producto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwproducciont.grupo" column
-#+
-#+ @param p_grupo - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproducciont_grupo_checkColumnConstraints(p_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_grupo LIKE vwproducciont.grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwproducciont_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwproducciont.origen" column
-#+
-#+ @param p_origen - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproducciont_origen_checkColumnConstraints(p_origen)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_origen LIKE vwproducciont.origen
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwproducciont_origen_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwproducciont.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproducciont_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE vwproducciont.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_n IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_n: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwproducciont_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwproducciont.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproducciont_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE vwproducciont.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_grupo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_grupo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwproducciont_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwproducciont.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproducciont_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE vwproducciont.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_tipo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_tipo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwproducciont_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwproducciont.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproducciont_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE vwproducciont.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_sec IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_sec: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwproducciont_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwproducciont.descripcionp" column
-#+
-#+ @param p_descripcionp - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproducciont_descripcionp_checkColumnConstraints(p_descripcionp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcionp LIKE vwproducciont.descripcionp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_descripcionp IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- descripcionp: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwproducciont_descripcionp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwproducciont.unidadmed" column
-#+
-#+ @param p_unidadmed - CHAR(4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproducciont_unidadmed_checkColumnConstraints(p_unidadmed)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_unidadmed LIKE vwproducciont.unidadmed
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwproducciont_unidadmed_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwproducciont.unidades" column
-#+
-#+ @param p_unidades - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproducciont_unidades_checkColumnConstraints(p_unidades)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_unidades LIKE vwproducciont.unidades
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwproducciont_unidades_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwproducciont.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproducciont_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE vwproducciont.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cantidad IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cantidad: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwproducciont_cantidad_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwproducciont.nombrecliente" column
-#+
-#+ @param p_nombrecliente - CHAR(100) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproducciont_nombrecliente_checkColumnConstraints(p_nombrecliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombrecliente LIKE vwproducciont.nombrecliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwproducciont_nombrecliente_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwproducciont.cantidadorden" column
-#+
-#+ @param p_cantidadorden - DECIMAL(38,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproducciont_cantidadorden_checkColumnConstraints(p_cantidadorden)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidadorden LIKE vwproducciont.cantidadorden
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwproducciont_cantidadorden_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwproducciont.ano" column
-#+
-#+ @param p_ano - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproducciont_ano_checkColumnConstraints(p_ano)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ano LIKE vwproducciont.ano
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwproducciont_ano_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwproducciont.mes" column
-#+
-#+ @param p_mes - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproducciont_mes_checkColumnConstraints(p_mes)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mes LIKE vwproducciont.mes
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwproducciont_mes_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwproducciont.metrosadicionales" column
-#+
-#+ @param p_metrosadicionales - DECIMAL(25,10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproducciont_metrosadicionales_checkColumnConstraints(p_metrosadicionales)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_metrosadicionales LIKE vwproducciont.metrosadicionales
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwproducciont_metrosadicionales_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwproduccionf" table
-#+
-#+ @param p_data - a row data LIKE vwproduccionf.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccionf_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vwproduccionf.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vwproduccionf_ano_checkColumnConstraints(p_data.ano) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccionf_dia_checkColumnConstraints(p_data.dia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccionf_mes_checkColumnConstraints(p_data.mes) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccionf_semana_checkColumnConstraints(p_data.semana) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccionf_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccionf_documento_checkColumnConstraints(p_data.documento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccionf_codigosemi_checkColumnConstraints(p_data.codigosemi) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccionf_descripcionsemi_checkColumnConstraints(p_data.descripcionsemi) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccionf_uniadmed_checkColumnConstraints(p_data.uniadmed) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccionf_codigodepto_checkColumnConstraints(p_data.codigodepto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccionf_nombredto_checkColumnConstraints(p_data.nombredto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccionf_ficha_checkColumnConstraints(p_data.ficha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccionf_nombre_checkColumnConstraints(p_data.nombre) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccionf_apellido_checkColumnConstraints(p_data.apellido) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccionf_normalesd_checkColumnConstraints(p_data.normalesd) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccionf_normalesind_checkColumnConstraints(p_data.normalesind) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccionf_extrasdirecta_checkColumnConstraints(p_data.extrasdirecta) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccionf_extrasind_checkColumnConstraints(p_data.extrasind) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccionf_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccionf_bloque_checkColumnConstraints(p_data.bloque) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccionf_cantidadprep_checkColumnConstraints(p_data.cantidadprep) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccionf_grupodepto_checkColumnConstraints(p_data.grupodepto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccionf_turno_checkColumnConstraints(p_data.turno) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccionf_costolabor_checkColumnConstraints(p_data.costolabor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccionf_costogastos_checkColumnConstraints(p_data.costogastos) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccionf_valorlabor_checkColumnConstraints(p_data.valorlabor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccionf_valorgasto_checkColumnConstraints(p_data.valorgasto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccionf_estado_checkColumnConstraints(p_data.estado) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccionf_docalmacen_checkColumnConstraints(p_data.docalmacen) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccionf_cantidadtrx_checkColumnConstraints(p_data.cantidadtrx) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccionf_cod_mov_checkColumnConstraints(p_data.cod_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccionf_descrip_mov_checkColumnConstraints(p_data.descrip_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccionf_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccionf_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccionf_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccionf_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccionf_descrip_esp_checkColumnConstraints(p_data.descrip_esp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwproduccionf_checkTableConstraints
-
-{}
-#+ Check constraints on the "vwproduccionf.ano" column
-#+
-#+ @param p_ano - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccionf_ano_checkColumnConstraints(p_ano)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ano LIKE vwproduccionf.ano
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwproduccionf_ano_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwproduccionf.dia" column
-#+
-#+ @param p_dia - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccionf_dia_checkColumnConstraints(p_dia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_dia LIKE vwproduccionf.dia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwproduccionf_dia_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwproduccionf.mes" column
-#+
-#+ @param p_mes - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccionf_mes_checkColumnConstraints(p_mes)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mes LIKE vwproduccionf.mes
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwproduccionf_mes_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwproduccionf.semana" column
-#+
-#+ @param p_semana - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccionf_semana_checkColumnConstraints(p_semana)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_semana LIKE vwproduccionf.semana
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwproduccionf_semana_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwproduccionf.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccionf_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE vwproduccionf.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_fecha IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- fecha: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwproduccionf_fecha_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwproduccionf.documento" column
-#+
-#+ @param p_documento - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccionf_documento_checkColumnConstraints(p_documento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_documento LIKE vwproduccionf.documento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_documento IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- documento: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwproduccionf_documento_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwproduccionf.codigosemi" column
-#+
-#+ @param p_codigosemi - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccionf_codigosemi_checkColumnConstraints(p_codigosemi)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codigosemi LIKE vwproduccionf.codigosemi
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_codigosemi IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- codigosemi: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwproduccionf_codigosemi_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwproduccionf.descripcionsemi" column
-#+
-#+ @param p_descripcionsemi - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccionf_descripcionsemi_checkColumnConstraints(p_descripcionsemi)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcionsemi LIKE vwproduccionf.descripcionsemi
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwproduccionf_descripcionsemi_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwproduccionf.uniadmed" column
-#+
-#+ @param p_uniadmed - CHAR(4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccionf_uniadmed_checkColumnConstraints(p_uniadmed)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_uniadmed LIKE vwproduccionf.uniadmed
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwproduccionf_uniadmed_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwproduccionf.codigodepto" column
-#+
-#+ @param p_codigodepto - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccionf_codigodepto_checkColumnConstraints(p_codigodepto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codigodepto LIKE vwproduccionf.codigodepto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwproduccionf_codigodepto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwproduccionf.nombredto" column
-#+
-#+ @param p_nombredto - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccionf_nombredto_checkColumnConstraints(p_nombredto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombredto LIKE vwproduccionf.nombredto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwproduccionf_nombredto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwproduccionf.ficha" column
-#+
-#+ @param p_ficha - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccionf_ficha_checkColumnConstraints(p_ficha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ficha LIKE vwproduccionf.ficha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_ficha IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- ficha: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwproduccionf_ficha_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwproduccionf.nombre" column
-#+
-#+ @param p_nombre - CHAR(15) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccionf_nombre_checkColumnConstraints(p_nombre)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombre LIKE vwproduccionf.nombre
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwproduccionf_nombre_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwproduccionf.apellido" column
-#+
-#+ @param p_apellido - CHAR(15) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccionf_apellido_checkColumnConstraints(p_apellido)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_apellido LIKE vwproduccionf.apellido
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwproduccionf_apellido_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwproduccionf.normalesd" column
-#+
-#+ @param p_normalesd - DECIMAL(8,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccionf_normalesd_checkColumnConstraints(p_normalesd)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_normalesd LIKE vwproduccionf.normalesd
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwproduccionf_normalesd_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwproduccionf.normalesind" column
-#+
-#+ @param p_normalesind - DECIMAL(8,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccionf_normalesind_checkColumnConstraints(p_normalesind)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_normalesind LIKE vwproduccionf.normalesind
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwproduccionf_normalesind_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwproduccionf.extrasdirecta" column
-#+
-#+ @param p_extrasdirecta - DECIMAL(8,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccionf_extrasdirecta_checkColumnConstraints(p_extrasdirecta)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_extrasdirecta LIKE vwproduccionf.extrasdirecta
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwproduccionf_extrasdirecta_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwproduccionf.extrasind" column
-#+
-#+ @param p_extrasind - DECIMAL(8,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccionf_extrasind_checkColumnConstraints(p_extrasind)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_extrasind LIKE vwproduccionf.extrasind
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwproduccionf_extrasind_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwproduccionf.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccionf_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE vwproduccionf.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwproduccionf_cantidad_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwproduccionf.bloque" column
-#+
-#+ @param p_bloque - CHAR(25) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccionf_bloque_checkColumnConstraints(p_bloque)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_bloque LIKE vwproduccionf.bloque
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwproduccionf_bloque_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwproduccionf.cantidadprep" column
-#+
-#+ @param p_cantidadprep - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccionf_cantidadprep_checkColumnConstraints(p_cantidadprep)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidadprep LIKE vwproduccionf.cantidadprep
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwproduccionf_cantidadprep_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwproduccionf.grupodepto" column
-#+
-#+ @param p_grupodepto - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccionf_grupodepto_checkColumnConstraints(p_grupodepto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_grupodepto LIKE vwproduccionf.grupodepto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwproduccionf_grupodepto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwproduccionf.turno" column
-#+
-#+ @param p_turno - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccionf_turno_checkColumnConstraints(p_turno)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_turno LIKE vwproduccionf.turno
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwproduccionf_turno_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwproduccionf.costolabor" column
-#+
-#+ @param p_costolabor - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccionf_costolabor_checkColumnConstraints(p_costolabor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_costolabor LIKE vwproduccionf.costolabor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwproduccionf_costolabor_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwproduccionf.costogastos" column
-#+
-#+ @param p_costogastos - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccionf_costogastos_checkColumnConstraints(p_costogastos)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_costogastos LIKE vwproduccionf.costogastos
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwproduccionf_costogastos_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwproduccionf.valorlabor" column
-#+
-#+ @param p_valorlabor - DECIMAL(25,7) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccionf_valorlabor_checkColumnConstraints(p_valorlabor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valorlabor LIKE vwproduccionf.valorlabor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwproduccionf_valorlabor_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwproduccionf.valorgasto" column
-#+
-#+ @param p_valorgasto - DECIMAL(25,7) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccionf_valorgasto_checkColumnConstraints(p_valorgasto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valorgasto LIKE vwproduccionf.valorgasto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwproduccionf_valorgasto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwproduccionf.estado" column
-#+
-#+ @param p_estado - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccionf_estado_checkColumnConstraints(p_estado)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_estado LIKE vwproduccionf.estado
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwproduccionf_estado_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwproduccionf.docalmacen" column
-#+
-#+ @param p_docalmacen - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccionf_docalmacen_checkColumnConstraints(p_docalmacen)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_docalmacen LIKE vwproduccionf.docalmacen
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwproduccionf_docalmacen_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwproduccionf.cantidadtrx" column
-#+
-#+ @param p_cantidadtrx - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccionf_cantidadtrx_checkColumnConstraints(p_cantidadtrx)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidadtrx LIKE vwproduccionf.cantidadtrx
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwproduccionf_cantidadtrx_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwproduccionf.cod_mov" column
-#+
-#+ @param p_cod_mov - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccionf_cod_mov_checkColumnConstraints(p_cod_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mov LIKE vwproduccionf.cod_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwproduccionf_cod_mov_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwproduccionf.descrip_mov" column
-#+
-#+ @param p_descrip_mov - VARCHAR2(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccionf_descrip_mov_checkColumnConstraints(p_descrip_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descrip_mov LIKE vwproduccionf.descrip_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwproduccionf_descrip_mov_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwproduccionf.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccionf_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE vwproduccionf.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwproduccionf_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwproduccionf.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccionf_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE vwproduccionf.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwproduccionf_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwproduccionf.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccionf_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE vwproduccionf.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwproduccionf_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwproduccionf.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccionf_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE vwproduccionf.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwproduccionf_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwproduccionf.descrip_esp" column
-#+
-#+ @param p_descrip_esp - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccionf_descrip_esp_checkColumnConstraints(p_descrip_esp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descrip_esp LIKE vwproduccionf.descrip_esp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwproduccionf_descrip_esp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwproduccion" table
-#+
-#+ @param p_data - a row data LIKE vwproduccion.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccion_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vwproduccion.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vwproduccion_ano_checkColumnConstraints(p_data.ano) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccion_dia_checkColumnConstraints(p_data.dia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccion_mes_checkColumnConstraints(p_data.mes) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccion_semana_checkColumnConstraints(p_data.semana) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccion_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccion_documento_checkColumnConstraints(p_data.documento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccion_codigosemi_checkColumnConstraints(p_data.codigosemi) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccion_descripcionsemi_checkColumnConstraints(p_data.descripcionsemi) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccion_uniadmed_checkColumnConstraints(p_data.uniadmed) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccion_codigodepto_checkColumnConstraints(p_data.codigodepto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccion_nombredto_checkColumnConstraints(p_data.nombredto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccion_ficha_checkColumnConstraints(p_data.ficha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccion_nombre_checkColumnConstraints(p_data.nombre) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccion_apellido_checkColumnConstraints(p_data.apellido) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccion_normalesd_checkColumnConstraints(p_data.normalesd) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccion_normalesind_checkColumnConstraints(p_data.normalesind) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccion_extrasdirecta_checkColumnConstraints(p_data.extrasdirecta) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccion_extrasind_checkColumnConstraints(p_data.extrasind) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccion_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccion_bloque_checkColumnConstraints(p_data.bloque) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccion_grupodepto_checkColumnConstraints(p_data.grupodepto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccion_turno_checkColumnConstraints(p_data.turno) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccion_expr1_checkColumnConstraints(p_data.expr1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccion_descrip_mov_checkColumnConstraints(p_data.descrip_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccion_cod_mov_checkColumnConstraints(p_data.cod_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccion_expr2_checkColumnConstraints(p_data.expr2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccion_medida_checkColumnConstraints(p_data.medida) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwproduccion_checkTableConstraints
-
-{}
-#+ Check constraints on the "vwproduccion.ano" column
-#+
-#+ @param p_ano - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccion_ano_checkColumnConstraints(p_ano)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ano LIKE vwproduccion.ano
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwproduccion_ano_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwproduccion.dia" column
-#+
-#+ @param p_dia - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccion_dia_checkColumnConstraints(p_dia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_dia LIKE vwproduccion.dia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwproduccion_dia_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwproduccion.mes" column
-#+
-#+ @param p_mes - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccion_mes_checkColumnConstraints(p_mes)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mes LIKE vwproduccion.mes
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwproduccion_mes_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwproduccion.semana" column
-#+
-#+ @param p_semana - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccion_semana_checkColumnConstraints(p_semana)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_semana LIKE vwproduccion.semana
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwproduccion_semana_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwproduccion.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccion_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE vwproduccion.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_fecha IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- fecha: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwproduccion_fecha_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwproduccion.documento" column
-#+
-#+ @param p_documento - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccion_documento_checkColumnConstraints(p_documento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_documento LIKE vwproduccion.documento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_documento IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- documento: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwproduccion_documento_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwproduccion.codigosemi" column
-#+
-#+ @param p_codigosemi - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccion_codigosemi_checkColumnConstraints(p_codigosemi)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codigosemi LIKE vwproduccion.codigosemi
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_codigosemi IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- codigosemi: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwproduccion_codigosemi_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwproduccion.descripcionsemi" column
-#+
-#+ @param p_descripcionsemi - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccion_descripcionsemi_checkColumnConstraints(p_descripcionsemi)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcionsemi LIKE vwproduccion.descripcionsemi
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwproduccion_descripcionsemi_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwproduccion.uniadmed" column
-#+
-#+ @param p_uniadmed - CHAR(4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccion_uniadmed_checkColumnConstraints(p_uniadmed)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_uniadmed LIKE vwproduccion.uniadmed
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwproduccion_uniadmed_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwproduccion.codigodepto" column
-#+
-#+ @param p_codigodepto - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccion_codigodepto_checkColumnConstraints(p_codigodepto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codigodepto LIKE vwproduccion.codigodepto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwproduccion_codigodepto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwproduccion.nombredto" column
-#+
-#+ @param p_nombredto - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccion_nombredto_checkColumnConstraints(p_nombredto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombredto LIKE vwproduccion.nombredto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwproduccion_nombredto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwproduccion.ficha" column
-#+
-#+ @param p_ficha - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccion_ficha_checkColumnConstraints(p_ficha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ficha LIKE vwproduccion.ficha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_ficha IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- ficha: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwproduccion_ficha_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwproduccion.nombre" column
-#+
-#+ @param p_nombre - CHAR(15) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccion_nombre_checkColumnConstraints(p_nombre)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombre LIKE vwproduccion.nombre
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwproduccion_nombre_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwproduccion.apellido" column
-#+
-#+ @param p_apellido - CHAR(15) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccion_apellido_checkColumnConstraints(p_apellido)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_apellido LIKE vwproduccion.apellido
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwproduccion_apellido_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwproduccion.normalesd" column
-#+
-#+ @param p_normalesd - DECIMAL(8,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccion_normalesd_checkColumnConstraints(p_normalesd)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_normalesd LIKE vwproduccion.normalesd
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwproduccion_normalesd_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwproduccion.normalesind" column
-#+
-#+ @param p_normalesind - DECIMAL(8,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccion_normalesind_checkColumnConstraints(p_normalesind)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_normalesind LIKE vwproduccion.normalesind
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwproduccion_normalesind_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwproduccion.extrasdirecta" column
-#+
-#+ @param p_extrasdirecta - DECIMAL(8,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccion_extrasdirecta_checkColumnConstraints(p_extrasdirecta)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_extrasdirecta LIKE vwproduccion.extrasdirecta
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwproduccion_extrasdirecta_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwproduccion.extrasind" column
-#+
-#+ @param p_extrasind - DECIMAL(8,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccion_extrasind_checkColumnConstraints(p_extrasind)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_extrasind LIKE vwproduccion.extrasind
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwproduccion_extrasind_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwproduccion.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccion_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE vwproduccion.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwproduccion_cantidad_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwproduccion.bloque" column
-#+
-#+ @param p_bloque - CHAR(25) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccion_bloque_checkColumnConstraints(p_bloque)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_bloque LIKE vwproduccion.bloque
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwproduccion_bloque_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwproduccion.grupodepto" column
-#+
-#+ @param p_grupodepto - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccion_grupodepto_checkColumnConstraints(p_grupodepto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_grupodepto LIKE vwproduccion.grupodepto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwproduccion_grupodepto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwproduccion.turno" column
-#+
-#+ @param p_turno - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccion_turno_checkColumnConstraints(p_turno)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_turno LIKE vwproduccion.turno
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwproduccion_turno_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwproduccion.expr1" column
-#+
-#+ @param p_expr1 - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccion_expr1_checkColumnConstraints(p_expr1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_expr1 LIKE vwproduccion.expr1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwproduccion_expr1_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwproduccion.descrip_mov" column
-#+
-#+ @param p_descrip_mov - VARCHAR2(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccion_descrip_mov_checkColumnConstraints(p_descrip_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descrip_mov LIKE vwproduccion.descrip_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwproduccion_descrip_mov_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwproduccion.cod_mov" column
-#+
-#+ @param p_cod_mov - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccion_cod_mov_checkColumnConstraints(p_cod_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mov LIKE vwproduccion.cod_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwproduccion_cod_mov_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwproduccion.expr2" column
-#+
-#+ @param p_expr2 - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccion_expr2_checkColumnConstraints(p_expr2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_expr2 LIKE vwproduccion.expr2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwproduccion_expr2_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwproduccion.medida" column
-#+
-#+ @param p_medida - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccion_medida_checkColumnConstraints(p_medida)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_medida LIKE vwproduccion.medida
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwproduccion_medida_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwprecios" table
-#+
-#+ @param p_data - a row data LIKE vwprecios.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwprecios_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vwprecios.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vwprecios_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwprecios_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwprecios_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwprecios_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwprecios_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwprecios_descrip_esp_checkColumnConstraints(p_data.descrip_esp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwprecios_unidad_med_checkColumnConstraints(p_data.unidad_med) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwprecios_precio_checkColumnConstraints(p_data.precio) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwprecios_simbolo_checkColumnConstraints(p_data.simbolo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwprecios_checkTableConstraints
-
-{}
-#+ Check constraints on the "vwprecios.descripcion" column
-#+
-#+ @param p_descripcion - VARCHAR2(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwprecios_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE vwprecios.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwprecios_descripcion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwprecios.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwprecios_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE vwprecios.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_n IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_n: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwprecios_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwprecios.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwprecios_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE vwprecios.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_grupo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_grupo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwprecios_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwprecios.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwprecios_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE vwprecios.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_tipo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_tipo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwprecios_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwprecios.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwprecios_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE vwprecios.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_sec IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_sec: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwprecios_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwprecios.descrip_esp" column
-#+
-#+ @param p_descrip_esp - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwprecios_descrip_esp_checkColumnConstraints(p_descrip_esp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descrip_esp LIKE vwprecios.descrip_esp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_descrip_esp IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- descrip_esp: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwprecios_descrip_esp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwprecios.unidad_med" column
-#+
-#+ @param p_unidad_med - CHAR(4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwprecios_unidad_med_checkColumnConstraints(p_unidad_med)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_unidad_med LIKE vwprecios.unidad_med
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwprecios_unidad_med_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwprecios.precio" column
-#+
-#+ @param p_precio - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwprecios_precio_checkColumnConstraints(p_precio)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_precio LIKE vwprecios.precio
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwprecios_precio_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwprecios.simbolo" column
-#+
-#+ @param p_simbolo - VARCHAR2(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwprecios_simbolo_checkColumnConstraints(p_simbolo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_simbolo LIKE vwprecios.simbolo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwprecios_simbolo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwmatprima" table
-#+
-#+ @param p_data - a row data LIKE vwmatprima.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwmatprima_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vwmatprima.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vwmatprima_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwmatprima_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwmatprima_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwmatprima_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwmatprima_descrip_esp_checkColumnConstraints(p_data.descrip_esp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwmatprima_unidad_med_checkColumnConstraints(p_data.unidad_med) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwmatprima_cod_mov_checkColumnConstraints(p_data.cod_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwmatprima_transaccion_checkColumnConstraints(p_data.transaccion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwmatprima_costo_st_checkColumnConstraints(p_data.costo_st) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwmatprima_valor_checkColumnConstraints(p_data.valor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwmatprima_cantidad_2_checkColumnConstraints(p_data.cantidad_2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwmatprima_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwmatprima_num_doc_checkColumnConstraints(p_data.num_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwmatprima_fact_no_checkColumnConstraints(p_data.fact_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwmatprima_conduce_no_checkColumnConstraints(p_data.conduce_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwmatprima_orden_compra_checkColumnConstraints(p_data.orden_compra) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwmatprima_tipo_checkColumnConstraints(p_data.tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwmatprima_ano_checkColumnConstraints(p_data.ano) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwmatprima_numero_mes_checkColumnConstraints(p_data.numero_mes) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwmatprima_mes_checkColumnConstraints(p_data.mes) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwmatprima_depto_a_checkColumnConstraints(p_data.depto_a) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwmatprima_nom_dpto_checkColumnConstraints(p_data.nom_dpto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwmatprima_origen_checkColumnConstraints(p_data.origen) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwmatprima_existencia_checkColumnConstraints(p_data.existencia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwmatprima_checkTableConstraints
-
-{}
-#+ Check constraints on the "vwmatprima.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwmatprima_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE vwmatprima.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_n IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_n: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwmatprima_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwmatprima.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwmatprima_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE vwmatprima.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_grupo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_grupo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwmatprima_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwmatprima.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwmatprima_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE vwmatprima.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_tipo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_tipo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwmatprima_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwmatprima.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwmatprima_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE vwmatprima.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_sec IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_sec: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwmatprima_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwmatprima.descrip_esp" column
-#+
-#+ @param p_descrip_esp - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwmatprima_descrip_esp_checkColumnConstraints(p_descrip_esp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descrip_esp LIKE vwmatprima.descrip_esp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_descrip_esp IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- descrip_esp: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwmatprima_descrip_esp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwmatprima.unidad_med" column
-#+
-#+ @param p_unidad_med - CHAR(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwmatprima_unidad_med_checkColumnConstraints(p_unidad_med)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_unidad_med LIKE vwmatprima.unidad_med
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwmatprima_unidad_med_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwmatprima.cod_mov" column
-#+
-#+ @param p_cod_mov - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwmatprima_cod_mov_checkColumnConstraints(p_cod_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mov LIKE vwmatprima.cod_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_mov IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_mov: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwmatprima_cod_mov_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwmatprima.transaccion" column
-#+
-#+ @param p_transaccion - VARCHAR2(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwmatprima_transaccion_checkColumnConstraints(p_transaccion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_transaccion LIKE vwmatprima.transaccion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwmatprima_transaccion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwmatprima.costo_st" column
-#+
-#+ @param p_costo_st - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwmatprima_costo_st_checkColumnConstraints(p_costo_st)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_costo_st LIKE vwmatprima.costo_st
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwmatprima_costo_st_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwmatprima.valor" column
-#+
-#+ @param p_valor - DECIMAL(23,6) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwmatprima_valor_checkColumnConstraints(p_valor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valor LIKE vwmatprima.valor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwmatprima_valor_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwmatprima.cantidad_2" column
-#+
-#+ @param p_cantidad_2 - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwmatprima_cantidad_2_checkColumnConstraints(p_cantidad_2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad_2 LIKE vwmatprima.cantidad_2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwmatprima_cantidad_2_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwmatprima.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwmatprima_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE vwmatprima.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwmatprima_fecha_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwmatprima.num_doc" column
-#+
-#+ @param p_num_doc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwmatprima_num_doc_checkColumnConstraints(p_num_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_doc LIKE vwmatprima.num_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_num_doc IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- num_doc: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwmatprima_num_doc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwmatprima.fact_no" column
-#+
-#+ @param p_fact_no - VARCHAR2(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwmatprima_fact_no_checkColumnConstraints(p_fact_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fact_no LIKE vwmatprima.fact_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwmatprima_fact_no_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwmatprima.conduce_no" column
-#+
-#+ @param p_conduce_no - VARCHAR2(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwmatprima_conduce_no_checkColumnConstraints(p_conduce_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_conduce_no LIKE vwmatprima.conduce_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwmatprima_conduce_no_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwmatprima.orden_compra" column
-#+
-#+ @param p_orden_compra - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwmatprima_orden_compra_checkColumnConstraints(p_orden_compra)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_orden_compra LIKE vwmatprima.orden_compra
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwmatprima_orden_compra_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwmatprima.tipo" column
-#+
-#+ @param p_tipo - VARCHAR2(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwmatprima_tipo_checkColumnConstraints(p_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo LIKE vwmatprima.tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwmatprima_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwmatprima.ano" column
-#+
-#+ @param p_ano - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwmatprima_ano_checkColumnConstraints(p_ano)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ano LIKE vwmatprima.ano
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwmatprima_ano_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwmatprima.numero_mes" column
-#+
-#+ @param p_numero_mes - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwmatprima_numero_mes_checkColumnConstraints(p_numero_mes)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_numero_mes LIKE vwmatprima.numero_mes
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwmatprima_numero_mes_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwmatprima.mes" column
-#+
-#+ @param p_mes - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwmatprima_mes_checkColumnConstraints(p_mes)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mes LIKE vwmatprima.mes
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwmatprima_mes_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwmatprima.depto_a" column
-#+
-#+ @param p_depto_a - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwmatprima_depto_a_checkColumnConstraints(p_depto_a)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_depto_a LIKE vwmatprima.depto_a
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwmatprima_depto_a_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwmatprima.nom_dpto" column
-#+
-#+ @param p_nom_dpto - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwmatprima_nom_dpto_checkColumnConstraints(p_nom_dpto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nom_dpto LIKE vwmatprima.nom_dpto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwmatprima_nom_dpto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwmatprima.origen" column
-#+
-#+ @param p_origen - VARCHAR2(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwmatprima_origen_checkColumnConstraints(p_origen)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_origen LIKE vwmatprima.origen
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_origen IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- origen: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwmatprima_origen_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwmatprima.existencia" column
-#+
-#+ @param p_existencia - DECIMAL(38,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwmatprima_existencia_checkColumnConstraints(p_existencia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_existencia LIKE vwmatprima.existencia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwmatprima_existencia_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwipprodterm" table
-#+
-#+ @param p_data - a row data LIKE vwipprodterm.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwipprodterm_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vwipprodterm.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vwipprodterm_ano_checkColumnConstraints(p_data.ano) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwipprodterm_mes_checkColumnConstraints(p_data.mes) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwipprodterm_mes_orden_checkColumnConstraints(p_data.mes_orden) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwipprodterm_cod_origen_checkColumnConstraints(p_data.cod_origen) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwipprodterm_origen_checkColumnConstraints(p_data.origen) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwipprodterm_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwipprodterm_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwipprodterm_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwipprodterm_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwipprodterm_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwipprodterm_unidad_med_checkColumnConstraints(p_data.unidad_med) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwipprodterm_numero_doc_checkColumnConstraints(p_data.numero_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwipprodterm_orden_compra_checkColumnConstraints(p_data.orden_compra) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwipprodterm_orden_pedido_checkColumnConstraints(p_data.orden_pedido) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwipprodterm_codigo_mov_checkColumnConstraints(p_data.codigo_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwipprodterm_descripcion_mov_checkColumnConstraints(p_data.descripcion_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwipprodterm_cantidad1_checkColumnConstraints(p_data.cantidad1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwipprodterm_cantidad2_checkColumnConstraints(p_data.cantidad2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwipprodterm_costo_standard_checkColumnConstraints(p_data.costo_standard) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwipprodterm_valorstd_checkColumnConstraints(p_data.valorstd) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwipprodterm_producto_checkColumnConstraints(p_data.producto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwipprodterm_checkTableConstraints
-
-{}
-#+ Check constraints on the "vwipprodterm.ano" column
-#+
-#+ @param p_ano - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwipprodterm_ano_checkColumnConstraints(p_ano)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ano LIKE vwipprodterm.ano
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwipprodterm_ano_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwipprodterm.mes" column
-#+
-#+ @param p_mes - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwipprodterm_mes_checkColumnConstraints(p_mes)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mes LIKE vwipprodterm.mes
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwipprodterm_mes_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwipprodterm.mes_orden" column
-#+
-#+ @param p_mes_orden - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwipprodterm_mes_orden_checkColumnConstraints(p_mes_orden)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mes_orden LIKE vwipprodterm.mes_orden
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwipprodterm_mes_orden_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwipprodterm.cod_origen" column
-#+
-#+ @param p_cod_origen - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwipprodterm_cod_origen_checkColumnConstraints(p_cod_origen)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_origen LIKE vwipprodterm.cod_origen
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_origen IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_origen: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwipprodterm_cod_origen_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwipprodterm.origen" column
-#+
-#+ @param p_origen - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwipprodterm_origen_checkColumnConstraints(p_origen)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_origen LIKE vwipprodterm.origen
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwipprodterm_origen_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwipprodterm.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwipprodterm_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE vwipprodterm.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_n IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_n: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwipprodterm_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwipprodterm.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwipprodterm_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE vwipprodterm.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_grupo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_grupo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwipprodterm_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwipprodterm.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwipprodterm_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE vwipprodterm.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_tipo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_tipo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwipprodterm_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwipprodterm.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwipprodterm_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE vwipprodterm.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_sec IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_sec: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwipprodterm_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwipprodterm.descripcion" column
-#+
-#+ @param p_descripcion - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwipprodterm_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE vwipprodterm.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_descripcion IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- descripcion: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwipprodterm_descripcion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwipprodterm.unidad_med" column
-#+
-#+ @param p_unidad_med - CHAR(4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwipprodterm_unidad_med_checkColumnConstraints(p_unidad_med)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_unidad_med LIKE vwipprodterm.unidad_med
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwipprodterm_unidad_med_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwipprodterm.numero_doc" column
-#+
-#+ @param p_numero_doc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwipprodterm_numero_doc_checkColumnConstraints(p_numero_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_numero_doc LIKE vwipprodterm.numero_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_numero_doc IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- numero_doc: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwipprodterm_numero_doc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwipprodterm.orden_compra" column
-#+
-#+ @param p_orden_compra - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwipprodterm_orden_compra_checkColumnConstraints(p_orden_compra)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_orden_compra LIKE vwipprodterm.orden_compra
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwipprodterm_orden_compra_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwipprodterm.orden_pedido" column
-#+
-#+ @param p_orden_pedido - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwipprodterm_orden_pedido_checkColumnConstraints(p_orden_pedido)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_orden_pedido LIKE vwipprodterm.orden_pedido
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwipprodterm_orden_pedido_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwipprodterm.codigo_mov" column
-#+
-#+ @param p_codigo_mov - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwipprodterm_codigo_mov_checkColumnConstraints(p_codigo_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codigo_mov LIKE vwipprodterm.codigo_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_codigo_mov IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- codigo_mov: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwipprodterm_codigo_mov_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwipprodterm.descripcion_mov" column
-#+
-#+ @param p_descripcion_mov - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwipprodterm_descripcion_mov_checkColumnConstraints(p_descripcion_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion_mov LIKE vwipprodterm.descripcion_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwipprodterm_descripcion_mov_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwipprodterm.cantidad1" column
-#+
-#+ @param p_cantidad1 - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwipprodterm_cantidad1_checkColumnConstraints(p_cantidad1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad1 LIKE vwipprodterm.cantidad1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwipprodterm_cantidad1_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwipprodterm.cantidad2" column
-#+
-#+ @param p_cantidad2 - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwipprodterm_cantidad2_checkColumnConstraints(p_cantidad2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad2 LIKE vwipprodterm.cantidad2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cantidad2 IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cantidad2: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwipprodterm_cantidad2_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwipprodterm.costo_standard" column
-#+
-#+ @param p_costo_standard - DECIMAL(14,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwipprodterm_costo_standard_checkColumnConstraints(p_costo_standard)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_costo_standard LIKE vwipprodterm.costo_standard
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwipprodterm_costo_standard_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwipprodterm.valorstd" column
-#+
-#+ @param p_valorstd - DECIMAL(27,9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwipprodterm_valorstd_checkColumnConstraints(p_valorstd)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valorstd LIKE vwipprodterm.valorstd
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwipprodterm_valorstd_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwipprodterm.producto" column
-#+
-#+ @param p_producto - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwipprodterm_producto_checkColumnConstraints(p_producto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_producto LIKE vwipprodterm.producto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwipprodterm_producto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwipconteopda" table
-#+
-#+ @param p_data - a row data LIKE vwipconteopda.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwipconteopda_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vwipconteopda.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vwipconteopda_idtrx_checkColumnConstraints(p_data.idtrx) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwipconteopda_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwipconteopda_bodega_checkColumnConstraints(p_data.bodega) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwipconteopda_cod_seccion_checkColumnConstraints(p_data.cod_seccion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwipconteopda_cod_tramo_checkColumnConstraints(p_data.cod_tramo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwipconteopda_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwipconteopda_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwipconteopda_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwipconteopda_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwipconteopda_descrip_esp_checkColumnConstraints(p_data.descrip_esp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwipconteopda_almacen_checkColumnConstraints(p_data.almacen) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwipconteopda_seccion_checkColumnConstraints(p_data.seccion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwipconteopda_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwipconteopda_usariopda_checkColumnConstraints(p_data.usariopda) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwipconteopda_fecharegistro_checkColumnConstraints(p_data.fecharegistro) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwipconteopda_checkTableConstraints
-
-{}
-#+ Check constraints on the "vwipconteopda.idtrx" column
-#+
-#+ @param p_idtrx - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwipconteopda_idtrx_checkColumnConstraints(p_idtrx)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_idtrx LIKE vwipconteopda.idtrx
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwipconteopda_idtrx_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwipconteopda.fecha" column
-#+
-#+ @param p_fecha - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwipconteopda_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE vwipconteopda.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwipconteopda_fecha_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwipconteopda.bodega" column
-#+
-#+ @param p_bodega - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwipconteopda_bodega_checkColumnConstraints(p_bodega)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_bodega LIKE vwipconteopda.bodega
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwipconteopda_bodega_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwipconteopda.cod_seccion" column
-#+
-#+ @param p_cod_seccion - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwipconteopda_cod_seccion_checkColumnConstraints(p_cod_seccion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_seccion LIKE vwipconteopda.cod_seccion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwipconteopda_cod_seccion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwipconteopda.cod_tramo" column
-#+
-#+ @param p_cod_tramo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwipconteopda_cod_tramo_checkColumnConstraints(p_cod_tramo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tramo LIKE vwipconteopda.cod_tramo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwipconteopda_cod_tramo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwipconteopda.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwipconteopda_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE vwipconteopda.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwipconteopda_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwipconteopda.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwipconteopda_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE vwipconteopda.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwipconteopda_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwipconteopda.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwipconteopda_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE vwipconteopda.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwipconteopda_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwipconteopda.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwipconteopda_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE vwipconteopda.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwipconteopda_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwipconteopda.descrip_esp" column
-#+
-#+ @param p_descrip_esp - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwipconteopda_descrip_esp_checkColumnConstraints(p_descrip_esp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descrip_esp LIKE vwipconteopda.descrip_esp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_descrip_esp IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- descrip_esp: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwipconteopda_descrip_esp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwipconteopda.almacen" column
-#+
-#+ @param p_almacen - VARCHAR2(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwipconteopda_almacen_checkColumnConstraints(p_almacen)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_almacen LIKE vwipconteopda.almacen
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwipconteopda_almacen_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwipconteopda.seccion" column
-#+
-#+ @param p_seccion - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwipconteopda_seccion_checkColumnConstraints(p_seccion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_seccion LIKE vwipconteopda.seccion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwipconteopda_seccion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwipconteopda.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwipconteopda_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE vwipconteopda.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwipconteopda_cantidad_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwipconteopda.usariopda" column
-#+
-#+ @param p_usariopda - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwipconteopda_usariopda_checkColumnConstraints(p_usariopda)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_usariopda LIKE vwipconteopda.usariopda
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwipconteopda_usariopda_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwipconteopda.fecharegistro" column
-#+
-#+ @param p_fecharegistro - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwipconteopda_fecharegistro_checkColumnConstraints(p_fecharegistro)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecharegistro LIKE vwipconteopda.fecharegistro
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwipconteopda_fecharegistro_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwestadoordenes" table
-#+
-#+ @param p_data - a row data LIKE vwestadoordenes.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwestadoordenes_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vwestadoordenes.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vwestadoordenes_orden_checkColumnConstraints(p_data.orden) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwestadoordenes_fecha_orden_checkColumnConstraints(p_data.fecha_orden) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwestadoordenes_estatus_checkColumnConstraints(p_data.estatus) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwestadoordenes_cliente_checkColumnConstraints(p_data.cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwestadoordenes_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwestadoordenes_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwestadoordenes_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwestadoordenes_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwestadoordenes_producto_checkColumnConstraints(p_data.producto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwestadoordenes_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwestadoordenes_ano_checkColumnConstraints(p_data.ano) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwestadoordenes_numero_mes_checkColumnConstraints(p_data.numero_mes) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwestadoordenes_mes_checkColumnConstraints(p_data.mes) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwestadoordenes_cantidaddespacho_checkColumnConstraints(p_data.cantidaddespacho) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwestadoordenes_num_doc_checkColumnConstraints(p_data.num_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwestadoordenes_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwestadoordenes_cod_mov_checkColumnConstraints(p_data.cod_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwestadoordenes_detalle_checkColumnConstraints(p_data.detalle) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwestadoordenes_area_checkColumnConstraints(p_data.area) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwestadoordenes_vendedor_checkColumnConstraints(p_data.vendedor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwestadoordenes_cotizacion_no_checkColumnConstraints(p_data.cotizacion_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwestadoordenes_fecha_compromiso_checkColumnConstraints(p_data.fecha_compromiso) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwestadoordenes_estado_produccion_checkColumnConstraints(p_data.estado_produccion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwestadoordenes_checkTableConstraints
-
-{}
-#+ Check constraints on the "vwestadoordenes.orden" column
-#+
-#+ @param p_orden - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwestadoordenes_orden_checkColumnConstraints(p_orden)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_orden LIKE vwestadoordenes.orden
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_orden IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- orden: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwestadoordenes_orden_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwestadoordenes.fecha_orden" column
-#+
-#+ @param p_fecha_orden - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwestadoordenes_fecha_orden_checkColumnConstraints(p_fecha_orden)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_orden LIKE vwestadoordenes.fecha_orden
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_fecha_orden IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- fecha_orden: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwestadoordenes_fecha_orden_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwestadoordenes.estatus" column
-#+
-#+ @param p_estatus - VARCHAR2(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwestadoordenes_estatus_checkColumnConstraints(p_estatus)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_estatus LIKE vwestadoordenes.estatus
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_estatus IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- estatus: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwestadoordenes_estatus_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwestadoordenes.cliente" column
-#+
-#+ @param p_cliente - CHAR(100) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwestadoordenes_cliente_checkColumnConstraints(p_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cliente LIKE vwestadoordenes.cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwestadoordenes_cliente_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwestadoordenes.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwestadoordenes_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE vwestadoordenes.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_n IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_n: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwestadoordenes_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwestadoordenes.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwestadoordenes_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE vwestadoordenes.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_grupo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_grupo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwestadoordenes_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwestadoordenes.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwestadoordenes_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE vwestadoordenes.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_tipo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_tipo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwestadoordenes_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwestadoordenes.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwestadoordenes_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE vwestadoordenes.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_sec IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_sec: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwestadoordenes_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwestadoordenes.producto" column
-#+
-#+ @param p_producto - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwestadoordenes_producto_checkColumnConstraints(p_producto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_producto LIKE vwestadoordenes.producto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_producto IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- producto: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwestadoordenes_producto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwestadoordenes.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwestadoordenes_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE vwestadoordenes.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwestadoordenes_cantidad_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwestadoordenes.ano" column
-#+
-#+ @param p_ano - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwestadoordenes_ano_checkColumnConstraints(p_ano)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ano LIKE vwestadoordenes.ano
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwestadoordenes_ano_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwestadoordenes.numero_mes" column
-#+
-#+ @param p_numero_mes - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwestadoordenes_numero_mes_checkColumnConstraints(p_numero_mes)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_numero_mes LIKE vwestadoordenes.numero_mes
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwestadoordenes_numero_mes_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwestadoordenes.mes" column
-#+
-#+ @param p_mes - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwestadoordenes_mes_checkColumnConstraints(p_mes)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mes LIKE vwestadoordenes.mes
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwestadoordenes_mes_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwestadoordenes.cantidaddespacho" column
-#+
-#+ @param p_cantidaddespacho - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwestadoordenes_cantidaddespacho_checkColumnConstraints(p_cantidaddespacho)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidaddespacho LIKE vwestadoordenes.cantidaddespacho
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwestadoordenes_cantidaddespacho_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwestadoordenes.num_doc" column
-#+
-#+ @param p_num_doc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwestadoordenes_num_doc_checkColumnConstraints(p_num_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_doc LIKE vwestadoordenes.num_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwestadoordenes_num_doc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwestadoordenes.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwestadoordenes_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE vwestadoordenes.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwestadoordenes_fecha_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwestadoordenes.cod_mov" column
-#+
-#+ @param p_cod_mov - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwestadoordenes_cod_mov_checkColumnConstraints(p_cod_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mov LIKE vwestadoordenes.cod_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwestadoordenes_cod_mov_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwestadoordenes.detalle" column
-#+
-#+ @param p_detalle - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwestadoordenes_detalle_checkColumnConstraints(p_detalle)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_detalle LIKE vwestadoordenes.detalle
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwestadoordenes_detalle_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwestadoordenes.area" column
-#+
-#+ @param p_area - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwestadoordenes_area_checkColumnConstraints(p_area)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_area LIKE vwestadoordenes.area
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwestadoordenes_area_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwestadoordenes.vendedor" column
-#+
-#+ @param p_vendedor - VARCHAR2(63) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwestadoordenes_vendedor_checkColumnConstraints(p_vendedor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_vendedor LIKE vwestadoordenes.vendedor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwestadoordenes_vendedor_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwestadoordenes.cotizacion_no" column
-#+
-#+ @param p_cotizacion_no - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwestadoordenes_cotizacion_no_checkColumnConstraints(p_cotizacion_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cotizacion_no LIKE vwestadoordenes.cotizacion_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwestadoordenes_cotizacion_no_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwestadoordenes.fecha_compromiso" column
-#+
-#+ @param p_fecha_compromiso - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwestadoordenes_fecha_compromiso_checkColumnConstraints(p_fecha_compromiso)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_compromiso LIKE vwestadoordenes.fecha_compromiso
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwestadoordenes_fecha_compromiso_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwestadoordenes.estado_produccion" column
-#+
-#+ @param p_estado_produccion - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwestadoordenes_estado_produccion_checkColumnConstraints(p_estado_produccion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_estado_produccion LIKE vwestadoordenes.estado_produccion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwestadoordenes_estado_produccion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwestado" table
-#+
-#+ @param p_data - a row data LIKE vwestado.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwestado_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vwestado.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vwestado_cuenta_no_checkColumnConstraints(p_data.cuenta_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwestado_estado_a_checkColumnConstraints(p_data.estado_a) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwestado_estado_m_checkColumnConstraints(p_data.estado_m) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwestado_balance_ant_checkColumnConstraints(p_data.balance_ant) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwestado_actividad_checkColumnConstraints(p_data.actividad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwestado_balance_act_checkColumnConstraints(p_data.balance_act) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwestado_checkTableConstraints
-
-{}
-#+ Check constraints on the "vwestado.cuenta_no" column
-#+
-#+ @param p_cuenta_no - CHAR(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwestado_cuenta_no_checkColumnConstraints(p_cuenta_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cuenta_no LIKE vwestado.cuenta_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwestado_cuenta_no_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwestado.estado_a" column
-#+
-#+ @param p_estado_a - CHAR(4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwestado_estado_a_checkColumnConstraints(p_estado_a)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_estado_a LIKE vwestado.estado_a
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwestado_estado_a_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwestado.estado_m" column
-#+
-#+ @param p_estado_m - CHAR(4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwestado_estado_m_checkColumnConstraints(p_estado_m)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_estado_m LIKE vwestado.estado_m
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwestado_estado_m_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwestado.balance_ant" column
-#+
-#+ @param p_balance_ant - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwestado_balance_ant_checkColumnConstraints(p_balance_ant)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_balance_ant LIKE vwestado.balance_ant
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwestado_balance_ant_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwestado.actividad" column
-#+
-#+ @param p_actividad - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwestado_actividad_checkColumnConstraints(p_actividad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_actividad LIKE vwestado.actividad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwestado_actividad_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwestado.balance_act" column
-#+
-#+ @param p_balance_act - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwestado_balance_act_checkColumnConstraints(p_balance_act)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_balance_act LIKE vwestado.balance_act
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwestado_balance_act_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwcxc" table
-#+
-#+ @param p_data - a row data LIKE vwcxc.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcxc_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vwcxc.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vwcxc_fecha_orig_checkColumnConstraints(p_data.fecha_orig) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcxc_fecha_ven_checkColumnConstraints(p_data.fecha_ven) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcxc_num_doc_checkColumnConstraints(p_data.num_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcxc_tipodocumento_checkColumnConstraints(p_data.tipodocumento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcxc_tipo_cliente_checkColumnConstraints(p_data.tipo_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcxc_sec_cliente_checkColumnConstraints(p_data.sec_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcxc_valor_checkColumnConstraints(p_data.valor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcxc_monto_desc_checkColumnConstraints(p_data.monto_desc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcxc_cliente_checkColumnConstraints(p_data.cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcxc_ano_checkColumnConstraints(p_data.ano) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcxc_numeromes_checkColumnConstraints(p_data.numeromes) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcxc_mes_checkColumnConstraints(p_data.mes) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcxc_codigovendedor_checkColumnConstraints(p_data.codigovendedor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcxc_vendedor_checkColumnConstraints(p_data.vendedor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcxc_balance_checkColumnConstraints(p_data.balance) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcxc_fecha_corte_checkColumnConstraints(p_data.fecha_corte) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcxc_documentoaplica_checkColumnConstraints(p_data.documentoaplica) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwcxc_checkTableConstraints
-
-{}
-#+ Check constraints on the "vwcxc.fecha_orig" column
-#+
-#+ @param p_fecha_orig - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcxc_fecha_orig_checkColumnConstraints(p_fecha_orig)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_orig LIKE vwcxc.fecha_orig
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwcxc_fecha_orig_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwcxc.fecha_ven" column
-#+
-#+ @param p_fecha_ven - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcxc_fecha_ven_checkColumnConstraints(p_fecha_ven)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_ven LIKE vwcxc.fecha_ven
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwcxc_fecha_ven_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwcxc.num_doc" column
-#+
-#+ @param p_num_doc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcxc_num_doc_checkColumnConstraints(p_num_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_doc LIKE vwcxc.num_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_num_doc IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- num_doc: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwcxc_num_doc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwcxc.tipodocumento" column
-#+
-#+ @param p_tipodocumento - CHAR(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcxc_tipodocumento_checkColumnConstraints(p_tipodocumento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipodocumento LIKE vwcxc.tipodocumento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwcxc_tipodocumento_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwcxc.tipo_cliente" column
-#+
-#+ @param p_tipo_cliente - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcxc_tipo_cliente_checkColumnConstraints(p_tipo_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_cliente LIKE vwcxc.tipo_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwcxc_tipo_cliente_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwcxc.sec_cliente" column
-#+
-#+ @param p_sec_cliente - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcxc_sec_cliente_checkColumnConstraints(p_sec_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_cliente LIKE vwcxc.sec_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwcxc_sec_cliente_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwcxc.valor" column
-#+
-#+ @param p_valor - DECIMAL(14,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcxc_valor_checkColumnConstraints(p_valor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valor LIKE vwcxc.valor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwcxc_valor_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwcxc.monto_desc" column
-#+
-#+ @param p_monto_desc - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcxc_monto_desc_checkColumnConstraints(p_monto_desc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_monto_desc LIKE vwcxc.monto_desc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwcxc_monto_desc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwcxc.cliente" column
-#+
-#+ @param p_cliente - CHAR(100) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcxc_cliente_checkColumnConstraints(p_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cliente LIKE vwcxc.cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwcxc_cliente_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwcxc.ano" column
-#+
-#+ @param p_ano - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcxc_ano_checkColumnConstraints(p_ano)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ano LIKE vwcxc.ano
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwcxc_ano_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwcxc.numeromes" column
-#+
-#+ @param p_numeromes - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcxc_numeromes_checkColumnConstraints(p_numeromes)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_numeromes LIKE vwcxc.numeromes
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwcxc_numeromes_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwcxc.mes" column
-#+
-#+ @param p_mes - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcxc_mes_checkColumnConstraints(p_mes)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mes LIKE vwcxc.mes
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwcxc_mes_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwcxc.codigovendedor" column
-#+
-#+ @param p_codigovendedor - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcxc_codigovendedor_checkColumnConstraints(p_codigovendedor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codigovendedor LIKE vwcxc.codigovendedor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_codigovendedor IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- codigovendedor: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwcxc_codigovendedor_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwcxc.vendedor" column
-#+
-#+ @param p_vendedor - VARCHAR2(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcxc_vendedor_checkColumnConstraints(p_vendedor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_vendedor LIKE vwcxc.vendedor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwcxc_vendedor_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwcxc.balance" column
-#+
-#+ @param p_balance - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcxc_balance_checkColumnConstraints(p_balance)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_balance LIKE vwcxc.balance
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwcxc_balance_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwcxc.fecha_corte" column
-#+
-#+ @param p_fecha_corte - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcxc_fecha_corte_checkColumnConstraints(p_fecha_corte)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_corte LIKE vwcxc.fecha_corte
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwcxc_fecha_corte_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwcxc.documentoaplica" column
-#+
-#+ @param p_documentoaplica - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcxc_documentoaplica_checkColumnConstraints(p_documentoaplica)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_documentoaplica LIKE vwcxc.documentoaplica
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwcxc_documentoaplica_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwcontactosclientes" table
-#+
-#+ @param p_data - a row data LIKE vwcontactosclientes.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcontactosclientes_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vwcontactosclientes.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vwcontactosclientes_codigovendedor_checkColumnConstraints(p_data.codigovendedor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcontactosclientes_vendedor_checkColumnConstraints(p_data.vendedor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcontactosclientes_clientes_checkColumnConstraints(p_data.clientes) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcontactosclientes_contactos_checkColumnConstraints(p_data.contactos) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcontactosclientes_tiponegocio_checkColumnConstraints(p_data.tiponegocio) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcontactosclientes_nombrecliente_checkColumnConstraints(p_data.nombrecliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwcontactosclientes_checkTableConstraints
-
-{}
-#+ Check constraints on the "vwcontactosclientes.codigovendedor" column
-#+
-#+ @param p_codigovendedor - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcontactosclientes_codigovendedor_checkColumnConstraints(p_codigovendedor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codigovendedor LIKE vwcontactosclientes.codigovendedor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_codigovendedor IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- codigovendedor: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwcontactosclientes_codigovendedor_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwcontactosclientes.vendedor" column
-#+
-#+ @param p_vendedor - VARCHAR2(31) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcontactosclientes_vendedor_checkColumnConstraints(p_vendedor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_vendedor LIKE vwcontactosclientes.vendedor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_vendedor IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- vendedor: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwcontactosclientes_vendedor_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwcontactosclientes.clientes" column
-#+
-#+ @param p_clientes - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcontactosclientes_clientes_checkColumnConstraints(p_clientes)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_clientes LIKE vwcontactosclientes.clientes
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwcontactosclientes_clientes_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwcontactosclientes.contactos" column
-#+
-#+ @param p_contactos - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcontactosclientes_contactos_checkColumnConstraints(p_contactos)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_contactos LIKE vwcontactosclientes.contactos
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwcontactosclientes_contactos_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwcontactosclientes.tiponegocio" column
-#+
-#+ @param p_tiponegocio - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcontactosclientes_tiponegocio_checkColumnConstraints(p_tiponegocio)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tiponegocio LIKE vwcontactosclientes.tiponegocio
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_tiponegocio IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- tiponegocio: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwcontactosclientes_tiponegocio_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwcontactosclientes.nombrecliente" column
-#+
-#+ @param p_nombrecliente - CHAR(100) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcontactosclientes_nombrecliente_checkColumnConstraints(p_nombrecliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombrecliente LIKE vwcontactosclientes.nombrecliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwcontactosclientes_nombrecliente_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwconduces" table
-#+
-#+ @param p_data - a row data LIKE vwconduces.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwconduces_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vwconduces.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vwconduces_ano_checkColumnConstraints(p_data.ano) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwconduces_mes_checkColumnConstraints(p_data.mes) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwconduces_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwconduces_documento_checkColumnConstraints(p_data.documento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwconduces_orden_checkColumnConstraints(p_data.orden) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwconduces_codigomov_checkColumnConstraints(p_data.codigomov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwconduces_descripcionmov_checkColumnConstraints(p_data.descripcionmov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwconduces_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwconduces_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwconduces_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwconduces_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwconduces_descripcionprod_checkColumnConstraints(p_data.descripcionprod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwconduces_unidadmed_checkColumnConstraints(p_data.unidadmed) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwconduces_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwconduces_fechafactura_checkColumnConstraints(p_data.fechafactura) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwconduces_factura_checkColumnConstraints(p_data.factura) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwconduces_nombrecliente_checkColumnConstraints(p_data.nombrecliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwconduces_tipocliente_checkColumnConstraints(p_data.tipocliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwconduces_codigocliente_checkColumnConstraints(p_data.codigocliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwconduces_neto_checkColumnConstraints(p_data.neto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwconduces_estado_checkColumnConstraints(p_data.estado) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwconduces_usuario_checkColumnConstraints(p_data.usuario) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwconduces_checkTableConstraints
-
-{}
-#+ Check constraints on the "vwconduces.ano" column
-#+
-#+ @param p_ano - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwconduces_ano_checkColumnConstraints(p_ano)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ano LIKE vwconduces.ano
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwconduces_ano_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwconduces.mes" column
-#+
-#+ @param p_mes - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwconduces_mes_checkColumnConstraints(p_mes)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mes LIKE vwconduces.mes
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwconduces_mes_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwconduces.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwconduces_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE vwconduces.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_fecha IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- fecha: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwconduces_fecha_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwconduces.documento" column
-#+
-#+ @param p_documento - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwconduces_documento_checkColumnConstraints(p_documento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_documento LIKE vwconduces.documento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_documento IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- documento: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwconduces_documento_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwconduces.orden" column
-#+
-#+ @param p_orden - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwconduces_orden_checkColumnConstraints(p_orden)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_orden LIKE vwconduces.orden
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwconduces_orden_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwconduces.codigomov" column
-#+
-#+ @param p_codigomov - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwconduces_codigomov_checkColumnConstraints(p_codigomov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codigomov LIKE vwconduces.codigomov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_codigomov IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- codigomov: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwconduces_codigomov_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwconduces.descripcionmov" column
-#+
-#+ @param p_descripcionmov - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwconduces_descripcionmov_checkColumnConstraints(p_descripcionmov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcionmov LIKE vwconduces.descripcionmov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwconduces_descripcionmov_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwconduces.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwconduces_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE vwconduces.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_n IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_n: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwconduces_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwconduces.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwconduces_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE vwconduces.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_grupo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_grupo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwconduces_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwconduces.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwconduces_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE vwconduces.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_tipo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_tipo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwconduces_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwconduces.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwconduces_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE vwconduces.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_sec IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_sec: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwconduces_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwconduces.descripcionprod" column
-#+
-#+ @param p_descripcionprod - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwconduces_descripcionprod_checkColumnConstraints(p_descripcionprod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcionprod LIKE vwconduces.descripcionprod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_descripcionprod IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- descripcionprod: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwconduces_descripcionprod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwconduces.unidadmed" column
-#+
-#+ @param p_unidadmed - CHAR(4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwconduces_unidadmed_checkColumnConstraints(p_unidadmed)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_unidadmed LIKE vwconduces.unidadmed
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwconduces_unidadmed_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwconduces.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwconduces_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE vwconduces.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cantidad IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cantidad: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwconduces_cantidad_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwconduces.fechafactura" column
-#+
-#+ @param p_fechafactura - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwconduces_fechafactura_checkColumnConstraints(p_fechafactura)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fechafactura LIKE vwconduces.fechafactura
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwconduces_fechafactura_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwconduces.factura" column
-#+
-#+ @param p_factura - CHAR(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwconduces_factura_checkColumnConstraints(p_factura)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_factura LIKE vwconduces.factura
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_factura IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- factura: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwconduces_factura_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwconduces.nombrecliente" column
-#+
-#+ @param p_nombrecliente - CHAR(100) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwconduces_nombrecliente_checkColumnConstraints(p_nombrecliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombrecliente LIKE vwconduces.nombrecliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwconduces_nombrecliente_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwconduces.tipocliente" column
-#+
-#+ @param p_tipocliente - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwconduces_tipocliente_checkColumnConstraints(p_tipocliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipocliente LIKE vwconduces.tipocliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_tipocliente IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- tipocliente: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwconduces_tipocliente_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwconduces.codigocliente" column
-#+
-#+ @param p_codigocliente - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwconduces_codigocliente_checkColumnConstraints(p_codigocliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codigocliente LIKE vwconduces.codigocliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_codigocliente IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- codigocliente: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwconduces_codigocliente_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwconduces.neto" column
-#+
-#+ @param p_neto - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwconduces_neto_checkColumnConstraints(p_neto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_neto LIKE vwconduces.neto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwconduces_neto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwconduces.estado" column
-#+
-#+ @param p_estado - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwconduces_estado_checkColumnConstraints(p_estado)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_estado LIKE vwconduces.estado
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwconduces_estado_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwconduces.usuario" column
-#+
-#+ @param p_usuario - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwconduces_usuario_checkColumnConstraints(p_usuario)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_usuario LIKE vwconduces.usuario
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwconduces_usuario_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwcompras" table
-#+
-#+ @param p_data - a row data LIKE vwcompras.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcompras_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vwcompras.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vwcompras_tipoorden_checkColumnConstraints(p_data.tipoorden) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcompras_cod_sp_checkColumnConstraints(p_data.cod_sp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcompras_cod_sp_sec_checkColumnConstraints(p_data.cod_sp_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcompras_ano_checkColumnConstraints(p_data.ano) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcompras_mes_checkColumnConstraints(p_data.mes) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcompras_num_oc_checkColumnConstraints(p_data.num_oc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcompras_fech_oc_checkColumnConstraints(p_data.fech_oc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcompras_nom_sp_checkColumnConstraints(p_data.nom_sp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcompras_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcompras_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcompras_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcompras_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcompras_material_checkColumnConstraints(p_data.material) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcompras_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcompras_precio_checkColumnConstraints(p_data.precio) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcompras_otrarefencia_checkColumnConstraints(p_data.otrarefencia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcompras_proforma_checkColumnConstraints(p_data.proforma) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwcompras_checkTableConstraints
-
-{}
-#+ Check constraints on the "vwcompras.tipoorden" column
-#+
-#+ @param p_tipoorden - VARCHAR2(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcompras_tipoorden_checkColumnConstraints(p_tipoorden)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipoorden LIKE vwcompras.tipoorden
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_tipoorden IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- tipoorden: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwcompras_tipoorden_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwcompras.cod_sp" column
-#+
-#+ @param p_cod_sp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcompras_cod_sp_checkColumnConstraints(p_cod_sp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sp LIKE vwcompras.cod_sp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwcompras_cod_sp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwcompras.cod_sp_sec" column
-#+
-#+ @param p_cod_sp_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcompras_cod_sp_sec_checkColumnConstraints(p_cod_sp_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sp_sec LIKE vwcompras.cod_sp_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwcompras_cod_sp_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwcompras.ano" column
-#+
-#+ @param p_ano - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcompras_ano_checkColumnConstraints(p_ano)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ano LIKE vwcompras.ano
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwcompras_ano_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwcompras.mes" column
-#+
-#+ @param p_mes - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcompras_mes_checkColumnConstraints(p_mes)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mes LIKE vwcompras.mes
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwcompras_mes_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwcompras.num_oc" column
-#+
-#+ @param p_num_oc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcompras_num_oc_checkColumnConstraints(p_num_oc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_oc LIKE vwcompras.num_oc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_num_oc IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- num_oc: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwcompras_num_oc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwcompras.fech_oc" column
-#+
-#+ @param p_fech_oc - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcompras_fech_oc_checkColumnConstraints(p_fech_oc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_oc LIKE vwcompras.fech_oc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwcompras_fech_oc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwcompras.nom_sp" column
-#+
-#+ @param p_nom_sp - VARCHAR2(41) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcompras_nom_sp_checkColumnConstraints(p_nom_sp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nom_sp LIKE vwcompras.nom_sp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwcompras_nom_sp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwcompras.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcompras_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE vwcompras.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_n IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_n: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwcompras_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwcompras.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcompras_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE vwcompras.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_grupo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_grupo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwcompras_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwcompras.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcompras_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE vwcompras.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_tipo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_tipo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwcompras_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwcompras.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcompras_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE vwcompras.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_sec IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_sec: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwcompras_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwcompras.material" column
-#+
-#+ @param p_material - VARCHAR2(105) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcompras_material_checkColumnConstraints(p_material)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_material LIKE vwcompras.material
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwcompras_material_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwcompras.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcompras_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE vwcompras.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwcompras_cantidad_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwcompras.precio" column
-#+
-#+ @param p_precio - DECIMAL(11,3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcompras_precio_checkColumnConstraints(p_precio)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_precio LIKE vwcompras.precio
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwcompras_precio_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwcompras.otrarefencia" column
-#+
-#+ @param p_otrarefencia - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcompras_otrarefencia_checkColumnConstraints(p_otrarefencia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_otrarefencia LIKE vwcompras.otrarefencia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwcompras_otrarefencia_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwcompras.proforma" column
-#+
-#+ @param p_proforma - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcompras_proforma_checkColumnConstraints(p_proforma)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_proforma LIKE vwcompras.proforma
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwcompras_proforma_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwcomisiones" table
-#+
-#+ @param p_data - a row data LIKE vwcomisiones.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcomisiones_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vwcomisiones.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vwcomisiones_tipoventas_checkColumnConstraints(p_data.tipoventas) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcomisiones_tipo_cliente_checkColumnConstraints(p_data.tipo_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcomisiones_sec_cliente_checkColumnConstraints(p_data.sec_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcomisiones_nombre_checkColumnConstraints(p_data.nombre) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcomisiones_sec_vend_checkColumnConstraints(p_data.sec_vend) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcomisiones_nombrev_checkColumnConstraints(p_data.nombrev) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcomisiones_apellidov_checkColumnConstraints(p_data.apellidov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcomisiones_porc_comisionv_checkColumnConstraints(p_data.porc_comisionv) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcomisiones_sec_vend_a_checkColumnConstraints(p_data.sec_vend_a) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcomisiones_nombre_a_checkColumnConstraints(p_data.nombre_a) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcomisiones_apellido_a_checkColumnConstraints(p_data.apellido_a) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcomisiones_porc_comisiona_checkColumnConstraints(p_data.porc_comisiona) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcomisiones_tipodocumento_checkColumnConstraints(p_data.tipodocumento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcomisiones_tipo_doc_checkColumnConstraints(p_data.tipo_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcomisiones_documento_checkColumnConstraints(p_data.documento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcomisiones_valor_checkColumnConstraints(p_data.valor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcomisiones_valor_itbi_checkColumnConstraints(p_data.valor_itbi) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcomisiones_aplica_a_checkColumnConstraints(p_data.aplica_a) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcomisiones_fechafactura_checkColumnConstraints(p_data.fechafactura) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcomisiones_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcomisiones_ano_checkColumnConstraints(p_data.ano) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcomisiones_numeromes_checkColumnConstraints(p_data.numeromes) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcomisiones_mes_checkColumnConstraints(p_data.mes) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcomisiones_valor1_checkColumnConstraints(p_data.valor1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcomisiones_valor2_checkColumnConstraints(p_data.valor2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcomisiones_valor_orig_checkColumnConstraints(p_data.valor_orig) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcomisiones_tasa_checkColumnConstraints(p_data.tasa) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcomisiones_chitbis_checkColumnConstraints(p_data.chitbis) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwcomisiones_checkTableConstraints
-
-{}
-#+ Check constraints on the "vwcomisiones.tipoventas" column
-#+
-#+ @param p_tipoventas - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcomisiones_tipoventas_checkColumnConstraints(p_tipoventas)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipoventas LIKE vwcomisiones.tipoventas
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwcomisiones_tipoventas_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwcomisiones.tipo_cliente" column
-#+
-#+ @param p_tipo_cliente - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcomisiones_tipo_cliente_checkColumnConstraints(p_tipo_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_cliente LIKE vwcomisiones.tipo_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwcomisiones_tipo_cliente_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwcomisiones.sec_cliente" column
-#+
-#+ @param p_sec_cliente - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcomisiones_sec_cliente_checkColumnConstraints(p_sec_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_cliente LIKE vwcomisiones.sec_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwcomisiones_sec_cliente_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwcomisiones.nombre" column
-#+
-#+ @param p_nombre - CHAR(90) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcomisiones_nombre_checkColumnConstraints(p_nombre)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombre LIKE vwcomisiones.nombre
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwcomisiones_nombre_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwcomisiones.sec_vend" column
-#+
-#+ @param p_sec_vend - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcomisiones_sec_vend_checkColumnConstraints(p_sec_vend)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_vend LIKE vwcomisiones.sec_vend
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwcomisiones_sec_vend_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwcomisiones.nombrev" column
-#+
-#+ @param p_nombrev - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcomisiones_nombrev_checkColumnConstraints(p_nombrev)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombrev LIKE vwcomisiones.nombrev
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwcomisiones_nombrev_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwcomisiones.apellidov" column
-#+
-#+ @param p_apellidov - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcomisiones_apellidov_checkColumnConstraints(p_apellidov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_apellidov LIKE vwcomisiones.apellidov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwcomisiones_apellidov_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwcomisiones.porc_comisionv" column
-#+
-#+ @param p_porc_comisionv - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcomisiones_porc_comisionv_checkColumnConstraints(p_porc_comisionv)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_porc_comisionv LIKE vwcomisiones.porc_comisionv
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwcomisiones_porc_comisionv_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwcomisiones.sec_vend_a" column
-#+
-#+ @param p_sec_vend_a - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcomisiones_sec_vend_a_checkColumnConstraints(p_sec_vend_a)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_vend_a LIKE vwcomisiones.sec_vend_a
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwcomisiones_sec_vend_a_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwcomisiones.nombre_a" column
-#+
-#+ @param p_nombre_a - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcomisiones_nombre_a_checkColumnConstraints(p_nombre_a)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombre_a LIKE vwcomisiones.nombre_a
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwcomisiones_nombre_a_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwcomisiones.apellido_a" column
-#+
-#+ @param p_apellido_a - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcomisiones_apellido_a_checkColumnConstraints(p_apellido_a)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_apellido_a LIKE vwcomisiones.apellido_a
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwcomisiones_apellido_a_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwcomisiones.porc_comisiona" column
-#+
-#+ @param p_porc_comisiona - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcomisiones_porc_comisiona_checkColumnConstraints(p_porc_comisiona)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_porc_comisiona LIKE vwcomisiones.porc_comisiona
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwcomisiones_porc_comisiona_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwcomisiones.tipodocumento" column
-#+
-#+ @param p_tipodocumento - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcomisiones_tipodocumento_checkColumnConstraints(p_tipodocumento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipodocumento LIKE vwcomisiones.tipodocumento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwcomisiones_tipodocumento_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwcomisiones.tipo_doc" column
-#+
-#+ @param p_tipo_doc - CHAR(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcomisiones_tipo_doc_checkColumnConstraints(p_tipo_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_doc LIKE vwcomisiones.tipo_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwcomisiones_tipo_doc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwcomisiones.documento" column
-#+
-#+ @param p_documento - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcomisiones_documento_checkColumnConstraints(p_documento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_documento LIKE vwcomisiones.documento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwcomisiones_documento_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwcomisiones.valor" column
-#+
-#+ @param p_valor - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcomisiones_valor_checkColumnConstraints(p_valor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valor LIKE vwcomisiones.valor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwcomisiones_valor_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwcomisiones.valor_itbi" column
-#+
-#+ @param p_valor_itbi - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcomisiones_valor_itbi_checkColumnConstraints(p_valor_itbi)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valor_itbi LIKE vwcomisiones.valor_itbi
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwcomisiones_valor_itbi_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwcomisiones.aplica_a" column
-#+
-#+ @param p_aplica_a - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcomisiones_aplica_a_checkColumnConstraints(p_aplica_a)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_aplica_a LIKE vwcomisiones.aplica_a
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwcomisiones_aplica_a_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwcomisiones.fechafactura" column
-#+
-#+ @param p_fechafactura - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcomisiones_fechafactura_checkColumnConstraints(p_fechafactura)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fechafactura LIKE vwcomisiones.fechafactura
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwcomisiones_fechafactura_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwcomisiones.fecha" column
-#+
-#+ @param p_fecha - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcomisiones_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE vwcomisiones.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwcomisiones_fecha_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwcomisiones.ano" column
-#+
-#+ @param p_ano - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcomisiones_ano_checkColumnConstraints(p_ano)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ano LIKE vwcomisiones.ano
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwcomisiones_ano_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwcomisiones.numeromes" column
-#+
-#+ @param p_numeromes - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcomisiones_numeromes_checkColumnConstraints(p_numeromes)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_numeromes LIKE vwcomisiones.numeromes
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwcomisiones_numeromes_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwcomisiones.mes" column
-#+
-#+ @param p_mes - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcomisiones_mes_checkColumnConstraints(p_mes)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mes LIKE vwcomisiones.mes
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwcomisiones_mes_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwcomisiones.valor1" column
-#+
-#+ @param p_valor1 - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcomisiones_valor1_checkColumnConstraints(p_valor1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valor1 LIKE vwcomisiones.valor1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwcomisiones_valor1_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwcomisiones.valor2" column
-#+
-#+ @param p_valor2 - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcomisiones_valor2_checkColumnConstraints(p_valor2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valor2 LIKE vwcomisiones.valor2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwcomisiones_valor2_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwcomisiones.valor_orig" column
-#+
-#+ @param p_valor_orig - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcomisiones_valor_orig_checkColumnConstraints(p_valor_orig)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valor_orig LIKE vwcomisiones.valor_orig
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwcomisiones_valor_orig_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwcomisiones.tasa" column
-#+
-#+ @param p_tasa - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcomisiones_tasa_checkColumnConstraints(p_tasa)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tasa LIKE vwcomisiones.tasa
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwcomisiones_tasa_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwcomisiones.chitbis" column
-#+
-#+ @param p_chitbis - CHAR(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcomisiones_chitbis_checkColumnConstraints(p_chitbis)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_chitbis LIKE vwcomisiones.chitbis
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwcomisiones_chitbis_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwcodigosnuevos" table
-#+
-#+ @param p_data - a row data LIKE vwcodigosnuevos.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcodigosnuevos_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vwcodigosnuevos.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vwcodigosnuevos_cod1_checkColumnConstraints(p_data.cod1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcodigosnuevos_cod2_checkColumnConstraints(p_data.cod2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcodigosnuevos_cod3_checkColumnConstraints(p_data.cod3) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcodigosnuevos_cod4_checkColumnConstraints(p_data.cod4) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcodigosnuevos_codigonuevo_checkColumnConstraints(p_data.codigonuevo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcodigosnuevos_codigoviejo_checkColumnConstraints(p_data.codigoviejo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcodigosnuevos_cod_cia_checkColumnConstraints(p_data.cod_cia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcodigosnuevos_pcodn_checkColumnConstraints(p_data.pcodn) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcodigosnuevos_pcodgrupo_checkColumnConstraints(p_data.pcodgrupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcodigosnuevos_pcodtipo_checkColumnConstraints(p_data.pcodtipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcodigosnuevos_pcodsec_checkColumnConstraints(p_data.pcodsec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcodigosnuevos_material_checkColumnConstraints(p_data.material) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcodigosnuevos_labor_checkColumnConstraints(p_data.labor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcodigosnuevos_gastos_checkColumnConstraints(p_data.gastos) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcodigosnuevos_factor_checkColumnConstraints(p_data.factor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcodigosnuevos_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcodigosnuevos_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcodigosnuevos_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcodigosnuevos_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcodigosnuevos_existencia_checkColumnConstraints(p_data.existencia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwcodigosnuevos_checkTableConstraints
-
-{}
-#+ Check constraints on the "vwcodigosnuevos.cod1" column
-#+
-#+ @param p_cod1 - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcodigosnuevos_cod1_checkColumnConstraints(p_cod1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod1 LIKE vwcodigosnuevos.cod1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwcodigosnuevos_cod1_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwcodigosnuevos.cod2" column
-#+
-#+ @param p_cod2 - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcodigosnuevos_cod2_checkColumnConstraints(p_cod2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod2 LIKE vwcodigosnuevos.cod2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwcodigosnuevos_cod2_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwcodigosnuevos.cod3" column
-#+
-#+ @param p_cod3 - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcodigosnuevos_cod3_checkColumnConstraints(p_cod3)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod3 LIKE vwcodigosnuevos.cod3
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwcodigosnuevos_cod3_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwcodigosnuevos.cod4" column
-#+
-#+ @param p_cod4 - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcodigosnuevos_cod4_checkColumnConstraints(p_cod4)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod4 LIKE vwcodigosnuevos.cod4
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwcodigosnuevos_cod4_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwcodigosnuevos.codigonuevo" column
-#+
-#+ @param p_codigonuevo - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcodigosnuevos_codigonuevo_checkColumnConstraints(p_codigonuevo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codigonuevo LIKE vwcodigosnuevos.codigonuevo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwcodigosnuevos_codigonuevo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwcodigosnuevos.codigoviejo" column
-#+
-#+ @param p_codigoviejo - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcodigosnuevos_codigoviejo_checkColumnConstraints(p_codigoviejo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codigoviejo LIKE vwcodigosnuevos.codigoviejo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_codigoviejo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- codigoviejo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwcodigosnuevos_codigoviejo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwcodigosnuevos.cod_cia" column
-#+
-#+ @param p_cod_cia - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcodigosnuevos_cod_cia_checkColumnConstraints(p_cod_cia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_cia LIKE vwcodigosnuevos.cod_cia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwcodigosnuevos_cod_cia_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwcodigosnuevos.pcodn" column
-#+
-#+ @param p_pcodn - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcodigosnuevos_pcodn_checkColumnConstraints(p_pcodn)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_pcodn LIKE vwcodigosnuevos.pcodn
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwcodigosnuevos_pcodn_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwcodigosnuevos.pcodgrupo" column
-#+
-#+ @param p_pcodgrupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcodigosnuevos_pcodgrupo_checkColumnConstraints(p_pcodgrupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_pcodgrupo LIKE vwcodigosnuevos.pcodgrupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwcodigosnuevos_pcodgrupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwcodigosnuevos.pcodtipo" column
-#+
-#+ @param p_pcodtipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcodigosnuevos_pcodtipo_checkColumnConstraints(p_pcodtipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_pcodtipo LIKE vwcodigosnuevos.pcodtipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwcodigosnuevos_pcodtipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwcodigosnuevos.pcodsec" column
-#+
-#+ @param p_pcodsec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcodigosnuevos_pcodsec_checkColumnConstraints(p_pcodsec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_pcodsec LIKE vwcodigosnuevos.pcodsec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwcodigosnuevos_pcodsec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwcodigosnuevos.material" column
-#+
-#+ @param p_material - DECIMAL(18,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcodigosnuevos_material_checkColumnConstraints(p_material)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_material LIKE vwcodigosnuevos.material
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwcodigosnuevos_material_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwcodigosnuevos.labor" column
-#+
-#+ @param p_labor - DECIMAL(18,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcodigosnuevos_labor_checkColumnConstraints(p_labor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_labor LIKE vwcodigosnuevos.labor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwcodigosnuevos_labor_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwcodigosnuevos.gastos" column
-#+
-#+ @param p_gastos - DECIMAL(18,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcodigosnuevos_gastos_checkColumnConstraints(p_gastos)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_gastos LIKE vwcodigosnuevos.gastos
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwcodigosnuevos_gastos_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwcodigosnuevos.factor" column
-#+
-#+ @param p_factor - DECIMAL(18,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcodigosnuevos_factor_checkColumnConstraints(p_factor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_factor LIKE vwcodigosnuevos.factor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwcodigosnuevos_factor_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwcodigosnuevos.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcodigosnuevos_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE vwcodigosnuevos.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_n IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_n: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwcodigosnuevos_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwcodigosnuevos.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcodigosnuevos_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE vwcodigosnuevos.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_grupo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_grupo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwcodigosnuevos_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwcodigosnuevos.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcodigosnuevos_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE vwcodigosnuevos.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_tipo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_tipo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwcodigosnuevos_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwcodigosnuevos.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcodigosnuevos_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE vwcodigosnuevos.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_sec IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_sec: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwcodigosnuevos_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwcodigosnuevos.existencia" column
-#+
-#+ @param p_existencia - DECIMAL(38,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcodigosnuevos_existencia_checkColumnConstraints(p_existencia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_existencia LIKE vwcodigosnuevos.existencia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwcodigosnuevos_existencia_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwcobros" table
-#+
-#+ @param p_data - a row data LIKE vwcobros.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcobros_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vwcobros.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vwcobros_ficha_checkColumnConstraints(p_data.ficha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcobros_primernombre_checkColumnConstraints(p_data.primernombre) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcobros_primerapellido_checkColumnConstraints(p_data.primerapellido) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcobros_tipocobro_checkColumnConstraints(p_data.tipocobro) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcobros_valor_checkColumnConstraints(p_data.valor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcobros_valorrd_checkColumnConstraints(p_data.valorrd) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcobros_ano_checkColumnConstraints(p_data.ano) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcobros_numero_mes_checkColumnConstraints(p_data.numero_mes) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcobros_nombremes_checkColumnConstraints(p_data.nombremes) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcobros_nombresucursal_checkColumnConstraints(p_data.nombresucursal) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcobros_tasa_checkColumnConstraints(p_data.tasa) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcobros_ventas_checkColumnConstraints(p_data.ventas) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcobros_ocupacion_checkColumnConstraints(p_data.ocupacion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcobros_fecha_orig_checkColumnConstraints(p_data.fecha_orig) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcobros_num_doc_checkColumnConstraints(p_data.num_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcobros_tipo_doc_checkColumnConstraints(p_data.tipo_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcobros_tipo_cliente_checkColumnConstraints(p_data.tipo_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcobros_sec_cliente_checkColumnConstraints(p_data.sec_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcobros_nombre_checkColumnConstraints(p_data.nombre) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwcobros_checkTableConstraints
-
-{}
-#+ Check constraints on the "vwcobros.ficha" column
-#+
-#+ @param p_ficha - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcobros_ficha_checkColumnConstraints(p_ficha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ficha LIKE vwcobros.ficha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_ficha IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- ficha: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwcobros_ficha_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwcobros.primernombre" column
-#+
-#+ @param p_primernombre - CHAR(15) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcobros_primernombre_checkColumnConstraints(p_primernombre)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_primernombre LIKE vwcobros.primernombre
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwcobros_primernombre_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwcobros.primerapellido" column
-#+
-#+ @param p_primerapellido - CHAR(15) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcobros_primerapellido_checkColumnConstraints(p_primerapellido)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_primerapellido LIKE vwcobros.primerapellido
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwcobros_primerapellido_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwcobros.tipocobro" column
-#+
-#+ @param p_tipocobro - VARCHAR2(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcobros_tipocobro_checkColumnConstraints(p_tipocobro)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipocobro LIKE vwcobros.tipocobro
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwcobros_tipocobro_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwcobros.valor" column
-#+
-#+ @param p_valor - DECIMAL(38,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcobros_valor_checkColumnConstraints(p_valor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valor LIKE vwcobros.valor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwcobros_valor_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwcobros.valorrd" column
-#+
-#+ @param p_valorrd - DECIMAL(38,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcobros_valorrd_checkColumnConstraints(p_valorrd)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valorrd LIKE vwcobros.valorrd
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwcobros_valorrd_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwcobros.ano" column
-#+
-#+ @param p_ano - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcobros_ano_checkColumnConstraints(p_ano)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ano LIKE vwcobros.ano
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwcobros_ano_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwcobros.numero_mes" column
-#+
-#+ @param p_numero_mes - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcobros_numero_mes_checkColumnConstraints(p_numero_mes)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_numero_mes LIKE vwcobros.numero_mes
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwcobros_numero_mes_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwcobros.nombremes" column
-#+
-#+ @param p_nombremes - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcobros_nombremes_checkColumnConstraints(p_nombremes)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombremes LIKE vwcobros.nombremes
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwcobros_nombremes_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwcobros.nombresucursal" column
-#+
-#+ @param p_nombresucursal - VARCHAR2(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcobros_nombresucursal_checkColumnConstraints(p_nombresucursal)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombresucursal LIKE vwcobros.nombresucursal
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_nombresucursal IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- nombresucursal: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwcobros_nombresucursal_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwcobros.tasa" column
-#+
-#+ @param p_tasa - DECIMAL(12,3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcobros_tasa_checkColumnConstraints(p_tasa)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tasa LIKE vwcobros.tasa
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwcobros_tasa_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwcobros.ventas" column
-#+
-#+ @param p_ventas - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcobros_ventas_checkColumnConstraints(p_ventas)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ventas LIKE vwcobros.ventas
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwcobros_ventas_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwcobros.ocupacion" column
-#+
-#+ @param p_ocupacion - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcobros_ocupacion_checkColumnConstraints(p_ocupacion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ocupacion LIKE vwcobros.ocupacion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwcobros_ocupacion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwcobros.fecha_orig" column
-#+
-#+ @param p_fecha_orig - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcobros_fecha_orig_checkColumnConstraints(p_fecha_orig)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_orig LIKE vwcobros.fecha_orig
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwcobros_fecha_orig_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwcobros.num_doc" column
-#+
-#+ @param p_num_doc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcobros_num_doc_checkColumnConstraints(p_num_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_doc LIKE vwcobros.num_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_num_doc IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- num_doc: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwcobros_num_doc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwcobros.tipo_doc" column
-#+
-#+ @param p_tipo_doc - CHAR(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcobros_tipo_doc_checkColumnConstraints(p_tipo_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_doc LIKE vwcobros.tipo_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwcobros_tipo_doc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwcobros.tipo_cliente" column
-#+
-#+ @param p_tipo_cliente - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcobros_tipo_cliente_checkColumnConstraints(p_tipo_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_cliente LIKE vwcobros.tipo_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwcobros_tipo_cliente_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwcobros.sec_cliente" column
-#+
-#+ @param p_sec_cliente - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcobros_sec_cliente_checkColumnConstraints(p_sec_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_cliente LIKE vwcobros.sec_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwcobros_sec_cliente_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwcobros.nombre" column
-#+
-#+ @param p_nombre - CHAR(100) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcobros_nombre_checkColumnConstraints(p_nombre)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombre LIKE vwcobros.nombre
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwcobros_nombre_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwclientesnocompran" table
-#+
-#+ @param p_data - a row data LIKE vwclientesnocompran.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwclientesnocompran_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vwclientesnocompran.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vwclientesnocompran_vendedor_checkColumnConstraints(p_data.vendedor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwclientesnocompran_tipo_cliente_checkColumnConstraints(p_data.tipo_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwclientesnocompran_sec_cliente_checkColumnConstraints(p_data.sec_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwclientesnocompran_nombre_checkColumnConstraints(p_data.nombre) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwclientesnocompran_telefono_checkColumnConstraints(p_data.telefono) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwclientesnocompran_telefono_casa_checkColumnConstraints(p_data.telefono_casa) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwclientesnocompran_contacto_checkColumnConstraints(p_data.contacto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwclientesnocompran_mes_checkColumnConstraints(p_data.mes) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwclientesnocompran_rnc_checkColumnConstraints(p_data.rnc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwclientesnocompran_checkTableConstraints
-
-{}
-#+ Check constraints on the "vwclientesnocompran.vendedor" column
-#+
-#+ @param p_vendedor - VARCHAR2(31) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwclientesnocompran_vendedor_checkColumnConstraints(p_vendedor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_vendedor LIKE vwclientesnocompran.vendedor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_vendedor IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- vendedor: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwclientesnocompran_vendedor_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwclientesnocompran.tipo_cliente" column
-#+
-#+ @param p_tipo_cliente - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwclientesnocompran_tipo_cliente_checkColumnConstraints(p_tipo_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_cliente LIKE vwclientesnocompran.tipo_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwclientesnocompran_tipo_cliente_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwclientesnocompran.sec_cliente" column
-#+
-#+ @param p_sec_cliente - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwclientesnocompran_sec_cliente_checkColumnConstraints(p_sec_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_cliente LIKE vwclientesnocompran.sec_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwclientesnocompran_sec_cliente_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwclientesnocompran.nombre" column
-#+
-#+ @param p_nombre - CHAR(100) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwclientesnocompran_nombre_checkColumnConstraints(p_nombre)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombre LIKE vwclientesnocompran.nombre
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwclientesnocompran_nombre_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwclientesnocompran.telefono" column
-#+
-#+ @param p_telefono - CHAR(16) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwclientesnocompran_telefono_checkColumnConstraints(p_telefono)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_telefono LIKE vwclientesnocompran.telefono
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwclientesnocompran_telefono_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwclientesnocompran.telefono_casa" column
-#+
-#+ @param p_telefono_casa - CHAR(15) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwclientesnocompran_telefono_casa_checkColumnConstraints(p_telefono_casa)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_telefono_casa LIKE vwclientesnocompran.telefono_casa
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwclientesnocompran_telefono_casa_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwclientesnocompran.contacto" column
-#+
-#+ @param p_contacto - VARCHAR2(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwclientesnocompran_contacto_checkColumnConstraints(p_contacto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_contacto LIKE vwclientesnocompran.contacto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwclientesnocompran_contacto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwclientesnocompran.mes" column
-#+
-#+ @param p_mes - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwclientesnocompran_mes_checkColumnConstraints(p_mes)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mes LIKE vwclientesnocompran.mes
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwclientesnocompran_mes_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwclientesnocompran.rnc" column
-#+
-#+ @param p_rnc - CHAR(11) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwclientesnocompran_rnc_checkColumnConstraints(p_rnc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_rnc LIKE vwclientesnocompran.rnc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwclientesnocompran_rnc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwanaliticoh" table
-#+
-#+ @param p_data - a row data LIKE vwanaliticoh.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanaliticoh_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vwanaliticoh.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vwanaliticoh_control_checkColumnConstraints(p_data.control) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwanaliticoh_descripcionc_checkColumnConstraints(p_data.descripcionc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwanaliticoh_aplicaa_checkColumnConstraints(p_data.aplicaa) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwanaliticoh_descripcionapl_checkColumnConstraints(p_data.descripcionapl) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwanaliticoh_cuenta_checkColumnConstraints(p_data.cuenta) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwanaliticoh_descripcioncuenta_checkColumnConstraints(p_data.descripcioncuenta) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwanaliticoh_referencia_checkColumnConstraints(p_data.referencia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwanaliticoh_fechatransaccion_checkColumnConstraints(p_data.fechatransaccion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwanaliticoh_detalle1_checkColumnConstraints(p_data.detalle1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwanaliticoh_detalle2_checkColumnConstraints(p_data.detalle2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwanaliticoh_debito_checkColumnConstraints(p_data.debito) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwanaliticoh_credito_checkColumnConstraints(p_data.credito) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwanaliticoh_balance_checkColumnConstraints(p_data.balance) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwanaliticoh_ano_checkColumnConstraints(p_data.ano) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwanaliticoh_mes_checkColumnConstraints(p_data.mes) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwanaliticoh_codigodepartamento_checkColumnConstraints(p_data.codigodepartamento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwanaliticoh_nombredepartamento_checkColumnConstraints(p_data.nombredepartamento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwanaliticoh_usuariocreador_checkColumnConstraints(p_data.usuariocreador) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwanaliticoh_fechacreacion_checkColumnConstraints(p_data.fechacreacion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwanaliticoh_usuariomodificador_checkColumnConstraints(p_data.usuariomodificador) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwanaliticoh_fechamodificacion_checkColumnConstraints(p_data.fechamodificacion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwanaliticoh_banco_checkColumnConstraints(p_data.banco) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwanaliticoh_checkTableConstraints
-
-{}
-#+ Check constraints on the "vwanaliticoh.control" column
-#+
-#+ @param p_control - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanaliticoh_control_checkColumnConstraints(p_control)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_control LIKE vwanaliticoh.control
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwanaliticoh_control_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwanaliticoh.descripcionc" column
-#+
-#+ @param p_descripcionc - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanaliticoh_descripcionc_checkColumnConstraints(p_descripcionc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcionc LIKE vwanaliticoh.descripcionc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwanaliticoh_descripcionc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwanaliticoh.aplicaa" column
-#+
-#+ @param p_aplicaa - VARCHAR2(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanaliticoh_aplicaa_checkColumnConstraints(p_aplicaa)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_aplicaa LIKE vwanaliticoh.aplicaa
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwanaliticoh_aplicaa_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwanaliticoh.descripcionapl" column
-#+
-#+ @param p_descripcionapl - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanaliticoh_descripcionapl_checkColumnConstraints(p_descripcionapl)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcionapl LIKE vwanaliticoh.descripcionapl
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwanaliticoh_descripcionapl_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwanaliticoh.cuenta" column
-#+
-#+ @param p_cuenta - VARCHAR2(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanaliticoh_cuenta_checkColumnConstraints(p_cuenta)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cuenta LIKE vwanaliticoh.cuenta
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwanaliticoh_cuenta_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwanaliticoh.descripcioncuenta" column
-#+
-#+ @param p_descripcioncuenta - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanaliticoh_descripcioncuenta_checkColumnConstraints(p_descripcioncuenta)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcioncuenta LIKE vwanaliticoh.descripcioncuenta
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwanaliticoh_descripcioncuenta_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwanaliticoh.referencia" column
-#+
-#+ @param p_referencia - VARCHAR2(14) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanaliticoh_referencia_checkColumnConstraints(p_referencia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_referencia LIKE vwanaliticoh.referencia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_referencia IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- referencia: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwanaliticoh_referencia_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwanaliticoh.fechatransaccion" column
-#+
-#+ @param p_fechatransaccion - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanaliticoh_fechatransaccion_checkColumnConstraints(p_fechatransaccion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fechatransaccion LIKE vwanaliticoh.fechatransaccion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwanaliticoh_fechatransaccion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwanaliticoh.detalle1" column
-#+
-#+ @param p_detalle1 - VARCHAR2(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanaliticoh_detalle1_checkColumnConstraints(p_detalle1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_detalle1 LIKE vwanaliticoh.detalle1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwanaliticoh_detalle1_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwanaliticoh.detalle2" column
-#+
-#+ @param p_detalle2 - VARCHAR2(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanaliticoh_detalle2_checkColumnConstraints(p_detalle2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_detalle2 LIKE vwanaliticoh.detalle2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwanaliticoh_detalle2_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwanaliticoh.debito" column
-#+
-#+ @param p_debito - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanaliticoh_debito_checkColumnConstraints(p_debito)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_debito LIKE vwanaliticoh.debito
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwanaliticoh_debito_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwanaliticoh.credito" column
-#+
-#+ @param p_credito - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanaliticoh_credito_checkColumnConstraints(p_credito)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_credito LIKE vwanaliticoh.credito
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwanaliticoh_credito_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwanaliticoh.balance" column
-#+
-#+ @param p_balance - DECIMAL(13,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanaliticoh_balance_checkColumnConstraints(p_balance)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_balance LIKE vwanaliticoh.balance
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwanaliticoh_balance_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwanaliticoh.ano" column
-#+
-#+ @param p_ano - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanaliticoh_ano_checkColumnConstraints(p_ano)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ano LIKE vwanaliticoh.ano
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwanaliticoh_ano_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwanaliticoh.mes" column
-#+
-#+ @param p_mes - VARCHAR2(41) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanaliticoh_mes_checkColumnConstraints(p_mes)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mes LIKE vwanaliticoh.mes
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwanaliticoh_mes_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwanaliticoh.codigodepartamento" column
-#+
-#+ @param p_codigodepartamento - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanaliticoh_codigodepartamento_checkColumnConstraints(p_codigodepartamento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codigodepartamento LIKE vwanaliticoh.codigodepartamento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwanaliticoh_codigodepartamento_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwanaliticoh.nombredepartamento" column
-#+
-#+ @param p_nombredepartamento - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanaliticoh_nombredepartamento_checkColumnConstraints(p_nombredepartamento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombredepartamento LIKE vwanaliticoh.nombredepartamento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwanaliticoh_nombredepartamento_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwanaliticoh.usuariocreador" column
-#+
-#+ @param p_usuariocreador - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanaliticoh_usuariocreador_checkColumnConstraints(p_usuariocreador)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_usuariocreador LIKE vwanaliticoh.usuariocreador
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwanaliticoh_usuariocreador_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwanaliticoh.fechacreacion" column
-#+
-#+ @param p_fechacreacion - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanaliticoh_fechacreacion_checkColumnConstraints(p_fechacreacion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fechacreacion LIKE vwanaliticoh.fechacreacion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwanaliticoh_fechacreacion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwanaliticoh.usuariomodificador" column
-#+
-#+ @param p_usuariomodificador - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanaliticoh_usuariomodificador_checkColumnConstraints(p_usuariomodificador)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_usuariomodificador LIKE vwanaliticoh.usuariomodificador
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwanaliticoh_usuariomodificador_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwanaliticoh.fechamodificacion" column
-#+
-#+ @param p_fechamodificacion - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanaliticoh_fechamodificacion_checkColumnConstraints(p_fechamodificacion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fechamodificacion LIKE vwanaliticoh.fechamodificacion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwanaliticoh_fechamodificacion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwanaliticoh.banco" column
-#+
-#+ @param p_banco - VARCHAR2(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanaliticoh_banco_checkColumnConstraints(p_banco)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_banco LIKE vwanaliticoh.banco
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwanaliticoh_banco_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwanalitico" table
-#+
-#+ @param p_data - a row data LIKE vwanalitico.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanalitico_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vwanalitico.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vwanalitico_control_checkColumnConstraints(p_data.control) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwanalitico_descripcionc_checkColumnConstraints(p_data.descripcionc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwanalitico_aplicaa_checkColumnConstraints(p_data.aplicaa) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwanalitico_descripcionapl_checkColumnConstraints(p_data.descripcionapl) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwanalitico_cuenta_checkColumnConstraints(p_data.cuenta) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwanalitico_descripcioncuenta_checkColumnConstraints(p_data.descripcioncuenta) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwanalitico_referencia_checkColumnConstraints(p_data.referencia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwanalitico_fechatransaccion_checkColumnConstraints(p_data.fechatransaccion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwanalitico_detalle1_checkColumnConstraints(p_data.detalle1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwanalitico_detalle2_checkColumnConstraints(p_data.detalle2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwanalitico_debito_checkColumnConstraints(p_data.debito) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwanalitico_credito_checkColumnConstraints(p_data.credito) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwanalitico_balance_checkColumnConstraints(p_data.balance) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwanalitico_ano_checkColumnConstraints(p_data.ano) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwanalitico_mes_checkColumnConstraints(p_data.mes) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwanalitico_codigodepartamento_checkColumnConstraints(p_data.codigodepartamento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwanalitico_nombredepartamento_checkColumnConstraints(p_data.nombredepartamento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwanalitico_usuariocreador_checkColumnConstraints(p_data.usuariocreador) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwanalitico_fechacreacion_checkColumnConstraints(p_data.fechacreacion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwanalitico_usuariomodificador_checkColumnConstraints(p_data.usuariomodificador) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwanalitico_fechamodificacion_checkColumnConstraints(p_data.fechamodificacion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwanalitico_banco_checkColumnConstraints(p_data.banco) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwanalitico_checkTableConstraints
-
-{}
-#+ Check constraints on the "vwanalitico.control" column
-#+
-#+ @param p_control - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanalitico_control_checkColumnConstraints(p_control)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_control LIKE vwanalitico.control
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwanalitico_control_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwanalitico.descripcionc" column
-#+
-#+ @param p_descripcionc - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanalitico_descripcionc_checkColumnConstraints(p_descripcionc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcionc LIKE vwanalitico.descripcionc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwanalitico_descripcionc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwanalitico.aplicaa" column
-#+
-#+ @param p_aplicaa - VARCHAR2(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanalitico_aplicaa_checkColumnConstraints(p_aplicaa)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_aplicaa LIKE vwanalitico.aplicaa
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwanalitico_aplicaa_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwanalitico.descripcionapl" column
-#+
-#+ @param p_descripcionapl - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanalitico_descripcionapl_checkColumnConstraints(p_descripcionapl)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcionapl LIKE vwanalitico.descripcionapl
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwanalitico_descripcionapl_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwanalitico.cuenta" column
-#+
-#+ @param p_cuenta - VARCHAR2(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanalitico_cuenta_checkColumnConstraints(p_cuenta)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cuenta LIKE vwanalitico.cuenta
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwanalitico_cuenta_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwanalitico.descripcioncuenta" column
-#+
-#+ @param p_descripcioncuenta - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanalitico_descripcioncuenta_checkColumnConstraints(p_descripcioncuenta)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcioncuenta LIKE vwanalitico.descripcioncuenta
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwanalitico_descripcioncuenta_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwanalitico.referencia" column
-#+
-#+ @param p_referencia - VARCHAR2(14) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanalitico_referencia_checkColumnConstraints(p_referencia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_referencia LIKE vwanalitico.referencia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_referencia IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- referencia: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwanalitico_referencia_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwanalitico.fechatransaccion" column
-#+
-#+ @param p_fechatransaccion - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanalitico_fechatransaccion_checkColumnConstraints(p_fechatransaccion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fechatransaccion LIKE vwanalitico.fechatransaccion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwanalitico_fechatransaccion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwanalitico.detalle1" column
-#+
-#+ @param p_detalle1 - VARCHAR2(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanalitico_detalle1_checkColumnConstraints(p_detalle1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_detalle1 LIKE vwanalitico.detalle1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwanalitico_detalle1_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwanalitico.detalle2" column
-#+
-#+ @param p_detalle2 - VARCHAR2(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanalitico_detalle2_checkColumnConstraints(p_detalle2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_detalle2 LIKE vwanalitico.detalle2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwanalitico_detalle2_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwanalitico.debito" column
-#+
-#+ @param p_debito - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanalitico_debito_checkColumnConstraints(p_debito)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_debito LIKE vwanalitico.debito
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwanalitico_debito_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwanalitico.credito" column
-#+
-#+ @param p_credito - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanalitico_credito_checkColumnConstraints(p_credito)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_credito LIKE vwanalitico.credito
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwanalitico_credito_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwanalitico.balance" column
-#+
-#+ @param p_balance - DECIMAL(13,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanalitico_balance_checkColumnConstraints(p_balance)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_balance LIKE vwanalitico.balance
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwanalitico_balance_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwanalitico.ano" column
-#+
-#+ @param p_ano - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanalitico_ano_checkColumnConstraints(p_ano)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ano LIKE vwanalitico.ano
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwanalitico_ano_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwanalitico.mes" column
-#+
-#+ @param p_mes - VARCHAR2(41) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanalitico_mes_checkColumnConstraints(p_mes)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mes LIKE vwanalitico.mes
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwanalitico_mes_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwanalitico.codigodepartamento" column
-#+
-#+ @param p_codigodepartamento - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanalitico_codigodepartamento_checkColumnConstraints(p_codigodepartamento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codigodepartamento LIKE vwanalitico.codigodepartamento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwanalitico_codigodepartamento_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwanalitico.nombredepartamento" column
-#+
-#+ @param p_nombredepartamento - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanalitico_nombredepartamento_checkColumnConstraints(p_nombredepartamento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombredepartamento LIKE vwanalitico.nombredepartamento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwanalitico_nombredepartamento_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwanalitico.usuariocreador" column
-#+
-#+ @param p_usuariocreador - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanalitico_usuariocreador_checkColumnConstraints(p_usuariocreador)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_usuariocreador LIKE vwanalitico.usuariocreador
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwanalitico_usuariocreador_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwanalitico.fechacreacion" column
-#+
-#+ @param p_fechacreacion - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanalitico_fechacreacion_checkColumnConstraints(p_fechacreacion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fechacreacion LIKE vwanalitico.fechacreacion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwanalitico_fechacreacion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwanalitico.usuariomodificador" column
-#+
-#+ @param p_usuariomodificador - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanalitico_usuariomodificador_checkColumnConstraints(p_usuariomodificador)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_usuariomodificador LIKE vwanalitico.usuariomodificador
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwanalitico_usuariomodificador_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwanalitico.fechamodificacion" column
-#+
-#+ @param p_fechamodificacion - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanalitico_fechamodificacion_checkColumnConstraints(p_fechamodificacion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fechamodificacion LIKE vwanalitico.fechamodificacion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwanalitico_fechamodificacion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwanalitico.banco" column
-#+
-#+ @param p_banco - VARCHAR2(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanalitico_banco_checkColumnConstraints(p_banco)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_banco LIKE vwanalitico.banco
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwanalitico_banco_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwanalisisventas" table
-#+
-#+ @param p_data - a row data LIKE vwanalisisventas.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanalisisventas_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vwanalisisventas.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vwanalisisventas_control_checkColumnConstraints(p_data.control) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwanalisisventas_descripcionc_checkColumnConstraints(p_data.descripcionc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwanalisisventas_aplicaa_checkColumnConstraints(p_data.aplicaa) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwanalisisventas_descripcionapl_checkColumnConstraints(p_data.descripcionapl) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwanalisisventas_cuenta_checkColumnConstraints(p_data.cuenta) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwanalisisventas_descripcioncuenta_checkColumnConstraints(p_data.descripcioncuenta) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwanalisisventas_referencia_checkColumnConstraints(p_data.referencia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwanalisisventas_fechatransaccion_checkColumnConstraints(p_data.fechatransaccion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwanalisisventas_detalle1_checkColumnConstraints(p_data.detalle1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwanalisisventas_detalle2_checkColumnConstraints(p_data.detalle2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwanalisisventas_debito_checkColumnConstraints(p_data.debito) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwanalisisventas_credito_checkColumnConstraints(p_data.credito) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwanalisisventas_balance_checkColumnConstraints(p_data.balance) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwanalisisventas_ano_checkColumnConstraints(p_data.ano) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwanalisisventas_mes_checkColumnConstraints(p_data.mes) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwanalisisventas_codigodepartamento_checkColumnConstraints(p_data.codigodepartamento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwanalisisventas_nombredepartamento_checkColumnConstraints(p_data.nombredepartamento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwanalisisventas_usuariocreador_checkColumnConstraints(p_data.usuariocreador) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwanalisisventas_fechacreacion_checkColumnConstraints(p_data.fechacreacion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwanalisisventas_usuariomodificador_checkColumnConstraints(p_data.usuariomodificador) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwanalisisventas_fechamodificacion_checkColumnConstraints(p_data.fechamodificacion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwanalisisventas_banco_checkColumnConstraints(p_data.banco) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwanalisisventas_checkTableConstraints
-
-{}
-#+ Check constraints on the "vwanalisisventas.control" column
-#+
-#+ @param p_control - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanalisisventas_control_checkColumnConstraints(p_control)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_control LIKE vwanalisisventas.control
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwanalisisventas_control_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwanalisisventas.descripcionc" column
-#+
-#+ @param p_descripcionc - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanalisisventas_descripcionc_checkColumnConstraints(p_descripcionc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcionc LIKE vwanalisisventas.descripcionc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwanalisisventas_descripcionc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwanalisisventas.aplicaa" column
-#+
-#+ @param p_aplicaa - VARCHAR2(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanalisisventas_aplicaa_checkColumnConstraints(p_aplicaa)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_aplicaa LIKE vwanalisisventas.aplicaa
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwanalisisventas_aplicaa_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwanalisisventas.descripcionapl" column
-#+
-#+ @param p_descripcionapl - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanalisisventas_descripcionapl_checkColumnConstraints(p_descripcionapl)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcionapl LIKE vwanalisisventas.descripcionapl
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwanalisisventas_descripcionapl_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwanalisisventas.cuenta" column
-#+
-#+ @param p_cuenta - VARCHAR2(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanalisisventas_cuenta_checkColumnConstraints(p_cuenta)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cuenta LIKE vwanalisisventas.cuenta
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwanalisisventas_cuenta_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwanalisisventas.descripcioncuenta" column
-#+
-#+ @param p_descripcioncuenta - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanalisisventas_descripcioncuenta_checkColumnConstraints(p_descripcioncuenta)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcioncuenta LIKE vwanalisisventas.descripcioncuenta
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwanalisisventas_descripcioncuenta_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwanalisisventas.referencia" column
-#+
-#+ @param p_referencia - VARCHAR2(14) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanalisisventas_referencia_checkColumnConstraints(p_referencia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_referencia LIKE vwanalisisventas.referencia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_referencia IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- referencia: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwanalisisventas_referencia_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwanalisisventas.fechatransaccion" column
-#+
-#+ @param p_fechatransaccion - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanalisisventas_fechatransaccion_checkColumnConstraints(p_fechatransaccion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fechatransaccion LIKE vwanalisisventas.fechatransaccion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwanalisisventas_fechatransaccion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwanalisisventas.detalle1" column
-#+
-#+ @param p_detalle1 - VARCHAR2(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanalisisventas_detalle1_checkColumnConstraints(p_detalle1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_detalle1 LIKE vwanalisisventas.detalle1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwanalisisventas_detalle1_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwanalisisventas.detalle2" column
-#+
-#+ @param p_detalle2 - VARCHAR2(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanalisisventas_detalle2_checkColumnConstraints(p_detalle2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_detalle2 LIKE vwanalisisventas.detalle2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwanalisisventas_detalle2_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwanalisisventas.debito" column
-#+
-#+ @param p_debito - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanalisisventas_debito_checkColumnConstraints(p_debito)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_debito LIKE vwanalisisventas.debito
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwanalisisventas_debito_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwanalisisventas.credito" column
-#+
-#+ @param p_credito - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanalisisventas_credito_checkColumnConstraints(p_credito)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_credito LIKE vwanalisisventas.credito
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwanalisisventas_credito_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwanalisisventas.balance" column
-#+
-#+ @param p_balance - DECIMAL(13,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanalisisventas_balance_checkColumnConstraints(p_balance)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_balance LIKE vwanalisisventas.balance
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwanalisisventas_balance_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwanalisisventas.ano" column
-#+
-#+ @param p_ano - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanalisisventas_ano_checkColumnConstraints(p_ano)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ano LIKE vwanalisisventas.ano
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwanalisisventas_ano_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwanalisisventas.mes" column
-#+
-#+ @param p_mes - VARCHAR2(41) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanalisisventas_mes_checkColumnConstraints(p_mes)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mes LIKE vwanalisisventas.mes
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwanalisisventas_mes_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwanalisisventas.codigodepartamento" column
-#+
-#+ @param p_codigodepartamento - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanalisisventas_codigodepartamento_checkColumnConstraints(p_codigodepartamento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codigodepartamento LIKE vwanalisisventas.codigodepartamento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwanalisisventas_codigodepartamento_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwanalisisventas.nombredepartamento" column
-#+
-#+ @param p_nombredepartamento - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanalisisventas_nombredepartamento_checkColumnConstraints(p_nombredepartamento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombredepartamento LIKE vwanalisisventas.nombredepartamento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwanalisisventas_nombredepartamento_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwanalisisventas.usuariocreador" column
-#+
-#+ @param p_usuariocreador - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanalisisventas_usuariocreador_checkColumnConstraints(p_usuariocreador)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_usuariocreador LIKE vwanalisisventas.usuariocreador
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwanalisisventas_usuariocreador_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwanalisisventas.fechacreacion" column
-#+
-#+ @param p_fechacreacion - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanalisisventas_fechacreacion_checkColumnConstraints(p_fechacreacion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fechacreacion LIKE vwanalisisventas.fechacreacion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwanalisisventas_fechacreacion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwanalisisventas.usuariomodificador" column
-#+
-#+ @param p_usuariomodificador - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanalisisventas_usuariomodificador_checkColumnConstraints(p_usuariomodificador)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_usuariomodificador LIKE vwanalisisventas.usuariomodificador
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwanalisisventas_usuariomodificador_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwanalisisventas.fechamodificacion" column
-#+
-#+ @param p_fechamodificacion - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanalisisventas_fechamodificacion_checkColumnConstraints(p_fechamodificacion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fechamodificacion LIKE vwanalisisventas.fechamodificacion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwanalisisventas_fechamodificacion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vwanalisisventas.banco" column
-#+
-#+ @param p_banco - VARCHAR2(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanalisisventas_banco_checkColumnConstraints(p_banco)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_banco LIKE vwanalisisventas.banco
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vwanalisisventas_banco_checkColumnConstraints
-
-{}
-#+ Check constraints on the "viejo1" table
-#+
-#+ @param p_data - a row data LIKE viejo1.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_viejo1_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE viejo1.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_viejo1_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_viejo1_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_viejo1_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_viejo1_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_viejo1_codn_checkColumnConstraints(p_data.codn) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_viejo1_codgrupo_checkColumnConstraints(p_data.codgrupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_viejo1_codtipo_checkColumnConstraints(p_data.codtipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_viejo1_codsec_checkColumnConstraints(p_data.codsec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.viejo1_checkTableConstraints
-
-{}
-#+ Check constraints on the "viejo1.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_viejo1_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE viejo1.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.viejo1_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "viejo1.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_viejo1_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE viejo1.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.viejo1_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "viejo1.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_viejo1_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE viejo1.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.viejo1_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "viejo1.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_viejo1_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE viejo1.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.viejo1_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "viejo1.codn" column
-#+
-#+ @param p_codn - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_viejo1_codn_checkColumnConstraints(p_codn)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codn LIKE viejo1.codn
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.viejo1_codn_checkColumnConstraints
-
-{}
-#+ Check constraints on the "viejo1.codgrupo" column
-#+
-#+ @param p_codgrupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_viejo1_codgrupo_checkColumnConstraints(p_codgrupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codgrupo LIKE viejo1.codgrupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.viejo1_codgrupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "viejo1.codtipo" column
-#+
-#+ @param p_codtipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_viejo1_codtipo_checkColumnConstraints(p_codtipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codtipo LIKE viejo1.codtipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.viejo1_codtipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "viejo1.codsec" column
-#+
-#+ @param p_codsec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_viejo1_codsec_checkColumnConstraints(p_codsec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codsec LIKE viejo1.codsec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.viejo1_codsec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00090" table
-#+
-#+ @param p_data - a row data LIKE vetb00090.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00090_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vetb00090.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vetb00090_tipo_cliente_checkColumnConstraints(p_data.tipo_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00090_sec_cliente_checkColumnConstraints(p_data.sec_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00090_porc_comision_checkColumnConstraints(p_data.porc_comision) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00090_fecha_termino_checkColumnConstraints(p_data.fecha_termino) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00090_sec_vend_checkColumnConstraints(p_data.sec_vend) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00090_estatus_checkColumnConstraints(p_data.estatus) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00090_checkTableConstraints
-
-{}
-#+ Check constraints on the "vetb00090.tipo_cliente" column
-#+
-#+ @param p_tipo_cliente - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00090_tipo_cliente_checkColumnConstraints(p_tipo_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_cliente LIKE vetb00090.tipo_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00090_tipo_cliente_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00090.sec_cliente" column
-#+
-#+ @param p_sec_cliente - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00090_sec_cliente_checkColumnConstraints(p_sec_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_cliente LIKE vetb00090.sec_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00090_sec_cliente_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00090.porc_comision" column
-#+
-#+ @param p_porc_comision - DECIMAL(18,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00090_porc_comision_checkColumnConstraints(p_porc_comision)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_porc_comision LIKE vetb00090.porc_comision
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00090_porc_comision_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00090.fecha_termino" column
-#+
-#+ @param p_fecha_termino - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00090_fecha_termino_checkColumnConstraints(p_fecha_termino)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_termino LIKE vetb00090.fecha_termino
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00090_fecha_termino_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00090.sec_vend" column
-#+
-#+ @param p_sec_vend - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00090_sec_vend_checkColumnConstraints(p_sec_vend)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_vend LIKE vetb00090.sec_vend
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00090_sec_vend_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00090.estatus" column
-#+
-#+ @param p_estatus - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00090_estatus_checkColumnConstraints(p_estatus)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_estatus LIKE vetb00090.estatus
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00090_estatus_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00088" table
-#+
-#+ @param p_data - a row data LIKE vetb00088.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00088_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vetb00088.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vetb00088_cotizacion_no_checkColumnConstraints(p_data.cotizacion_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00088_fecha_autorizacion_checkColumnConstraints(p_data.fecha_autorizacion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00088_us_autoriza_checkColumnConstraints(p_data.us_autoriza) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00088_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00088_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00088_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00088_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00088_porc_descuento_checkColumnConstraints(p_data.porc_descuento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00088_autoriza_checkColumnConstraints(p_data.autoriza) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00088_checkTableConstraints
-
-{}
-#+ Check constraints on the "vetb00088.cotizacion_no" column
-#+
-#+ @param p_cotizacion_no - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00088_cotizacion_no_checkColumnConstraints(p_cotizacion_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cotizacion_no LIKE vetb00088.cotizacion_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00088_cotizacion_no_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00088.fecha_autorizacion" column
-#+
-#+ @param p_fecha_autorizacion - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00088_fecha_autorizacion_checkColumnConstraints(p_fecha_autorizacion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_autorizacion LIKE vetb00088.fecha_autorizacion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00088_fecha_autorizacion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00088.us_autoriza" column
-#+
-#+ @param p_us_autoriza - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00088_us_autoriza_checkColumnConstraints(p_us_autoriza)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_autoriza LIKE vetb00088.us_autoriza
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00088_us_autoriza_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00088.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00088_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE vetb00088.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00088_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00088.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00088_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE vetb00088.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00088_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00088.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00088_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE vetb00088.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00088_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00088.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00088_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE vetb00088.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00088_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00088.porc_descuento" column
-#+
-#+ @param p_porc_descuento - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00088_porc_descuento_checkColumnConstraints(p_porc_descuento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_porc_descuento LIKE vetb00088.porc_descuento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00088_porc_descuento_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00088.autoriza" column
-#+
-#+ @param p_autoriza - CHAR(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00088_autoriza_checkColumnConstraints(p_autoriza)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_autoriza LIKE vetb00088.autoriza
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00088_autoriza_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00087" table
-#+
-#+ @param p_data - a row data LIKE vetb00087.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00087_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vetb00087.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vetb00087_tipo_cliente_checkColumnConstraints(p_data.tipo_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00087_sec_cliente_checkColumnConstraints(p_data.sec_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00087_contacto_checkColumnConstraints(p_data.contacto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00087_puesto_checkColumnConstraints(p_data.puesto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00087_puesto1_checkColumnConstraints(p_data.puesto1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00087_email_checkColumnConstraints(p_data.email) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00087_celular_checkColumnConstraints(p_data.celular) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00087_telefono_of_checkColumnConstraints(p_data.telefono_of) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00087_telefono_casa_checkColumnConstraints(p_data.telefono_casa) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00087_id_checkColumnConstraints(p_data.id) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00087_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00087_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00087_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00087_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00087_checkTableConstraints
-
-{}
-#+ Check constraints on the "vetb00087.tipo_cliente" column
-#+
-#+ @param p_tipo_cliente - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00087_tipo_cliente_checkColumnConstraints(p_tipo_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_cliente LIKE vetb00087.tipo_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00087_tipo_cliente_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00087.sec_cliente" column
-#+
-#+ @param p_sec_cliente - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00087_sec_cliente_checkColumnConstraints(p_sec_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_cliente LIKE vetb00087.sec_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00087_sec_cliente_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00087.contacto" column
-#+
-#+ @param p_contacto - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00087_contacto_checkColumnConstraints(p_contacto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_contacto LIKE vetb00087.contacto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00087_contacto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00087.puesto" column
-#+
-#+ @param p_puesto - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00087_puesto_checkColumnConstraints(p_puesto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_puesto LIKE vetb00087.puesto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00087_puesto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00087.puesto1" column
-#+
-#+ @param p_puesto1 - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00087_puesto1_checkColumnConstraints(p_puesto1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_puesto1 LIKE vetb00087.puesto1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00087_puesto1_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00087.email" column
-#+
-#+ @param p_email - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00087_email_checkColumnConstraints(p_email)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_email LIKE vetb00087.email
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00087_email_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00087.celular" column
-#+
-#+ @param p_celular - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00087_celular_checkColumnConstraints(p_celular)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_celular LIKE vetb00087.celular
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00087_celular_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00087.telefono_of" column
-#+
-#+ @param p_telefono_of - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00087_telefono_of_checkColumnConstraints(p_telefono_of)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_telefono_of LIKE vetb00087.telefono_of
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00087_telefono_of_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00087.telefono_casa" column
-#+
-#+ @param p_telefono_casa - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00087_telefono_casa_checkColumnConstraints(p_telefono_casa)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_telefono_casa LIKE vetb00087.telefono_casa
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00087_telefono_casa_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00087.id" column
-#+
-#+ @param p_id - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00087_id_checkColumnConstraints(p_id)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_id LIKE vetb00087.id
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00087_id_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00087.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00087_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE vetb00087.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00087_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00087.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00087_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE vetb00087.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00087_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00087.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00087_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE vetb00087.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00087_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00087.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00087_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE vetb00087.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00087_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00086" table
-#+
-#+ @param p_data - a row data LIKE vetb00086.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00086_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vetb00086.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vetb00086_cotizacion_no_checkColumnConstraints(p_data.cotizacion_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00086_porc_negocio_checkColumnConstraints(p_data.porc_negocio) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00086_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00086_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00086_fecha_crea_checkColumnConstraints(p_data.fecha_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00086_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00086_fecha_mod_checkColumnConstraints(p_data.fecha_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00086_checkTableConstraints
-
-{}
-#+ Check constraints on the "vetb00086.cotizacion_no" column
-#+
-#+ @param p_cotizacion_no - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00086_cotizacion_no_checkColumnConstraints(p_cotizacion_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cotizacion_no LIKE vetb00086.cotizacion_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00086_cotizacion_no_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00086.porc_negocio" column
-#+
-#+ @param p_porc_negocio - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00086_porc_negocio_checkColumnConstraints(p_porc_negocio)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_porc_negocio LIKE vetb00086.porc_negocio
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00086_porc_negocio_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00086.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00086_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE vetb00086.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00086_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00086.us_crea" column
-#+
-#+ @param p_us_crea - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00086_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE vetb00086.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00086_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00086.fecha_crea" column
-#+
-#+ @param p_fecha_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00086_fecha_crea_checkColumnConstraints(p_fecha_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_crea LIKE vetb00086.fecha_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00086_fecha_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00086.us_mod" column
-#+
-#+ @param p_us_mod - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00086_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE vetb00086.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00086_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00086.fecha_mod" column
-#+
-#+ @param p_fecha_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00086_fecha_mod_checkColumnConstraints(p_fecha_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_mod LIKE vetb00086.fecha_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00086_fecha_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00085" table
-#+
-#+ @param p_data - a row data LIKE vetb00085.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00085_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vetb00085.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vetb00085_cod_cia_checkColumnConstraints(p_data.cod_cia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00085_cod_lista_checkColumnConstraints(p_data.cod_lista) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00085_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00085_fecha_vigencia_checkColumnConstraints(p_data.fecha_vigencia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00085_fecha_inicio_checkColumnConstraints(p_data.fecha_inicio) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00085_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00085_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00085_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00085_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00085_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00085_checkTableConstraints
-
-{}
-#+ Check constraints on the "vetb00085.cod_cia" column
-#+
-#+ @param p_cod_cia - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00085_cod_cia_checkColumnConstraints(p_cod_cia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_cia LIKE vetb00085.cod_cia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00085_cod_cia_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00085.cod_lista" column
-#+
-#+ @param p_cod_lista - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00085_cod_lista_checkColumnConstraints(p_cod_lista)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_lista LIKE vetb00085.cod_lista
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00085_cod_lista_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00085.descripcion" column
-#+
-#+ @param p_descripcion - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00085_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE vetb00085.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00085_descripcion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00085.fecha_vigencia" column
-#+
-#+ @param p_fecha_vigencia - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00085_fecha_vigencia_checkColumnConstraints(p_fecha_vigencia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_vigencia LIKE vetb00085.fecha_vigencia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00085_fecha_vigencia_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00085.fecha_inicio" column
-#+
-#+ @param p_fecha_inicio - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00085_fecha_inicio_checkColumnConstraints(p_fecha_inicio)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_inicio LIKE vetb00085.fecha_inicio
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00085_fecha_inicio_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00085.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00085_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE vetb00085.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00085_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00085.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00085_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE vetb00085.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00085_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00085.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00085_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE vetb00085.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00085_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00085.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00085_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE vetb00085.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00085_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00085.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00085_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE vetb00085.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00085_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00084" table
-#+
-#+ @param p_data - a row data LIKE vetb00084.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00084_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vetb00084.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vetb00084_sec_vend_checkColumnConstraints(p_data.sec_vend) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00084_nombre_checkColumnConstraints(p_data.nombre) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00084_checkTableConstraints
-
-{}
-#+ Check constraints on the "vetb00084.sec_vend" column
-#+
-#+ @param p_sec_vend - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00084_sec_vend_checkColumnConstraints(p_sec_vend)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_vend LIKE vetb00084.sec_vend
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00084_sec_vend_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00084.nombre" column
-#+
-#+ @param p_nombre - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00084_nombre_checkColumnConstraints(p_nombre)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombre LIKE vetb00084.nombre
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00084_nombre_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00075" table
-#+
-#+ @param p_data - a row data LIKE vetb00075.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00075_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vetb00075.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vetb00075_sec_vend_checkColumnConstraints(p_data.sec_vend) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00075_porc_cobros_a_checkColumnConstraints(p_data.porc_cobros_a) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00075_sec_vend_a_checkColumnConstraints(p_data.sec_vend_a) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00075_porc_cobros_checkColumnConstraints(p_data.porc_cobros) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00075_checkTableConstraints
-
-{}
-#+ Check constraints on the "vetb00075.sec_vend" column
-#+
-#+ @param p_sec_vend - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00075_sec_vend_checkColumnConstraints(p_sec_vend)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_vend LIKE vetb00075.sec_vend
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00075_sec_vend_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00075.porc_cobros_a" column
-#+
-#+ @param p_porc_cobros_a - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00075_porc_cobros_a_checkColumnConstraints(p_porc_cobros_a)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_porc_cobros_a LIKE vetb00075.porc_cobros_a
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00075_porc_cobros_a_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00075.sec_vend_a" column
-#+
-#+ @param p_sec_vend_a - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00075_sec_vend_a_checkColumnConstraints(p_sec_vend_a)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_vend_a LIKE vetb00075.sec_vend_a
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00075_sec_vend_a_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00075.porc_cobros" column
-#+
-#+ @param p_porc_cobros - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00075_porc_cobros_checkColumnConstraints(p_porc_cobros)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_porc_cobros LIKE vetb00075.porc_cobros
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00075_porc_cobros_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00072" table
-#+
-#+ @param p_data - a row data LIKE vetb00072.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00072_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vetb00072.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vetb00072_documento_checkColumnConstraints(p_data.documento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00072_tipo_doc_checkColumnConstraints(p_data.tipo_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00072_codigo_dgii_checkColumnConstraints(p_data.codigo_dgii) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00072_ncf_checkColumnConstraints(p_data.ncf) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00072_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00072_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00072_checkTableConstraints
-
-{}
-#+ Check constraints on the "vetb00072.documento" column
-#+
-#+ @param p_documento - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00072_documento_checkColumnConstraints(p_documento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_documento LIKE vetb00072.documento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00072_documento_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00072.tipo_doc" column
-#+
-#+ @param p_tipo_doc - CHAR(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00072_tipo_doc_checkColumnConstraints(p_tipo_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_doc LIKE vetb00072.tipo_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00072_tipo_doc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00072.codigo_dgii" column
-#+
-#+ @param p_codigo_dgii - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00072_codigo_dgii_checkColumnConstraints(p_codigo_dgii)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codigo_dgii LIKE vetb00072.codigo_dgii
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00072_codigo_dgii_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00072.ncf" column
-#+
-#+ @param p_ncf - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00072_ncf_checkColumnConstraints(p_ncf)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ncf LIKE vetb00072.ncf
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00072_ncf_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00072.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00072_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE vetb00072.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00072_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00072.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00072_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE vetb00072.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00072_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00071" table
-#+
-#+ @param p_data - a row data LIKE vetb00071.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00071_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vetb00071.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vetb00071_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00071_tipo_ncf_checkColumnConstraints(p_data.tipo_ncf) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00071_tipo_doc_checkColumnConstraints(p_data.tipo_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00071_codigo_dgii_checkColumnConstraints(p_data.codigo_dgii) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00071_ncf_inicial_checkColumnConstraints(p_data.ncf_inicial) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00071_ncf_final_checkColumnConstraints(p_data.ncf_final) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00071_disponible_checkColumnConstraints(p_data.disponible) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00071_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00071_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00071_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00071_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00071_sucid_checkColumnConstraints(p_data.sucid) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00071_itbis_checkColumnConstraints(p_data.itbis) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00071_checkTableConstraints
-
-{}
-#+ Check constraints on the "vetb00071.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00071_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE vetb00071.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00071_fecha_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00071.tipo_ncf" column
-#+
-#+ @param p_tipo_ncf - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00071_tipo_ncf_checkColumnConstraints(p_tipo_ncf)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_ncf LIKE vetb00071.tipo_ncf
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00071_tipo_ncf_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00071.tipo_doc" column
-#+
-#+ @param p_tipo_doc - CHAR(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00071_tipo_doc_checkColumnConstraints(p_tipo_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_doc LIKE vetb00071.tipo_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00071_tipo_doc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00071.codigo_dgii" column
-#+
-#+ @param p_codigo_dgii - CHAR(14) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00071_codigo_dgii_checkColumnConstraints(p_codigo_dgii)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codigo_dgii LIKE vetb00071.codigo_dgii
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00071_codigo_dgii_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00071.ncf_inicial" column
-#+
-#+ @param p_ncf_inicial - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00071_ncf_inicial_checkColumnConstraints(p_ncf_inicial)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ncf_inicial LIKE vetb00071.ncf_inicial
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00071_ncf_inicial_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00071.ncf_final" column
-#+
-#+ @param p_ncf_final - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00071_ncf_final_checkColumnConstraints(p_ncf_final)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ncf_final LIKE vetb00071.ncf_final
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00071_ncf_final_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00071.disponible" column
-#+
-#+ @param p_disponible - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00071_disponible_checkColumnConstraints(p_disponible)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_disponible LIKE vetb00071.disponible
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00071_disponible_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00071.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00071_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE vetb00071.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00071_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00071.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00071_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE vetb00071.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00071_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00071.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00071_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE vetb00071.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00071_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00071.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00071_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE vetb00071.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00071_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00071.sucid" column
-#+
-#+ @param p_sucid - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00071_sucid_checkColumnConstraints(p_sucid)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sucid LIKE vetb00071.sucid
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00071_sucid_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00071.itbis" column
-#+
-#+ @param p_itbis - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00071_itbis_checkColumnConstraints(p_itbis)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_itbis LIKE vetb00071.itbis
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00071_itbis_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00061" table
-#+
-#+ @param p_data - a row data LIKE vetb00061.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00061_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vetb00061.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vetb00061_ventas_checkColumnConstraints(p_data.ventas) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00061_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00061_simbolo_checkColumnConstraints(p_data.simbolo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00061_descripcion_moneda_checkColumnConstraints(p_data.descripcion_moneda) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00061_defecto_checkColumnConstraints(p_data.defecto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00061_checkTableConstraints
-
-{}
-#+ Check constraints on the "vetb00061.ventas" column
-#+
-#+ @param p_ventas - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00061_ventas_checkColumnConstraints(p_ventas)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ventas LIKE vetb00061.ventas
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00061_ventas_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00061.descripcion" column
-#+
-#+ @param p_descripcion - VARCHAR2(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00061_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE vetb00061.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00061_descripcion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00061.simbolo" column
-#+
-#+ @param p_simbolo - VARCHAR2(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00061_simbolo_checkColumnConstraints(p_simbolo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_simbolo LIKE vetb00061.simbolo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00061_simbolo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00061.descripcion_moneda" column
-#+
-#+ @param p_descripcion_moneda - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00061_descripcion_moneda_checkColumnConstraints(p_descripcion_moneda)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion_moneda LIKE vetb00061.descripcion_moneda
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00061_descripcion_moneda_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00061.defecto" column
-#+
-#+ @param p_defecto - CHAR(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00061_defecto_checkColumnConstraints(p_defecto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_defecto LIKE vetb00061.defecto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00061_defecto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00060" table
-#+
-#+ @param p_data - a row data LIKE vetb00060.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00060_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vetb00060.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vetb00060_ventas_checkColumnConstraints(p_data.ventas) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00060_tipo_cliente_checkColumnConstraints(p_data.tipo_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00060_sec_cliente_checkColumnConstraints(p_data.sec_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00060_cod_mov_checkColumnConstraints(p_data.cod_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00060_paga_itbis_checkColumnConstraints(p_data.paga_itbis) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00060_ncf_checkColumnConstraints(p_data.ncf) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00060_facturar_punto_ventas_checkColumnConstraints(p_data.facturar_punto_ventas) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00060_control_creacion_usuario_checkColumnConstraints(p_data.control_creacion_usuario) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00060_control_mobile_checkColumnConstraints(p_data.control_mobile) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00060_checkTableConstraints
-
-{}
-#+ Check constraints on the "vetb00060.ventas" column
-#+
-#+ @param p_ventas - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00060_ventas_checkColumnConstraints(p_ventas)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ventas LIKE vetb00060.ventas
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00060_ventas_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00060.tipo_cliente" column
-#+
-#+ @param p_tipo_cliente - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00060_tipo_cliente_checkColumnConstraints(p_tipo_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_cliente LIKE vetb00060.tipo_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00060_tipo_cliente_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00060.sec_cliente" column
-#+
-#+ @param p_sec_cliente - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00060_sec_cliente_checkColumnConstraints(p_sec_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_cliente LIKE vetb00060.sec_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00060_sec_cliente_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00060.cod_mov" column
-#+
-#+ @param p_cod_mov - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00060_cod_mov_checkColumnConstraints(p_cod_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mov LIKE vetb00060.cod_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00060_cod_mov_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00060.paga_itbis" column
-#+
-#+ @param p_paga_itbis - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00060_paga_itbis_checkColumnConstraints(p_paga_itbis)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_paga_itbis LIKE vetb00060.paga_itbis
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00060_paga_itbis_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00060.ncf" column
-#+
-#+ @param p_ncf - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00060_ncf_checkColumnConstraints(p_ncf)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ncf LIKE vetb00060.ncf
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00060_ncf_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00060.facturar_punto_ventas" column
-#+
-#+ @param p_facturar_punto_ventas - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00060_facturar_punto_ventas_checkColumnConstraints(p_facturar_punto_ventas)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_facturar_punto_ventas LIKE vetb00060.facturar_punto_ventas
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00060_facturar_punto_ventas_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00060.control_creacion_usuario" column
-#+
-#+ @param p_control_creacion_usuario - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00060_control_creacion_usuario_checkColumnConstraints(p_control_creacion_usuario)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_control_creacion_usuario LIKE vetb00060.control_creacion_usuario
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00060_control_creacion_usuario_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00060.control_mobile" column
-#+
-#+ @param p_control_mobile - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00060_control_mobile_checkColumnConstraints(p_control_mobile)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_control_mobile LIKE vetb00060.control_mobile
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00060_control_mobile_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00053" table
-#+
-#+ @param p_data - a row data LIKE vetb00053.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00053_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vetb00053.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vetb00053_cotizacion_no_checkColumnConstraints(p_data.cotizacion_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00053_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00053_checkTableConstraints
-
-{}
-#+ Check constraints on the "vetb00053.cotizacion_no" column
-#+
-#+ @param p_cotizacion_no - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00053_cotizacion_no_checkColumnConstraints(p_cotizacion_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cotizacion_no LIKE vetb00053.cotizacion_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cotizacion_no IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cotizacion_no: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00053_cotizacion_no_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00053.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00053_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE vetb00053.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00053_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00052" table
-#+
-#+ @param p_data - a row data LIKE vetb00052.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00052_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vetb00052.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vetb00052_etiqueta_checkColumnConstraints(p_data.etiqueta) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00052_cotizacion_no_checkColumnConstraints(p_data.cotizacion_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00052_secuencia_checkColumnConstraints(p_data.secuencia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00052_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00052_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00052_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00052_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00052_lado_1_checkColumnConstraints(p_data.lado_1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00052_lado_2_checkColumnConstraints(p_data.lado_2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00052_lado_3_checkColumnConstraints(p_data.lado_3) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00052_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00052_medida_checkColumnConstraints(p_data.medida) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00052_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00052_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00052_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00052_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00052_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00052_checkTableConstraints
-
-{}
-#+ Check constraints on the "vetb00052.etiqueta" column
-#+
-#+ @param p_etiqueta - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00052_etiqueta_checkColumnConstraints(p_etiqueta)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_etiqueta LIKE vetb00052.etiqueta
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00052_etiqueta_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00052.cotizacion_no" column
-#+
-#+ @param p_cotizacion_no - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00052_cotizacion_no_checkColumnConstraints(p_cotizacion_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cotizacion_no LIKE vetb00052.cotizacion_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00052_cotizacion_no_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00052.secuencia" column
-#+
-#+ @param p_secuencia - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00052_secuencia_checkColumnConstraints(p_secuencia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_secuencia LIKE vetb00052.secuencia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00052_secuencia_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00052.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00052_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE vetb00052.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00052_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00052.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00052_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE vetb00052.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00052_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00052.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00052_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE vetb00052.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00052_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00052.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00052_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE vetb00052.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00052_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00052.lado_1" column
-#+
-#+ @param p_lado_1 - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00052_lado_1_checkColumnConstraints(p_lado_1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_lado_1 LIKE vetb00052.lado_1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00052_lado_1_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00052.lado_2" column
-#+
-#+ @param p_lado_2 - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00052_lado_2_checkColumnConstraints(p_lado_2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_lado_2 LIKE vetb00052.lado_2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00052_lado_2_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00052.lado_3" column
-#+
-#+ @param p_lado_3 - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00052_lado_3_checkColumnConstraints(p_lado_3)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_lado_3 LIKE vetb00052.lado_3
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00052_lado_3_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00052.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00052_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE vetb00052.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00052_cantidad_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00052.medida" column
-#+
-#+ @param p_medida - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00052_medida_checkColumnConstraints(p_medida)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_medida LIKE vetb00052.medida
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00052_medida_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00052.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00052_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE vetb00052.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00052_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00052.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00052_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE vetb00052.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00052_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00052.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00052_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE vetb00052.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00052_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00052.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00052_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE vetb00052.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00052_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00052.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00052_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE vetb00052.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00052_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00051" table
-#+
-#+ @param p_data - a row data LIKE vetb00051.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00051_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vetb00051.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vetb00051_cod_cia_checkColumnConstraints(p_data.cod_cia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00051_ventas_checkColumnConstraints(p_data.ventas) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00051_cotizacion_no_checkColumnConstraints(p_data.cotizacion_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00051_area_checkColumnConstraints(p_data.area) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00051_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00051_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00051_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00051_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00051_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00051_cantidad_1_checkColumnConstraints(p_data.cantidad_1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00051_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00051_precio_checkColumnConstraints(p_data.precio) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00051_porc_desc_checkColumnConstraints(p_data.porc_desc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00051_nombre_file_checkColumnConstraints(p_data.nombre_file) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00051_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00051_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00051_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00051_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00051_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00051_foto_producto_checkColumnConstraints(p_data.foto_producto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00051_descripcion_area_checkColumnConstraints(p_data.descripcion_area) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00051_id_kit_checkColumnConstraints(p_data.id_kit) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00051_checkTableConstraints
-
-{}
-#+ Check constraints on the "vetb00051.cod_cia" column
-#+
-#+ @param p_cod_cia - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00051_cod_cia_checkColumnConstraints(p_cod_cia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_cia LIKE vetb00051.cod_cia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00051_cod_cia_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00051.ventas" column
-#+
-#+ @param p_ventas - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00051_ventas_checkColumnConstraints(p_ventas)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ventas LIKE vetb00051.ventas
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00051_ventas_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00051.cotizacion_no" column
-#+
-#+ @param p_cotizacion_no - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00051_cotizacion_no_checkColumnConstraints(p_cotizacion_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cotizacion_no LIKE vetb00051.cotizacion_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cotizacion_no IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cotizacion_no: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00051_cotizacion_no_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00051.area" column
-#+
-#+ @param p_area - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00051_area_checkColumnConstraints(p_area)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_area LIKE vetb00051.area
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_area IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- area: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00051_area_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00051.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00051_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE vetb00051.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_n IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_n: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00051_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00051.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00051_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE vetb00051.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_grupo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_grupo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00051_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00051.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00051_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE vetb00051.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_tipo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_tipo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00051_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00051.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00051_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE vetb00051.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_sec IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_sec: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00051_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00051.descripcion" column
-#+
-#+ @param p_descripcion - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00051_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE vetb00051.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00051_descripcion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00051.cantidad_1" column
-#+
-#+ @param p_cantidad_1 - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00051_cantidad_1_checkColumnConstraints(p_cantidad_1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad_1 LIKE vetb00051.cantidad_1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00051_cantidad_1_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00051.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00051_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE vetb00051.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cantidad IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cantidad: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00051_cantidad_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00051.precio" column
-#+
-#+ @param p_precio - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00051_precio_checkColumnConstraints(p_precio)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_precio LIKE vetb00051.precio
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_precio IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- precio: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00051_precio_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00051.porc_desc" column
-#+
-#+ @param p_porc_desc - DECIMAL(8,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00051_porc_desc_checkColumnConstraints(p_porc_desc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_porc_desc LIKE vetb00051.porc_desc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00051_porc_desc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00051.nombre_file" column
-#+
-#+ @param p_nombre_file - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00051_nombre_file_checkColumnConstraints(p_nombre_file)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombre_file LIKE vetb00051.nombre_file
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00051_nombre_file_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00051.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00051_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE vetb00051.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00051_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00051.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(15) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00051_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE vetb00051.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00051_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00051.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00051_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE vetb00051.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00051_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00051.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(15) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00051_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE vetb00051.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00051_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00051.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00051_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE vetb00051.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00051_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00051.foto_producto" column
-#+
-#+ @param p_foto_producto - CHAR(200) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00051_foto_producto_checkColumnConstraints(p_foto_producto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_foto_producto LIKE vetb00051.foto_producto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00051_foto_producto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00051.descripcion_area" column
-#+
-#+ @param p_descripcion_area - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00051_descripcion_area_checkColumnConstraints(p_descripcion_area)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion_area LIKE vetb00051.descripcion_area
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00051_descripcion_area_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00051.id_kit" column
-#+
-#+ @param p_id_kit - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00051_id_kit_checkColumnConstraints(p_id_kit)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_id_kit LIKE vetb00051.id_kit
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00051_id_kit_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00050" table
-#+
-#+ @param p_data - a row data LIKE vetb00050.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00050_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vetb00050.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vetb00050_cod_cia_checkColumnConstraints(p_data.cod_cia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00050_ventas_checkColumnConstraints(p_data.ventas) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00050_cotizacion_no_checkColumnConstraints(p_data.cotizacion_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00050_tipo_cliente_checkColumnConstraints(p_data.tipo_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00050_sec_cliente_checkColumnConstraints(p_data.sec_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00050_nombre_cliente_checkColumnConstraints(p_data.nombre_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00050_rnc_checkColumnConstraints(p_data.rnc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00050_nombre_proyecto_checkColumnConstraints(p_data.nombre_proyecto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00050_direccion_cliente_checkColumnConstraints(p_data.direccion_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00050_cod_provincia_checkColumnConstraints(p_data.cod_provincia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00050_direccion_proyecto_checkColumnConstraints(p_data.direccion_proyecto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00050_telefono_r_checkColumnConstraints(p_data.telefono_r) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00050_telefono_o_checkColumnConstraints(p_data.telefono_o) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00050_email_checkColumnConstraints(p_data.email) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00050_tipo_precio_checkColumnConstraints(p_data.tipo_precio) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00050_beeper_checkColumnConstraints(p_data.beeper) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00050_celular_checkColumnConstraints(p_data.celular) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00050_prima_checkColumnConstraints(p_data.prima) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00050_fax1_checkColumnConstraints(p_data.fax1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00050_celular1_checkColumnConstraints(p_data.celular1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00050_fax_checkColumnConstraints(p_data.fax) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00050_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00050_fecha_entrega_checkColumnConstraints(p_data.fecha_entrega) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00050_plazo_entrega_checkColumnConstraints(p_data.plazo_entrega) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00050_comentario_checkColumnConstraints(p_data.comentario) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00050_contacto_checkColumnConstraints(p_data.contacto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00050_cond_pago_checkColumnConstraints(p_data.cond_pago) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00050_sec_vend_checkColumnConstraints(p_data.sec_vend) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00050_porc_itbi_checkColumnConstraints(p_data.porc_itbi) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00050_total_bruto_checkColumnConstraints(p_data.total_bruto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00050_sub_total_checkColumnConstraints(p_data.sub_total) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00050_monto_desc_checkColumnConstraints(p_data.monto_desc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00050_monto_itbi_checkColumnConstraints(p_data.monto_itbi) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00050_total_neto_checkColumnConstraints(p_data.total_neto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00050_monto_dolar_checkColumnConstraints(p_data.monto_dolar) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00050_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00050_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00050_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00050_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00050_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00050_checkTableConstraints
-
-{}
-#+ Check constraints on the "vetb00050.cod_cia" column
-#+
-#+ @param p_cod_cia - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00050_cod_cia_checkColumnConstraints(p_cod_cia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_cia LIKE vetb00050.cod_cia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00050_cod_cia_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00050.ventas" column
-#+
-#+ @param p_ventas - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00050_ventas_checkColumnConstraints(p_ventas)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ventas LIKE vetb00050.ventas
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00050_ventas_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00050.cotizacion_no" column
-#+
-#+ @param p_cotizacion_no - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00050_cotizacion_no_checkColumnConstraints(p_cotizacion_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cotizacion_no LIKE vetb00050.cotizacion_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cotizacion_no IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cotizacion_no: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00050_cotizacion_no_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00050.tipo_cliente" column
-#+
-#+ @param p_tipo_cliente - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00050_tipo_cliente_checkColumnConstraints(p_tipo_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_cliente LIKE vetb00050.tipo_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00050_tipo_cliente_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00050.sec_cliente" column
-#+
-#+ @param p_sec_cliente - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00050_sec_cliente_checkColumnConstraints(p_sec_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_cliente LIKE vetb00050.sec_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00050_sec_cliente_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00050.nombre_cliente" column
-#+
-#+ @param p_nombre_cliente - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00050_nombre_cliente_checkColumnConstraints(p_nombre_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombre_cliente LIKE vetb00050.nombre_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_nombre_cliente IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- nombre_cliente: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00050_nombre_cliente_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00050.rnc" column
-#+
-#+ @param p_rnc - CHAR(11) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00050_rnc_checkColumnConstraints(p_rnc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_rnc LIKE vetb00050.rnc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00050_rnc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00050.nombre_proyecto" column
-#+
-#+ @param p_nombre_proyecto - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00050_nombre_proyecto_checkColumnConstraints(p_nombre_proyecto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombre_proyecto LIKE vetb00050.nombre_proyecto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00050_nombre_proyecto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00050.direccion_cliente" column
-#+
-#+ @param p_direccion_cliente - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00050_direccion_cliente_checkColumnConstraints(p_direccion_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_direccion_cliente LIKE vetb00050.direccion_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00050_direccion_cliente_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00050.cod_provincia" column
-#+
-#+ @param p_cod_provincia - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00050_cod_provincia_checkColumnConstraints(p_cod_provincia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_provincia LIKE vetb00050.cod_provincia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_provincia IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_provincia: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00050_cod_provincia_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00050.direccion_proyecto" column
-#+
-#+ @param p_direccion_proyecto - VARCHAR2(170) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00050_direccion_proyecto_checkColumnConstraints(p_direccion_proyecto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_direccion_proyecto LIKE vetb00050.direccion_proyecto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00050_direccion_proyecto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00050.telefono_r" column
-#+
-#+ @param p_telefono_r - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00050_telefono_r_checkColumnConstraints(p_telefono_r)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_telefono_r LIKE vetb00050.telefono_r
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00050_telefono_r_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00050.telefono_o" column
-#+
-#+ @param p_telefono_o - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00050_telefono_o_checkColumnConstraints(p_telefono_o)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_telefono_o LIKE vetb00050.telefono_o
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00050_telefono_o_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00050.email" column
-#+
-#+ @param p_email - CHAR(100) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00050_email_checkColumnConstraints(p_email)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_email LIKE vetb00050.email
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00050_email_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00050.tipo_precio" column
-#+
-#+ @param p_tipo_precio - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00050_tipo_precio_checkColumnConstraints(p_tipo_precio)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_precio LIKE vetb00050.tipo_precio
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00050_tipo_precio_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00050.beeper" column
-#+
-#+ @param p_beeper - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00050_beeper_checkColumnConstraints(p_beeper)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_beeper LIKE vetb00050.beeper
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00050_beeper_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00050.celular" column
-#+
-#+ @param p_celular - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00050_celular_checkColumnConstraints(p_celular)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_celular LIKE vetb00050.celular
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00050_celular_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00050.prima" column
-#+
-#+ @param p_prima - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00050_prima_checkColumnConstraints(p_prima)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_prima LIKE vetb00050.prima
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00050_prima_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00050.fax1" column
-#+
-#+ @param p_fax1 - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00050_fax1_checkColumnConstraints(p_fax1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fax1 LIKE vetb00050.fax1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00050_fax1_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00050.celular1" column
-#+
-#+ @param p_celular1 - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00050_celular1_checkColumnConstraints(p_celular1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_celular1 LIKE vetb00050.celular1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00050_celular1_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00050.fax" column
-#+
-#+ @param p_fax - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00050_fax_checkColumnConstraints(p_fax)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fax LIKE vetb00050.fax
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00050_fax_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00050.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00050_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE vetb00050.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00050_fecha_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00050.fecha_entrega" column
-#+
-#+ @param p_fecha_entrega - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00050_fecha_entrega_checkColumnConstraints(p_fecha_entrega)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_entrega LIKE vetb00050.fecha_entrega
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00050_fecha_entrega_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00050.plazo_entrega" column
-#+
-#+ @param p_plazo_entrega - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00050_plazo_entrega_checkColumnConstraints(p_plazo_entrega)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_plazo_entrega LIKE vetb00050.plazo_entrega
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00050_plazo_entrega_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00050.comentario" column
-#+
-#+ @param p_comentario - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00050_comentario_checkColumnConstraints(p_comentario)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_comentario LIKE vetb00050.comentario
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00050_comentario_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00050.contacto" column
-#+
-#+ @param p_contacto - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00050_contacto_checkColumnConstraints(p_contacto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_contacto LIKE vetb00050.contacto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00050_contacto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00050.cond_pago" column
-#+
-#+ @param p_cond_pago - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00050_cond_pago_checkColumnConstraints(p_cond_pago)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cond_pago LIKE vetb00050.cond_pago
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00050_cond_pago_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00050.sec_vend" column
-#+
-#+ @param p_sec_vend - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00050_sec_vend_checkColumnConstraints(p_sec_vend)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_vend LIKE vetb00050.sec_vend
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00050_sec_vend_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00050.porc_itbi" column
-#+
-#+ @param p_porc_itbi - DECIMAL(8,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00050_porc_itbi_checkColumnConstraints(p_porc_itbi)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_porc_itbi LIKE vetb00050.porc_itbi
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00050_porc_itbi_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00050.total_bruto" column
-#+
-#+ @param p_total_bruto - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00050_total_bruto_checkColumnConstraints(p_total_bruto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_total_bruto LIKE vetb00050.total_bruto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_total_bruto IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- total_bruto: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00050_total_bruto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00050.sub_total" column
-#+
-#+ @param p_sub_total - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00050_sub_total_checkColumnConstraints(p_sub_total)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sub_total LIKE vetb00050.sub_total
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_sub_total IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- sub_total: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00050_sub_total_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00050.monto_desc" column
-#+
-#+ @param p_monto_desc - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00050_monto_desc_checkColumnConstraints(p_monto_desc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_monto_desc LIKE vetb00050.monto_desc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00050_monto_desc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00050.monto_itbi" column
-#+
-#+ @param p_monto_itbi - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00050_monto_itbi_checkColumnConstraints(p_monto_itbi)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_monto_itbi LIKE vetb00050.monto_itbi
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00050_monto_itbi_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00050.total_neto" column
-#+
-#+ @param p_total_neto - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00050_total_neto_checkColumnConstraints(p_total_neto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_total_neto LIKE vetb00050.total_neto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_total_neto IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- total_neto: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00050_total_neto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00050.monto_dolar" column
-#+
-#+ @param p_monto_dolar - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00050_monto_dolar_checkColumnConstraints(p_monto_dolar)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_monto_dolar LIKE vetb00050.monto_dolar
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00050_monto_dolar_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00050.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00050_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE vetb00050.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00050_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00050.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00050_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE vetb00050.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00050_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00050.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00050_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE vetb00050.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00050_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00050.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00050_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE vetb00050.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00050_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00050.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00050_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE vetb00050.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00050_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00049" table
-#+
-#+ @param p_data - a row data LIKE vetb00049.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00049_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vetb00049.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vetb00049_tipo_cliente_checkColumnConstraints(p_data.tipo_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00049_sec_cliente_checkColumnConstraints(p_data.sec_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00049_nombre_proyecto_checkColumnConstraints(p_data.nombre_proyecto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00049_direccion_proyecto_checkColumnConstraints(p_data.direccion_proyecto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00049_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00049_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00049_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00049_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00049_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00049_checkTableConstraints
-
-{}
-#+ Check constraints on the "vetb00049.tipo_cliente" column
-#+
-#+ @param p_tipo_cliente - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00049_tipo_cliente_checkColumnConstraints(p_tipo_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_cliente LIKE vetb00049.tipo_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00049_tipo_cliente_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00049.sec_cliente" column
-#+
-#+ @param p_sec_cliente - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00049_sec_cliente_checkColumnConstraints(p_sec_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_cliente LIKE vetb00049.sec_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00049_sec_cliente_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00049.nombre_proyecto" column
-#+
-#+ @param p_nombre_proyecto - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00049_nombre_proyecto_checkColumnConstraints(p_nombre_proyecto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombre_proyecto LIKE vetb00049.nombre_proyecto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00049_nombre_proyecto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00049.direccion_proyecto" column
-#+
-#+ @param p_direccion_proyecto - CHAR(150) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00049_direccion_proyecto_checkColumnConstraints(p_direccion_proyecto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_direccion_proyecto LIKE vetb00049.direccion_proyecto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00049_direccion_proyecto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00049.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00049_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE vetb00049.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00049_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00049.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00049_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE vetb00049.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00049_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00049.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00049_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE vetb00049.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00049_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00049.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00049_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE vetb00049.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00049_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00049.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00049_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE vetb00049.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00049_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00048" table
-#+
-#+ @param p_data - a row data LIKE vetb00048.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00048_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vetb00048.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vetb00048_factura_checkColumnConstraints(p_data.factura) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00048_detalle_checkColumnConstraints(p_data.detalle) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00048_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00048_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00048_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00048_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00048_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00048_checkTableConstraints
-
-{}
-#+ Check constraints on the "vetb00048.factura" column
-#+
-#+ @param p_factura - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00048_factura_checkColumnConstraints(p_factura)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_factura LIKE vetb00048.factura
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_factura IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- factura: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00048_factura_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00048.detalle" column
-#+
-#+ @param p_detalle - CHAR(180) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00048_detalle_checkColumnConstraints(p_detalle)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_detalle LIKE vetb00048.detalle
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00048_detalle_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00048.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00048_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE vetb00048.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00048_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00048.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00048_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE vetb00048.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00048_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00048.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00048_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE vetb00048.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00048_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00048.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00048_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE vetb00048.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00048_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00048.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00048_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE vetb00048.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00048_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00045" table
-#+
-#+ @param p_data - a row data LIKE vetb00045.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00045_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vetb00045.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vetb00045_ano_checkColumnConstraints(p_data.ano) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00045_mes_checkColumnConstraints(p_data.mes) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00045_ventas_checkColumnConstraints(p_data.ventas) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00045_sec_vend_checkColumnConstraints(p_data.sec_vend) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00045_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00045_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00045_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00045_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00045_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00045_valor_checkColumnConstraints(p_data.valor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00045_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00045_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00045_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00045_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00045_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00045_checkTableConstraints
-
-{}
-#+ Check constraints on the "vetb00045.ano" column
-#+
-#+ @param p_ano - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00045_ano_checkColumnConstraints(p_ano)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ano LIKE vetb00045.ano
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_ano IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- ano: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00045_ano_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00045.mes" column
-#+
-#+ @param p_mes - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00045_mes_checkColumnConstraints(p_mes)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mes LIKE vetb00045.mes
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_mes IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- mes: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00045_mes_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00045.ventas" column
-#+
-#+ @param p_ventas - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00045_ventas_checkColumnConstraints(p_ventas)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ventas LIKE vetb00045.ventas
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00045_ventas_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00045.sec_vend" column
-#+
-#+ @param p_sec_vend - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00045_sec_vend_checkColumnConstraints(p_sec_vend)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_vend LIKE vetb00045.sec_vend
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_sec_vend IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- sec_vend: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00045_sec_vend_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00045.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00045_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE vetb00045.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_n IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_n: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00045_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00045.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00045_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE vetb00045.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_grupo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_grupo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00045_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00045.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00045_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE vetb00045.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_tipo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_tipo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00045_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00045.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00045_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE vetb00045.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_sec IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_sec: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00045_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00045.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(12,3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00045_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE vetb00045.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00045_cantidad_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00045.valor" column
-#+
-#+ @param p_valor - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00045_valor_checkColumnConstraints(p_valor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valor LIKE vetb00045.valor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00045_valor_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00045.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00045_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE vetb00045.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00045_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00045.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00045_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE vetb00045.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00045_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00045.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00045_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE vetb00045.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00045_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00045.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00045_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE vetb00045.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00045_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00045.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00045_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE vetb00045.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00045_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00044" table
-#+
-#+ @param p_data - a row data LIKE vetb00044.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00044_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vetb00044.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vetb00044_ano_checkColumnConstraints(p_data.ano) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00044_mes_checkColumnConstraints(p_data.mes) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00044_ventas_checkColumnConstraints(p_data.ventas) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00044_sec_vend_checkColumnConstraints(p_data.sec_vend) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00044_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00044_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00044_valor_checkColumnConstraints(p_data.valor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00044_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00044_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00044_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00044_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00044_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00044_checkTableConstraints
-
-{}
-#+ Check constraints on the "vetb00044.ano" column
-#+
-#+ @param p_ano - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00044_ano_checkColumnConstraints(p_ano)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ano LIKE vetb00044.ano
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_ano IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- ano: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00044_ano_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00044.mes" column
-#+
-#+ @param p_mes - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00044_mes_checkColumnConstraints(p_mes)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mes LIKE vetb00044.mes
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00044_mes_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00044.ventas" column
-#+
-#+ @param p_ventas - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00044_ventas_checkColumnConstraints(p_ventas)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ventas LIKE vetb00044.ventas
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00044_ventas_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00044.sec_vend" column
-#+
-#+ @param p_sec_vend - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00044_sec_vend_checkColumnConstraints(p_sec_vend)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_vend LIKE vetb00044.sec_vend
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00044_sec_vend_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00044.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00044_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE vetb00044.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00044_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00044.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(12,3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00044_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE vetb00044.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00044_cantidad_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00044.valor" column
-#+
-#+ @param p_valor - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00044_valor_checkColumnConstraints(p_valor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valor LIKE vetb00044.valor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00044_valor_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00044.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00044_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE vetb00044.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00044_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00044.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00044_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE vetb00044.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00044_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00044.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00044_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE vetb00044.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00044_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00044.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00044_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE vetb00044.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00044_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00044.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00044_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE vetb00044.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00044_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00042" table
-#+
-#+ @param p_data - a row data LIKE vetb00042.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00042_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vetb00042.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vetb00042_factura_checkColumnConstraints(p_data.factura) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00042_cod_mov_checkColumnConstraints(p_data.cod_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00042_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00042_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00042_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00042_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00042_serie_checkColumnConstraints(p_data.serie) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00042_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00042_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00042_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00042_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00042_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00042_checkTableConstraints
-
-{}
-#+ Check constraints on the "vetb00042.factura" column
-#+
-#+ @param p_factura - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00042_factura_checkColumnConstraints(p_factura)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_factura LIKE vetb00042.factura
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00042_factura_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00042.cod_mov" column
-#+
-#+ @param p_cod_mov - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00042_cod_mov_checkColumnConstraints(p_cod_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mov LIKE vetb00042.cod_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00042_cod_mov_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00042.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00042_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE vetb00042.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00042_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00042.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00042_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE vetb00042.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00042_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00042.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00042_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE vetb00042.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00042_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00042.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00042_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE vetb00042.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00042_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00042.serie" column
-#+
-#+ @param p_serie - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00042_serie_checkColumnConstraints(p_serie)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_serie LIKE vetb00042.serie
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00042_serie_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00042.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00042_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE vetb00042.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00042_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00042.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00042_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE vetb00042.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00042_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00042.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00042_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE vetb00042.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00042_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00042.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00042_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE vetb00042.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00042_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00042.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00042_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE vetb00042.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00042_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00033" table
-#+
-#+ @param p_data - a row data LIKE vetb00033.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00033_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vetb00033.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vetb00033_id_kit_checkColumnConstraints(p_data.id_kit) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00033_factura_checkColumnConstraints(p_data.factura) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00033_area_checkColumnConstraints(p_data.area) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00033_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00033_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00033_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00033_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00033_precio_checkColumnConstraints(p_data.precio) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00033_checkTableConstraints
-
-{}
-#+ Check constraints on the "vetb00033.id_kit" column
-#+
-#+ @param p_id_kit - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00033_id_kit_checkColumnConstraints(p_id_kit)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_id_kit LIKE vetb00033.id_kit
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00033_id_kit_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00033.factura" column
-#+
-#+ @param p_factura - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00033_factura_checkColumnConstraints(p_factura)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_factura LIKE vetb00033.factura
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00033_factura_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00033.area" column
-#+
-#+ @param p_area - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00033_area_checkColumnConstraints(p_area)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_area LIKE vetb00033.area
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00033_area_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00033.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00033_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE vetb00033.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00033_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00033.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00033_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE vetb00033.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00033_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00033.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00033_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE vetb00033.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00033_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00033.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00033_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE vetb00033.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00033_cantidad_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00033.precio" column
-#+
-#+ @param p_precio - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00033_precio_checkColumnConstraints(p_precio)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_precio LIKE vetb00033.precio
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00033_precio_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00031" table
-#+
-#+ @param p_data - a row data LIKE vetb00031.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00031_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vetb00031.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vetb00031_id_kit_checkColumnConstraints(p_data.id_kit) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00031_cotizacion_no_checkColumnConstraints(p_data.cotizacion_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00031_area_checkColumnConstraints(p_data.area) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00031_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00031_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00031_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00031_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00031_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00031_precio_checkColumnConstraints(p_data.precio) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00031_porc_desc_checkColumnConstraints(p_data.porc_desc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00031_checkTableConstraints
-
-{}
-#+ Check constraints on the "vetb00031.id_kit" column
-#+
-#+ @param p_id_kit - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00031_id_kit_checkColumnConstraints(p_id_kit)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_id_kit LIKE vetb00031.id_kit
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00031_id_kit_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00031.cotizacion_no" column
-#+
-#+ @param p_cotizacion_no - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00031_cotizacion_no_checkColumnConstraints(p_cotizacion_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cotizacion_no LIKE vetb00031.cotizacion_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00031_cotizacion_no_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00031.area" column
-#+
-#+ @param p_area - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00031_area_checkColumnConstraints(p_area)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_area LIKE vetb00031.area
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00031_area_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00031.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00031_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE vetb00031.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00031_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00031.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00031_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE vetb00031.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00031_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00031.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00031_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE vetb00031.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00031_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00031.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00031_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE vetb00031.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00031_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00031.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00031_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE vetb00031.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00031_cantidad_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00031.precio" column
-#+
-#+ @param p_precio - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00031_precio_checkColumnConstraints(p_precio)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_precio LIKE vetb00031.precio
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00031_precio_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00031.porc_desc" column
-#+
-#+ @param p_porc_desc - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00031_porc_desc_checkColumnConstraints(p_porc_desc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_porc_desc LIKE vetb00031.porc_desc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00031_porc_desc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00030" table
-#+
-#+ @param p_data - a row data LIKE vetb00030.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00030_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vetb00030.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vetb00030_id_kit_checkColumnConstraints(p_data.id_kit) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00030_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00030_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00030_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00030_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00030_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00030_porc_desc_checkColumnConstraints(p_data.porc_desc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00030_precio_checkColumnConstraints(p_data.precio) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00030_checkTableConstraints
-
-{}
-#+ Check constraints on the "vetb00030.id_kit" column
-#+
-#+ @param p_id_kit - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00030_id_kit_checkColumnConstraints(p_id_kit)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_id_kit LIKE vetb00030.id_kit
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00030_id_kit_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00030.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00030_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE vetb00030.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00030_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00030.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00030_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE vetb00030.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00030_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00030.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00030_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE vetb00030.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00030_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00030.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00030_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE vetb00030.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00030_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00030.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00030_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE vetb00030.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00030_cantidad_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00030.porc_desc" column
-#+
-#+ @param p_porc_desc - DECIMAL(18,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00030_porc_desc_checkColumnConstraints(p_porc_desc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_porc_desc LIKE vetb00030.porc_desc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00030_porc_desc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00030.precio" column
-#+
-#+ @param p_precio - DECIMAL(18,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00030_precio_checkColumnConstraints(p_precio)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_precio LIKE vetb00030.precio
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00030_precio_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00029" table
-#+
-#+ @param p_data - a row data LIKE vetb00029.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00029_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vetb00029.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vetb00029_id_kit_checkColumnConstraints(p_data.id_kit) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00029_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00029_disponible_checkColumnConstraints(p_data.disponible) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00029_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00029_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00029_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00029_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00029_valor_total_checkColumnConstraints(p_data.valor_total) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00029_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00029_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00029_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00029_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00029_checkTableConstraints
-
-{}
-#+ Check constraints on the "vetb00029.id_kit" column
-#+
-#+ @param p_id_kit - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00029_id_kit_checkColumnConstraints(p_id_kit)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_id_kit LIKE vetb00029.id_kit
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00029_id_kit_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00029.descripcion" column
-#+
-#+ @param p_descripcion - CHAR(100) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00029_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE vetb00029.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00029_descripcion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00029.disponible" column
-#+
-#+ @param p_disponible - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00029_disponible_checkColumnConstraints(p_disponible)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_disponible LIKE vetb00029.disponible
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00029_disponible_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00029.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00029_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE vetb00029.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00029_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00029.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00029_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE vetb00029.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00029_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00029.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00029_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE vetb00029.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00029_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00029.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00029_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE vetb00029.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00029_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00029.valor_total" column
-#+
-#+ @param p_valor_total - DECIMAL(18,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00029_valor_total_checkColumnConstraints(p_valor_total)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valor_total LIKE vetb00029.valor_total
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00029_valor_total_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00029.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00029_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE vetb00029.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00029_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00029.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00029_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE vetb00029.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00029_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00029.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00029_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE vetb00029.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00029_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00029.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00029_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE vetb00029.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00029_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00028" table
-#+
-#+ @param p_data - a row data LIKE vetb00028.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00028_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vetb00028.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vetb00028_cod_vend_checkColumnConstraints(p_data.cod_vend) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00028_sec_vend_checkColumnConstraints(p_data.sec_vend) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00028_tipo_cliente_checkColumnConstraints(p_data.tipo_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00028_sec_cliente_checkColumnConstraints(p_data.sec_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00028_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00028_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00028_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00028_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00028_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00028_checkTableConstraints
-
-{}
-#+ Check constraints on the "vetb00028.cod_vend" column
-#+
-#+ @param p_cod_vend - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00028_cod_vend_checkColumnConstraints(p_cod_vend)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_vend LIKE vetb00028.cod_vend
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00028_cod_vend_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00028.sec_vend" column
-#+
-#+ @param p_sec_vend - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00028_sec_vend_checkColumnConstraints(p_sec_vend)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_vend LIKE vetb00028.sec_vend
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_sec_vend IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- sec_vend: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00028_sec_vend_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00028.tipo_cliente" column
-#+
-#+ @param p_tipo_cliente - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00028_tipo_cliente_checkColumnConstraints(p_tipo_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_cliente LIKE vetb00028.tipo_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_tipo_cliente IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- tipo_cliente: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00028_tipo_cliente_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00028.sec_cliente" column
-#+
-#+ @param p_sec_cliente - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00028_sec_cliente_checkColumnConstraints(p_sec_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_cliente LIKE vetb00028.sec_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_sec_cliente IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- sec_cliente: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00028_sec_cliente_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00028.status_t" column
-#+
-#+ @param p_status_t - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00028_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE vetb00028.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00028_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00028.us_crea" column
-#+
-#+ @param p_us_crea - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00028_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE vetb00028.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00028_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00028.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00028_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE vetb00028.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00028_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00028.us_mod" column
-#+
-#+ @param p_us_mod - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00028_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE vetb00028.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00028_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00028.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00028_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE vetb00028.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00028_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00027" table
-#+
-#+ @param p_data - a row data LIKE vetb00027.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00027_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vetb00027.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vetb00027_tipo_desc_checkColumnConstraints(p_data.tipo_desc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00027_descrip_checkColumnConstraints(p_data.descrip) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00027_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00027_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00027_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00027_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00027_porc_desc_checkColumnConstraints(p_data.porc_desc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00027_cantidad_1_checkColumnConstraints(p_data.cantidad_1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00027_cantidad_2_checkColumnConstraints(p_data.cantidad_2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00027_cajas_bonif_checkColumnConstraints(p_data.cajas_bonif) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00027_fecha_cambio_checkColumnConstraints(p_data.fecha_cambio) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00027_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00027_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00027_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00027_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00027_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00027_checkTableConstraints
-
-{}
-#+ Check constraints on the "vetb00027.tipo_desc" column
-#+
-#+ @param p_tipo_desc - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00027_tipo_desc_checkColumnConstraints(p_tipo_desc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_desc LIKE vetb00027.tipo_desc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00027_tipo_desc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00027.descrip" column
-#+
-#+ @param p_descrip - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00027_descrip_checkColumnConstraints(p_descrip)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descrip LIKE vetb00027.descrip
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00027_descrip_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00027.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00027_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE vetb00027.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00027_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00027.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00027_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE vetb00027.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00027_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00027.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00027_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE vetb00027.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00027_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00027.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00027_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE vetb00027.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00027_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00027.porc_desc" column
-#+
-#+ @param p_porc_desc - DECIMAL(5,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00027_porc_desc_checkColumnConstraints(p_porc_desc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_porc_desc LIKE vetb00027.porc_desc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00027_porc_desc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00027.cantidad_1" column
-#+
-#+ @param p_cantidad_1 - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00027_cantidad_1_checkColumnConstraints(p_cantidad_1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad_1 LIKE vetb00027.cantidad_1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00027_cantidad_1_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00027.cantidad_2" column
-#+
-#+ @param p_cantidad_2 - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00027_cantidad_2_checkColumnConstraints(p_cantidad_2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad_2 LIKE vetb00027.cantidad_2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00027_cantidad_2_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00027.cajas_bonif" column
-#+
-#+ @param p_cajas_bonif - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00027_cajas_bonif_checkColumnConstraints(p_cajas_bonif)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cajas_bonif LIKE vetb00027.cajas_bonif
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00027_cajas_bonif_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00027.fecha_cambio" column
-#+
-#+ @param p_fecha_cambio - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00027_fecha_cambio_checkColumnConstraints(p_fecha_cambio)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_cambio LIKE vetb00027.fecha_cambio
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00027_fecha_cambio_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00027.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00027_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE vetb00027.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00027_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00027.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00027_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE vetb00027.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00027_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00027.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00027_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE vetb00027.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00027_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00027.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00027_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE vetb00027.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00027_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00027.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00027_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE vetb00027.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00027_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00026" table
-#+
-#+ @param p_data - a row data LIKE vetb00026.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00026_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vetb00026.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vetb00026_codid_checkColumnConstraints(p_data.codid) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00026_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00026_checkTableConstraints
-
-{}
-#+ Check constraints on the "vetb00026.codid" column
-#+
-#+ @param p_codid - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00026_codid_checkColumnConstraints(p_codid)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codid LIKE vetb00026.codid
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00026_codid_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00026.descripcion" column
-#+
-#+ @param p_descripcion - CHAR(25) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00026_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE vetb00026.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00026_descripcion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00025" table
-#+
-#+ @param p_data - a row data LIKE vetb00025.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00025_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vetb00025.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vetb00025_ventas_checkColumnConstraints(p_data.ventas) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00025_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00025_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00025_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00025_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00025_tipo_cliente_checkColumnConstraints(p_data.tipo_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00025_sec_cliente_checkColumnConstraints(p_data.sec_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00025_precio_checkColumnConstraints(p_data.precio) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00025_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00025_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00025_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00025_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00025_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00025_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00025_cod_lista_checkColumnConstraints(p_data.cod_lista) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00025_fecha_inicial_checkColumnConstraints(p_data.fecha_inicial) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00025_fecha_final_checkColumnConstraints(p_data.fecha_final) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00025_idrow_checkColumnConstraints(p_data.idrow) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00025_checkTableConstraints
-
-{}
-#+ Check constraints on the "vetb00025.ventas" column
-#+
-#+ @param p_ventas - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00025_ventas_checkColumnConstraints(p_ventas)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ventas LIKE vetb00025.ventas
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_ventas IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- ventas: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00025_ventas_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00025.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00025_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE vetb00025.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_n IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_n: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00025_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00025.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00025_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE vetb00025.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_grupo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_grupo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00025_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00025.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00025_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE vetb00025.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_tipo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_tipo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00025_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00025.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00025_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE vetb00025.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_sec IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_sec: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00025_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00025.tipo_cliente" column
-#+
-#+ @param p_tipo_cliente - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00025_tipo_cliente_checkColumnConstraints(p_tipo_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_cliente LIKE vetb00025.tipo_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00025_tipo_cliente_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00025.sec_cliente" column
-#+
-#+ @param p_sec_cliente - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00025_sec_cliente_checkColumnConstraints(p_sec_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_cliente LIKE vetb00025.sec_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00025_sec_cliente_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00025.precio" column
-#+
-#+ @param p_precio - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00025_precio_checkColumnConstraints(p_precio)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_precio LIKE vetb00025.precio
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_precio IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- precio: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00025_precio_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00025.descripcion" column
-#+
-#+ @param p_descripcion - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00025_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE vetb00025.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00025_descripcion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00025.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00025_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE vetb00025.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00025_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00025.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00025_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE vetb00025.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00025_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00025.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00025_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE vetb00025.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00025_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00025.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00025_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE vetb00025.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00025_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00025.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00025_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE vetb00025.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00025_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00025.cod_lista" column
-#+
-#+ @param p_cod_lista - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00025_cod_lista_checkColumnConstraints(p_cod_lista)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_lista LIKE vetb00025.cod_lista
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00025_cod_lista_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00025.fecha_inicial" column
-#+
-#+ @param p_fecha_inicial - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00025_fecha_inicial_checkColumnConstraints(p_fecha_inicial)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_inicial LIKE vetb00025.fecha_inicial
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00025_fecha_inicial_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00025.fecha_final" column
-#+
-#+ @param p_fecha_final - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00025_fecha_final_checkColumnConstraints(p_fecha_final)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_final LIKE vetb00025.fecha_final
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00025_fecha_final_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00025.idrow" column
-#+
-#+ @param p_idrow - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00025_idrow_checkColumnConstraints(p_idrow)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_idrow LIKE vetb00025.idrow
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_idrow IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- idrow: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00025_idrow_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00024" table
-#+
-#+ @param p_data - a row data LIKE vetb00024.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00024_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vetb00024.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vetb00024_fecha_ini_sem_checkColumnConstraints(p_data.fecha_ini_sem) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00024_fecha_fin_sem_checkColumnConstraints(p_data.fecha_fin_sem) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00024_cod_vend_checkColumnConstraints(p_data.cod_vend) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00024_sec_vend_checkColumnConstraints(p_data.sec_vend) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00024_tipo_cliente_checkColumnConstraints(p_data.tipo_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00024_sec_cliente_checkColumnConstraints(p_data.sec_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00024_fecha_visita_checkColumnConstraints(p_data.fecha_visita) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00024_hora_visita_checkColumnConstraints(p_data.hora_visita) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00024_compra_checkColumnConstraints(p_data.compra) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00024_persona_contacto_checkColumnConstraints(p_data.persona_contacto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00024_observacion_checkColumnConstraints(p_data.observacion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00024_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00024_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00024_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00024_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00024_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00024_checkTableConstraints
-
-{}
-#+ Check constraints on the "vetb00024.fecha_ini_sem" column
-#+
-#+ @param p_fecha_ini_sem - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00024_fecha_ini_sem_checkColumnConstraints(p_fecha_ini_sem)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_ini_sem LIKE vetb00024.fecha_ini_sem
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00024_fecha_ini_sem_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00024.fecha_fin_sem" column
-#+
-#+ @param p_fecha_fin_sem - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00024_fecha_fin_sem_checkColumnConstraints(p_fecha_fin_sem)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_fin_sem LIKE vetb00024.fecha_fin_sem
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00024_fecha_fin_sem_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00024.cod_vend" column
-#+
-#+ @param p_cod_vend - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00024_cod_vend_checkColumnConstraints(p_cod_vend)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_vend LIKE vetb00024.cod_vend
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00024_cod_vend_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00024.sec_vend" column
-#+
-#+ @param p_sec_vend - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00024_sec_vend_checkColumnConstraints(p_sec_vend)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_vend LIKE vetb00024.sec_vend
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00024_sec_vend_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00024.tipo_cliente" column
-#+
-#+ @param p_tipo_cliente - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00024_tipo_cliente_checkColumnConstraints(p_tipo_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_cliente LIKE vetb00024.tipo_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00024_tipo_cliente_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00024.sec_cliente" column
-#+
-#+ @param p_sec_cliente - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00024_sec_cliente_checkColumnConstraints(p_sec_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_cliente LIKE vetb00024.sec_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00024_sec_cliente_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00024.fecha_visita" column
-#+
-#+ @param p_fecha_visita - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00024_fecha_visita_checkColumnConstraints(p_fecha_visita)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_visita LIKE vetb00024.fecha_visita
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00024_fecha_visita_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00024.hora_visita" column
-#+
-#+ @param p_hora_visita - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00024_hora_visita_checkColumnConstraints(p_hora_visita)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_hora_visita LIKE vetb00024.hora_visita
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00024_hora_visita_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00024.compra" column
-#+
-#+ @param p_compra - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00024_compra_checkColumnConstraints(p_compra)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_compra LIKE vetb00024.compra
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00024_compra_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00024.persona_contacto" column
-#+
-#+ @param p_persona_contacto - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00024_persona_contacto_checkColumnConstraints(p_persona_contacto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_persona_contacto LIKE vetb00024.persona_contacto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00024_persona_contacto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00024.observacion" column
-#+
-#+ @param p_observacion - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00024_observacion_checkColumnConstraints(p_observacion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_observacion LIKE vetb00024.observacion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00024_observacion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00024.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00024_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE vetb00024.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00024_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00024.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00024_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE vetb00024.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00024_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00024.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00024_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE vetb00024.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00024_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00024.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00024_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE vetb00024.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00024_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00024.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00024_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE vetb00024.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00024_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00023" table
-#+
-#+ @param p_data - a row data LIKE vetb00023.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00023_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vetb00023.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vetb00023_cod_tarifa_checkColumnConstraints(p_data.cod_tarifa) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00023_descrip_checkColumnConstraints(p_data.descrip) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00023_cod_provincia_checkColumnConstraints(p_data.cod_provincia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00023_tarifa_pago_checkColumnConstraints(p_data.tarifa_pago) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00023_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00023_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00023_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00023_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00023_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00023_checkTableConstraints
-
-{}
-#+ Check constraints on the "vetb00023.cod_tarifa" column
-#+
-#+ @param p_cod_tarifa - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00023_cod_tarifa_checkColumnConstraints(p_cod_tarifa)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tarifa LIKE vetb00023.cod_tarifa
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00023_cod_tarifa_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00023.descrip" column
-#+
-#+ @param p_descrip - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00023_descrip_checkColumnConstraints(p_descrip)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descrip LIKE vetb00023.descrip
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00023_descrip_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00023.cod_provincia" column
-#+
-#+ @param p_cod_provincia - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00023_cod_provincia_checkColumnConstraints(p_cod_provincia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_provincia LIKE vetb00023.cod_provincia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00023_cod_provincia_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00023.tarifa_pago" column
-#+
-#+ @param p_tarifa_pago - DECIMAL(7,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00023_tarifa_pago_checkColumnConstraints(p_tarifa_pago)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tarifa_pago LIKE vetb00023.tarifa_pago
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00023_tarifa_pago_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00023.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00023_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE vetb00023.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00023_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00023.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00023_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE vetb00023.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00023_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00023.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00023_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE vetb00023.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00023_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00023.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00023_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE vetb00023.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00023_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00023.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00023_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE vetb00023.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00023_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00022" table
-#+
-#+ @param p_data - a row data LIKE vetb00022.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00022_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vetb00022.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vetb00022_etiqueta_checkColumnConstraints(p_data.etiqueta) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00022_cotizacion_no_checkColumnConstraints(p_data.cotizacion_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00022_secuencia_checkColumnConstraints(p_data.secuencia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00022_area_checkColumnConstraints(p_data.area) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00022_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00022_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00022_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00022_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00022_lado_1_checkColumnConstraints(p_data.lado_1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00022_lado_2_checkColumnConstraints(p_data.lado_2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00022_lado_3_checkColumnConstraints(p_data.lado_3) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00022_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00022_medida_checkColumnConstraints(p_data.medida) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00022_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00022_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00022_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00022_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00022_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00022_checkTableConstraints
-
-{}
-#+ Check constraints on the "vetb00022.etiqueta" column
-#+
-#+ @param p_etiqueta - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00022_etiqueta_checkColumnConstraints(p_etiqueta)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_etiqueta LIKE vetb00022.etiqueta
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_etiqueta IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- etiqueta: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00022_etiqueta_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00022.cotizacion_no" column
-#+
-#+ @param p_cotizacion_no - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00022_cotizacion_no_checkColumnConstraints(p_cotizacion_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cotizacion_no LIKE vetb00022.cotizacion_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cotizacion_no IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cotizacion_no: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00022_cotizacion_no_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00022.secuencia" column
-#+
-#+ @param p_secuencia - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00022_secuencia_checkColumnConstraints(p_secuencia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_secuencia LIKE vetb00022.secuencia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_secuencia IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- secuencia: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00022_secuencia_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00022.area" column
-#+
-#+ @param p_area - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00022_area_checkColumnConstraints(p_area)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_area LIKE vetb00022.area
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00022_area_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00022.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00022_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE vetb00022.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00022_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00022.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00022_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE vetb00022.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00022_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00022.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00022_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE vetb00022.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00022_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00022.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00022_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE vetb00022.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00022_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00022.lado_1" column
-#+
-#+ @param p_lado_1 - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00022_lado_1_checkColumnConstraints(p_lado_1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_lado_1 LIKE vetb00022.lado_1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00022_lado_1_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00022.lado_2" column
-#+
-#+ @param p_lado_2 - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00022_lado_2_checkColumnConstraints(p_lado_2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_lado_2 LIKE vetb00022.lado_2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00022_lado_2_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00022.lado_3" column
-#+
-#+ @param p_lado_3 - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00022_lado_3_checkColumnConstraints(p_lado_3)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_lado_3 LIKE vetb00022.lado_3
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00022_lado_3_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00022.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00022_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE vetb00022.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00022_cantidad_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00022.medida" column
-#+
-#+ @param p_medida - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00022_medida_checkColumnConstraints(p_medida)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_medida LIKE vetb00022.medida
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00022_medida_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00022.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00022_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE vetb00022.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00022_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00022.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00022_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE vetb00022.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00022_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00022.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00022_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE vetb00022.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00022_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00022.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00022_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE vetb00022.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00022_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00022.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00022_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE vetb00022.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00022_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00021" table
-#+
-#+ @param p_data - a row data LIKE vetb00021.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00021_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vetb00021.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vetb00021_num_doc_checkColumnConstraints(p_data.num_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00021_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00021_tipo_cliente_checkColumnConstraints(p_data.tipo_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00021_sec_cliente_checkColumnConstraints(p_data.sec_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00021_nombre_checkColumnConstraints(p_data.nombre) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00021_factura_checkColumnConstraints(p_data.factura) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00021_referencia_pago_checkColumnConstraints(p_data.referencia_pago) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00021_banco_checkColumnConstraints(p_data.banco) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00021_ventas_checkColumnConstraints(p_data.ventas) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00021_sucid_checkColumnConstraints(p_data.sucid) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00021_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00021_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00021_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00021_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00021_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00021_checkTableConstraints
-
-{}
-#+ Check constraints on the "vetb00021.num_doc" column
-#+
-#+ @param p_num_doc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00021_num_doc_checkColumnConstraints(p_num_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_doc LIKE vetb00021.num_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00021_num_doc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00021.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00021_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE vetb00021.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00021_fecha_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00021.tipo_cliente" column
-#+
-#+ @param p_tipo_cliente - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00021_tipo_cliente_checkColumnConstraints(p_tipo_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_cliente LIKE vetb00021.tipo_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00021_tipo_cliente_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00021.sec_cliente" column
-#+
-#+ @param p_sec_cliente - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00021_sec_cliente_checkColumnConstraints(p_sec_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_cliente LIKE vetb00021.sec_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00021_sec_cliente_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00021.nombre" column
-#+
-#+ @param p_nombre - CHAR(100) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00021_nombre_checkColumnConstraints(p_nombre)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombre LIKE vetb00021.nombre
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00021_nombre_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00021.factura" column
-#+
-#+ @param p_factura - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00021_factura_checkColumnConstraints(p_factura)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_factura LIKE vetb00021.factura
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00021_factura_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00021.referencia_pago" column
-#+
-#+ @param p_referencia_pago - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00021_referencia_pago_checkColumnConstraints(p_referencia_pago)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_referencia_pago LIKE vetb00021.referencia_pago
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00021_referencia_pago_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00021.banco" column
-#+
-#+ @param p_banco - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00021_banco_checkColumnConstraints(p_banco)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_banco LIKE vetb00021.banco
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00021_banco_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00021.ventas" column
-#+
-#+ @param p_ventas - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00021_ventas_checkColumnConstraints(p_ventas)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ventas LIKE vetb00021.ventas
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00021_ventas_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00021.sucid" column
-#+
-#+ @param p_sucid - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00021_sucid_checkColumnConstraints(p_sucid)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sucid LIKE vetb00021.sucid
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00021_sucid_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00021.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00021_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE vetb00021.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00021_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00021.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00021_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE vetb00021.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00021_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00021.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00021_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE vetb00021.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00021_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00021.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00021_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE vetb00021.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00021_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00021.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00021_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE vetb00021.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00021_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00020" table
-#+
-#+ @param p_data - a row data LIKE vetb00020.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00020_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vetb00020.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vetb00020_cod_provincia_checkColumnConstraints(p_data.cod_provincia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00020_nombre_provincia_checkColumnConstraints(p_data.nombre_provincia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00020_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00020_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00020_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00020_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00020_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00020_id_ciudad_checkColumnConstraints(p_data.id_ciudad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- CALL smarmotech_dbxconstraints_vetb00020_pk_vetb00020_checkUniqueConstraint(p_forUpdate, p_data.cod_provincia, p_data.id_ciudad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00020_checkTableConstraints
-
-{}
-#+ Check the primary key uniqueness constraint on the "vetb00020"
-#+
-#+ @param p_key - Primary Key
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00020_pk_vetb00020_checkUniqueConstraint(p_forUpdate, p_key)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_key
- RECORD
- vetb00020_cod_provincia LIKE vetb00020.cod_provincia,
- vetb00020_id_ciudad LIKE vetb00020.id_ciudad
- END RECORD
- DEFINE l_key
- RECORD
- vetb00020_cod_provincia LIKE vetb00020.cod_provincia,
- vetb00020_id_ciudad LIKE vetb00020.id_ciudad
- END RECORD
- DEFINE l_where STRING
- DEFINE l_sqlQuery STRING
- DEFINE l_count INTEGER
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- LET l_where = "WHERE vetb00020.cod_provincia = ?
- AND vetb00020.id_ciudad = ? "
-
- let l_sqlQuery = "SELECT COUNT(*), cod_provincia, id_ciudad FROM vetb00020 ", l_where, " GROUP BY cod_provincia, id_ciudad"
-
- PREPARE cur_vetb00020_pk_vetb00020_checkUniqueConstraint FROM l_sqlQuery
- EXECUTE cur_vetb00020_pk_vetb00020_checkUniqueConstraint INTO l_count, l_key.* USING p_key.*
- FREE cur_vetb00020_pk_vetb00020_checkUniqueConstraint
- IF (NOT p_forUpdate AND l_count > 0) OR (p_forUpdate AND l_count > 0 AND p_key.* != l_key.*) THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_provincia + id_ciudad: " || ERROR_BAM_00002) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00020_pk_vetb00020_checkUniqueConstraint
-
-{}
-#+ Check constraints on the "vetb00020.cod_provincia" column
-#+
-#+ @param p_cod_provincia - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00020_cod_provincia_checkColumnConstraints(p_cod_provincia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_provincia LIKE vetb00020.cod_provincia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_provincia IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_provincia: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00020_cod_provincia_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00020.nombre_provincia" column
-#+
-#+ @param p_nombre_provincia - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00020_nombre_provincia_checkColumnConstraints(p_nombre_provincia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombre_provincia LIKE vetb00020.nombre_provincia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00020_nombre_provincia_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00020.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00020_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE vetb00020.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00020_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00020.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00020_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE vetb00020.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00020_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00020.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00020_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE vetb00020.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00020_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00020.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00020_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE vetb00020.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00020_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00020.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00020_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE vetb00020.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00020_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00020.id_ciudad" column
-#+
-#+ @param p_id_ciudad - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00020_id_ciudad_checkColumnConstraints(p_id_ciudad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_id_ciudad LIKE vetb00020.id_ciudad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_id_ciudad IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- id_ciudad: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00020_id_ciudad_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00019" table
-#+
-#+ @param p_data - a row data LIKE vetb00019.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00019_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vetb00019.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vetb00019_ano_checkColumnConstraints(p_data.ano) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00019_mes_ini_checkColumnConstraints(p_data.mes_ini) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00019_mes_fin_checkColumnConstraints(p_data.mes_fin) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00019_prima_checkColumnConstraints(p_data.prima) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00019_itbi_checkColumnConstraints(p_data.itbi) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00019_porciento_checkColumnConstraints(p_data.porciento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00019_disponible_checkColumnConstraints(p_data.disponible) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00019_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00019_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00019_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00019_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00019_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00019_checkTableConstraints
-
-{}
-#+ Check constraints on the "vetb00019.ano" column
-#+
-#+ @param p_ano - CHAR(4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00019_ano_checkColumnConstraints(p_ano)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ano LIKE vetb00019.ano
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00019_ano_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00019.mes_ini" column
-#+
-#+ @param p_mes_ini - CHAR(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00019_mes_ini_checkColumnConstraints(p_mes_ini)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mes_ini LIKE vetb00019.mes_ini
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00019_mes_ini_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00019.mes_fin" column
-#+
-#+ @param p_mes_fin - CHAR(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00019_mes_fin_checkColumnConstraints(p_mes_fin)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mes_fin LIKE vetb00019.mes_fin
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00019_mes_fin_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00019.prima" column
-#+
-#+ @param p_prima - DECIMAL(7,3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00019_prima_checkColumnConstraints(p_prima)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_prima LIKE vetb00019.prima
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00019_prima_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00019.itbi" column
-#+
-#+ @param p_itbi - DECIMAL(7,3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00019_itbi_checkColumnConstraints(p_itbi)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_itbi LIKE vetb00019.itbi
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00019_itbi_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00019.porciento" column
-#+
-#+ @param p_porciento - DECIMAL(8,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00019_porciento_checkColumnConstraints(p_porciento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_porciento LIKE vetb00019.porciento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00019_porciento_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00019.disponible" column
-#+
-#+ @param p_disponible - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00019_disponible_checkColumnConstraints(p_disponible)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_disponible LIKE vetb00019.disponible
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00019_disponible_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00019.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00019_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE vetb00019.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00019_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00019.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00019_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE vetb00019.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00019_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00019.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00019_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE vetb00019.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00019_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00019.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00019_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE vetb00019.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00019_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00019.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00019_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE vetb00019.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00019_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00018" table
-#+
-#+ @param p_data - a row data LIKE vetb00018.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00018_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vetb00018.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vetb00018_anos_checkColumnConstraints(p_data.anos) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00018_fecha_in_checkColumnConstraints(p_data.fecha_in) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00018_fecha_fi_checkColumnConstraints(p_data.fecha_fi) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00018_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00018_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00018_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00018_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00018_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00018_checkTableConstraints
-
-{}
-#+ Check constraints on the "vetb00018.anos" column
-#+
-#+ @param p_anos - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00018_anos_checkColumnConstraints(p_anos)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_anos LIKE vetb00018.anos
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00018_anos_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00018.fecha_in" column
-#+
-#+ @param p_fecha_in - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00018_fecha_in_checkColumnConstraints(p_fecha_in)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_in LIKE vetb00018.fecha_in
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00018_fecha_in_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00018.fecha_fi" column
-#+
-#+ @param p_fecha_fi - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00018_fecha_fi_checkColumnConstraints(p_fecha_fi)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_fi LIKE vetb00018.fecha_fi
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00018_fecha_fi_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00018.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00018_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE vetb00018.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00018_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00018.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00018_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE vetb00018.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00018_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00018.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00018_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE vetb00018.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00018_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00018.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00018_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE vetb00018.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00018_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00018.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00018_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE vetb00018.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00018_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00016" table
-#+
-#+ @param p_data - a row data LIKE vetb00016.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00016_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vetb00016.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vetb00016_id_ciudad_checkColumnConstraints(p_data.id_ciudad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00016_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00016_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00016_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00016_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00016_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00016_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00016_checkTableConstraints
-
-{}
-#+ Check constraints on the "vetb00016.id_ciudad" column
-#+
-#+ @param p_id_ciudad - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00016_id_ciudad_checkColumnConstraints(p_id_ciudad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_id_ciudad LIKE vetb00016.id_ciudad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00016_id_ciudad_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00016.descripcion" column
-#+
-#+ @param p_descripcion - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00016_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE vetb00016.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00016_descripcion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00016.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00016_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE vetb00016.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00016_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00016.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00016_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE vetb00016.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00016_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00016.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00016_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE vetb00016.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00016_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00016.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00016_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE vetb00016.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00016_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00016.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00016_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE vetb00016.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00016_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00015" table
-#+
-#+ @param p_data - a row data LIKE vetb00015.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00015_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vetb00015.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vetb00015_cod_transp_checkColumnConstraints(p_data.cod_transp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00015_sec_transp_checkColumnConstraints(p_data.sec_transp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00015_nombre_checkColumnConstraints(p_data.nombre) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00015_cedula_checkColumnConstraints(p_data.cedula) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00015_serie_checkColumnConstraints(p_data.serie) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00015_calle_checkColumnConstraints(p_data.calle) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00015_casa_num_checkColumnConstraints(p_data.casa_num) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00015_barrio_checkColumnConstraints(p_data.barrio) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00015_urbanizacion_checkColumnConstraints(p_data.urbanizacion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00015_cod_zona_checkColumnConstraints(p_data.cod_zona) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00015_cod_provincia_checkColumnConstraints(p_data.cod_provincia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00015_telefono_checkColumnConstraints(p_data.telefono) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00015_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00015_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00015_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00015_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00015_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00015_checkTableConstraints
-
-{}
-#+ Check constraints on the "vetb00015.cod_transp" column
-#+
-#+ @param p_cod_transp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00015_cod_transp_checkColumnConstraints(p_cod_transp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_transp LIKE vetb00015.cod_transp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00015_cod_transp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00015.sec_transp" column
-#+
-#+ @param p_sec_transp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00015_sec_transp_checkColumnConstraints(p_sec_transp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_transp LIKE vetb00015.sec_transp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00015_sec_transp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00015.nombre" column
-#+
-#+ @param p_nombre - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00015_nombre_checkColumnConstraints(p_nombre)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombre LIKE vetb00015.nombre
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00015_nombre_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00015.cedula" column
-#+
-#+ @param p_cedula - VARCHAR2(15) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00015_cedula_checkColumnConstraints(p_cedula)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cedula LIKE vetb00015.cedula
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00015_cedula_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00015.serie" column
-#+
-#+ @param p_serie - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00015_serie_checkColumnConstraints(p_serie)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_serie LIKE vetb00015.serie
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00015_serie_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00015.calle" column
-#+
-#+ @param p_calle - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00015_calle_checkColumnConstraints(p_calle)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_calle LIKE vetb00015.calle
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00015_calle_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00015.casa_num" column
-#+
-#+ @param p_casa_num - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00015_casa_num_checkColumnConstraints(p_casa_num)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_casa_num LIKE vetb00015.casa_num
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00015_casa_num_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00015.barrio" column
-#+
-#+ @param p_barrio - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00015_barrio_checkColumnConstraints(p_barrio)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_barrio LIKE vetb00015.barrio
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00015_barrio_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00015.urbanizacion" column
-#+
-#+ @param p_urbanizacion - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00015_urbanizacion_checkColumnConstraints(p_urbanizacion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_urbanizacion LIKE vetb00015.urbanizacion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00015_urbanizacion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00015.cod_zona" column
-#+
-#+ @param p_cod_zona - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00015_cod_zona_checkColumnConstraints(p_cod_zona)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_zona LIKE vetb00015.cod_zona
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00015_cod_zona_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00015.cod_provincia" column
-#+
-#+ @param p_cod_provincia - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00015_cod_provincia_checkColumnConstraints(p_cod_provincia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_provincia LIKE vetb00015.cod_provincia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00015_cod_provincia_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00015.telefono" column
-#+
-#+ @param p_telefono - CHAR(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00015_telefono_checkColumnConstraints(p_telefono)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_telefono LIKE vetb00015.telefono
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00015_telefono_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00015.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00015_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE vetb00015.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00015_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00015.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00015_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE vetb00015.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00015_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00015.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00015_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE vetb00015.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00015_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00015.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00015_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE vetb00015.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00015_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00015.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00015_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE vetb00015.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00015_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00014" table
-#+
-#+ @param p_data - a row data LIKE vetb00014.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00014_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vetb00014.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vetb00014_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00014_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00014_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00014_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00014_peso_bruto_checkColumnConstraints(p_data.peso_bruto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00014_peso_neto_checkColumnConstraints(p_data.peso_neto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00014_dim_caja_checkColumnConstraints(p_data.dim_caja) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00014_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00014_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00014_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00014_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00014_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00014_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00014_checkTableConstraints
-
-{}
-#+ Check constraints on the "vetb00014.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00014_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE vetb00014.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00014_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00014.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00014_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE vetb00014.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00014_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00014.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00014_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE vetb00014.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00014_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00014.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00014_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE vetb00014.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00014_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00014.peso_bruto" column
-#+
-#+ @param p_peso_bruto - DECIMAL(10,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00014_peso_bruto_checkColumnConstraints(p_peso_bruto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_peso_bruto LIKE vetb00014.peso_bruto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00014_peso_bruto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00014.peso_neto" column
-#+
-#+ @param p_peso_neto - DECIMAL(10,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00014_peso_neto_checkColumnConstraints(p_peso_neto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_peso_neto LIKE vetb00014.peso_neto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00014_peso_neto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00014.dim_caja" column
-#+
-#+ @param p_dim_caja - DECIMAL(10,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00014_dim_caja_checkColumnConstraints(p_dim_caja)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_dim_caja LIKE vetb00014.dim_caja
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00014_dim_caja_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00014.cantidad" column
-#+
-#+ @param p_cantidad - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00014_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE vetb00014.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00014_cantidad_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00014.status_t" column
-#+
-#+ @param p_status_t - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00014_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE vetb00014.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00014_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00014.us_crea" column
-#+
-#+ @param p_us_crea - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00014_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE vetb00014.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00014_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00014.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00014_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE vetb00014.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00014_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00014.us_mod" column
-#+
-#+ @param p_us_mod - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00014_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE vetb00014.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00014_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00014.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00014_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE vetb00014.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00014_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00013" table
-#+
-#+ @param p_data - a row data LIKE vetb00013.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00013_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vetb00013.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vetb00013_tipo_desc_checkColumnConstraints(p_data.tipo_desc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00013_descrip_checkColumnConstraints(p_data.descrip) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00013_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00013_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00013_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00013_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00013_dias_validos_checkColumnConstraints(p_data.dias_validos) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00013_porc_desc_checkColumnConstraints(p_data.porc_desc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00013_valor_desc_checkColumnConstraints(p_data.valor_desc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00013_cantidad_1_checkColumnConstraints(p_data.cantidad_1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00013_cantidad_2_checkColumnConstraints(p_data.cantidad_2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00013_cajas_bonif_checkColumnConstraints(p_data.cajas_bonif) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00013_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00013_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00013_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00013_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00013_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00013_checkTableConstraints
-
-{}
-#+ Check constraints on the "vetb00013.tipo_desc" column
-#+
-#+ @param p_tipo_desc - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00013_tipo_desc_checkColumnConstraints(p_tipo_desc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_desc LIKE vetb00013.tipo_desc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00013_tipo_desc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00013.descrip" column
-#+
-#+ @param p_descrip - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00013_descrip_checkColumnConstraints(p_descrip)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descrip LIKE vetb00013.descrip
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00013_descrip_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00013.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00013_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE vetb00013.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00013_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00013.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00013_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE vetb00013.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00013_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00013.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00013_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE vetb00013.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00013_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00013.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00013_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE vetb00013.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00013_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00013.dias_validos" column
-#+
-#+ @param p_dias_validos - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00013_dias_validos_checkColumnConstraints(p_dias_validos)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_dias_validos LIKE vetb00013.dias_validos
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00013_dias_validos_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00013.porc_desc" column
-#+
-#+ @param p_porc_desc - DECIMAL(5,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00013_porc_desc_checkColumnConstraints(p_porc_desc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_porc_desc LIKE vetb00013.porc_desc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00013_porc_desc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00013.valor_desc" column
-#+
-#+ @param p_valor_desc - DECIMAL(8,3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00013_valor_desc_checkColumnConstraints(p_valor_desc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valor_desc LIKE vetb00013.valor_desc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00013_valor_desc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00013.cantidad_1" column
-#+
-#+ @param p_cantidad_1 - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00013_cantidad_1_checkColumnConstraints(p_cantidad_1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad_1 LIKE vetb00013.cantidad_1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00013_cantidad_1_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00013.cantidad_2" column
-#+
-#+ @param p_cantidad_2 - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00013_cantidad_2_checkColumnConstraints(p_cantidad_2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad_2 LIKE vetb00013.cantidad_2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00013_cantidad_2_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00013.cajas_bonif" column
-#+
-#+ @param p_cajas_bonif - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00013_cajas_bonif_checkColumnConstraints(p_cajas_bonif)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cajas_bonif LIKE vetb00013.cajas_bonif
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00013_cajas_bonif_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00013.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00013_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE vetb00013.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00013_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00013.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00013_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE vetb00013.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00013_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00013.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00013_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE vetb00013.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00013_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00013.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00013_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE vetb00013.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00013_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00013.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00013_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE vetb00013.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00013_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00012" table
-#+
-#+ @param p_data - a row data LIKE vetb00012.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00012_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vetb00012.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vetb00012_cond_pago_checkColumnConstraints(p_data.cond_pago) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00012_descrip_checkColumnConstraints(p_data.descrip) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00012_dias_checkColumnConstraints(p_data.dias) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00012_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00012_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00012_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00012_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00012_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00012_porcentaje_checkColumnConstraints(p_data.porcentaje) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00012_sucid_checkColumnConstraints(p_data.sucid) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00012_defecto_checkColumnConstraints(p_data.defecto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00012_checkTableConstraints
-
-{}
-#+ Check constraints on the "vetb00012.cond_pago" column
-#+
-#+ @param p_cond_pago - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00012_cond_pago_checkColumnConstraints(p_cond_pago)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cond_pago LIKE vetb00012.cond_pago
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cond_pago IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cond_pago: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00012_cond_pago_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00012.descrip" column
-#+
-#+ @param p_descrip - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00012_descrip_checkColumnConstraints(p_descrip)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descrip LIKE vetb00012.descrip
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00012_descrip_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00012.dias" column
-#+
-#+ @param p_dias - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00012_dias_checkColumnConstraints(p_dias)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_dias LIKE vetb00012.dias
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00012_dias_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00012.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00012_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE vetb00012.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00012_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00012.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00012_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE vetb00012.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00012_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00012.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00012_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE vetb00012.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00012_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00012.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00012_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE vetb00012.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00012_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00012.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00012_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE vetb00012.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00012_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00012.porcentaje" column
-#+
-#+ @param p_porcentaje - DECIMAL(18,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00012_porcentaje_checkColumnConstraints(p_porcentaje)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_porcentaje LIKE vetb00012.porcentaje
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00012_porcentaje_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00012.sucid" column
-#+
-#+ @param p_sucid - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00012_sucid_checkColumnConstraints(p_sucid)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sucid LIKE vetb00012.sucid
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00012_sucid_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00012.defecto" column
-#+
-#+ @param p_defecto - CHAR(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00012_defecto_checkColumnConstraints(p_defecto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_defecto LIKE vetb00012.defecto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00012_defecto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00011" table
-#+
-#+ @param p_data - a row data LIKE vetb00011.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00011_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vetb00011.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vetb00011_cod_vend_checkColumnConstraints(p_data.cod_vend) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00011_sec_vend_checkColumnConstraints(p_data.sec_vend) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00011_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00011_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00011_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00011_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00011_porc_ventas_checkColumnConstraints(p_data.porc_ventas) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00011_porc_cobros_checkColumnConstraints(p_data.porc_cobros) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00011_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00011_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00011_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00011_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00011_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00011_checkTableConstraints
-
-{}
-#+ Check constraints on the "vetb00011.cod_vend" column
-#+
-#+ @param p_cod_vend - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00011_cod_vend_checkColumnConstraints(p_cod_vend)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_vend LIKE vetb00011.cod_vend
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00011_cod_vend_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00011.sec_vend" column
-#+
-#+ @param p_sec_vend - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00011_sec_vend_checkColumnConstraints(p_sec_vend)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_vend LIKE vetb00011.sec_vend
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00011_sec_vend_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00011.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00011_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE vetb00011.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00011_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00011.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00011_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE vetb00011.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00011_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00011.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00011_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE vetb00011.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00011_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00011.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00011_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE vetb00011.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00011_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00011.porc_ventas" column
-#+
-#+ @param p_porc_ventas - DECIMAL(8,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00011_porc_ventas_checkColumnConstraints(p_porc_ventas)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_porc_ventas LIKE vetb00011.porc_ventas
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00011_porc_ventas_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00011.porc_cobros" column
-#+
-#+ @param p_porc_cobros - DECIMAL(8,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00011_porc_cobros_checkColumnConstraints(p_porc_cobros)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_porc_cobros LIKE vetb00011.porc_cobros
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00011_porc_cobros_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00011.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00011_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE vetb00011.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00011_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00011.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00011_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE vetb00011.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00011_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00011.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00011_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE vetb00011.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00011_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00011.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00011_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE vetb00011.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00011_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00011.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00011_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE vetb00011.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00011_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00010" table
-#+
-#+ @param p_data - a row data LIKE vetb00010.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00010_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vetb00010.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vetb00010_cod_vend_checkColumnConstraints(p_data.cod_vend) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00010_sec_vend_checkColumnConstraints(p_data.sec_vend) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00010_cod_zona_checkColumnConstraints(p_data.cod_zona) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00010_cod_provincia_checkColumnConstraints(p_data.cod_provincia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00010_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00010_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00010_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00010_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00010_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00010_checkTableConstraints
-
-{}
-#+ Check constraints on the "vetb00010.cod_vend" column
-#+
-#+ @param p_cod_vend - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00010_cod_vend_checkColumnConstraints(p_cod_vend)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_vend LIKE vetb00010.cod_vend
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00010_cod_vend_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00010.sec_vend" column
-#+
-#+ @param p_sec_vend - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00010_sec_vend_checkColumnConstraints(p_sec_vend)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_vend LIKE vetb00010.sec_vend
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00010_sec_vend_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00010.cod_zona" column
-#+
-#+ @param p_cod_zona - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00010_cod_zona_checkColumnConstraints(p_cod_zona)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_zona LIKE vetb00010.cod_zona
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00010_cod_zona_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00010.cod_provincia" column
-#+
-#+ @param p_cod_provincia - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00010_cod_provincia_checkColumnConstraints(p_cod_provincia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_provincia LIKE vetb00010.cod_provincia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00010_cod_provincia_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00010.status_t" column
-#+
-#+ @param p_status_t - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00010_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE vetb00010.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00010_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00010.us_crea" column
-#+
-#+ @param p_us_crea - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00010_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE vetb00010.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00010_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00010.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00010_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE vetb00010.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00010_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00010.us_mod" column
-#+
-#+ @param p_us_mod - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00010_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE vetb00010.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00010_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00010.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00010_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE vetb00010.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00010_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00009" table
-#+
-#+ @param p_data - a row data LIKE vetb00009.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00009_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vetb00009.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vetb00009_cod_zona_checkColumnConstraints(p_data.cod_zona) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00009_cod_provincia_checkColumnConstraints(p_data.cod_provincia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00009_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00009_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00009_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00009_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00009_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00009_checkTableConstraints
-
-{}
-#+ Check constraints on the "vetb00009.cod_zona" column
-#+
-#+ @param p_cod_zona - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00009_cod_zona_checkColumnConstraints(p_cod_zona)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_zona LIKE vetb00009.cod_zona
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00009_cod_zona_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00009.cod_provincia" column
-#+
-#+ @param p_cod_provincia - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00009_cod_provincia_checkColumnConstraints(p_cod_provincia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_provincia LIKE vetb00009.cod_provincia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00009_cod_provincia_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00009.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00009_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE vetb00009.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00009_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00009.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00009_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE vetb00009.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00009_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00009.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00009_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE vetb00009.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00009_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00009.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00009_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE vetb00009.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00009_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00009.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00009_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE vetb00009.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00009_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00008" table
-#+
-#+ @param p_data - a row data LIKE vetb00008.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00008_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vetb00008.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vetb00008_cod_zona_checkColumnConstraints(p_data.cod_zona) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00008_descrip_checkColumnConstraints(p_data.descrip) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00008_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00008_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00008_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00008_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00008_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00008_checkTableConstraints
-
-{}
-#+ Check constraints on the "vetb00008.cod_zona" column
-#+
-#+ @param p_cod_zona - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00008_cod_zona_checkColumnConstraints(p_cod_zona)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_zona LIKE vetb00008.cod_zona
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00008_cod_zona_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00008.descrip" column
-#+
-#+ @param p_descrip - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00008_descrip_checkColumnConstraints(p_descrip)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descrip LIKE vetb00008.descrip
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00008_descrip_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00008.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00008_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE vetb00008.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00008_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00008.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00008_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE vetb00008.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00008_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00008.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00008_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE vetb00008.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00008_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00008.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00008_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE vetb00008.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00008_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00008.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00008_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE vetb00008.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00008_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00007" table
-#+
-#+ @param p_data - a row data LIKE vetb00007.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00007_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vetb00007.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vetb00007_tipo_cliente_checkColumnConstraints(p_data.tipo_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00007_sec_cliente_checkColumnConstraints(p_data.sec_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00007_tipo_desc_checkColumnConstraints(p_data.tipo_desc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00007_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00007_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00007_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00007_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00007_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00007_checkTableConstraints
-
-{}
-#+ Check constraints on the "vetb00007.tipo_cliente" column
-#+
-#+ @param p_tipo_cliente - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00007_tipo_cliente_checkColumnConstraints(p_tipo_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_cliente LIKE vetb00007.tipo_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00007_tipo_cliente_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00007.sec_cliente" column
-#+
-#+ @param p_sec_cliente - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00007_sec_cliente_checkColumnConstraints(p_sec_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_cliente LIKE vetb00007.sec_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00007_sec_cliente_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00007.tipo_desc" column
-#+
-#+ @param p_tipo_desc - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00007_tipo_desc_checkColumnConstraints(p_tipo_desc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_desc LIKE vetb00007.tipo_desc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00007_tipo_desc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00007.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00007_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE vetb00007.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00007_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00007.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00007_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE vetb00007.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00007_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00007.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00007_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE vetb00007.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00007_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00007.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00007_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE vetb00007.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00007_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00007.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00007_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE vetb00007.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00007_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00006" table
-#+
-#+ @param p_data - a row data LIKE vetb00006.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00006_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vetb00006.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vetb00006_tipo_cliente_s_checkColumnConstraints(p_data.tipo_cliente_s) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00006_sec_cliente_s_checkColumnConstraints(p_data.sec_cliente_s) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00006_fecha_solicitud_s_checkColumnConstraints(p_data.fecha_solicitud_s) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00006_condicion_venta_s_checkColumnConstraints(p_data.condicion_venta_s) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00006_solicitante_s_checkColumnConstraints(p_data.solicitante_s) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00006_cedula_s_checkColumnConstraints(p_data.cedula_s) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00006_serie_s_checkColumnConstraints(p_data.serie_s) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00006_calle_s_checkColumnConstraints(p_data.calle_s) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00006_casa_num_s_checkColumnConstraints(p_data.casa_num_s) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00006_barrio_s_checkColumnConstraints(p_data.barrio_s) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00006_urbanizacion_s_checkColumnConstraints(p_data.urbanizacion_s) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00006_cod_provincia_s_checkColumnConstraints(p_data.cod_provincia_s) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00006_telefono_s_checkColumnConstraints(p_data.telefono_s) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00006_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00006_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00006_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00006_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00006_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00006_checkTableConstraints
-
-{}
-#+ Check constraints on the "vetb00006.tipo_cliente_s" column
-#+
-#+ @param p_tipo_cliente_s - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00006_tipo_cliente_s_checkColumnConstraints(p_tipo_cliente_s)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_cliente_s LIKE vetb00006.tipo_cliente_s
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00006_tipo_cliente_s_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00006.sec_cliente_s" column
-#+
-#+ @param p_sec_cliente_s - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00006_sec_cliente_s_checkColumnConstraints(p_sec_cliente_s)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_cliente_s LIKE vetb00006.sec_cliente_s
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00006_sec_cliente_s_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00006.fecha_solicitud_s" column
-#+
-#+ @param p_fecha_solicitud_s - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00006_fecha_solicitud_s_checkColumnConstraints(p_fecha_solicitud_s)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_solicitud_s LIKE vetb00006.fecha_solicitud_s
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00006_fecha_solicitud_s_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00006.condicion_venta_s" column
-#+
-#+ @param p_condicion_venta_s - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00006_condicion_venta_s_checkColumnConstraints(p_condicion_venta_s)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_condicion_venta_s LIKE vetb00006.condicion_venta_s
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00006_condicion_venta_s_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00006.solicitante_s" column
-#+
-#+ @param p_solicitante_s - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00006_solicitante_s_checkColumnConstraints(p_solicitante_s)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_solicitante_s LIKE vetb00006.solicitante_s
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00006_solicitante_s_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00006.cedula_s" column
-#+
-#+ @param p_cedula_s - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00006_cedula_s_checkColumnConstraints(p_cedula_s)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cedula_s LIKE vetb00006.cedula_s
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00006_cedula_s_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00006.serie_s" column
-#+
-#+ @param p_serie_s - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00006_serie_s_checkColumnConstraints(p_serie_s)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_serie_s LIKE vetb00006.serie_s
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00006_serie_s_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00006.calle_s" column
-#+
-#+ @param p_calle_s - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00006_calle_s_checkColumnConstraints(p_calle_s)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_calle_s LIKE vetb00006.calle_s
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00006_calle_s_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00006.casa_num_s" column
-#+
-#+ @param p_casa_num_s - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00006_casa_num_s_checkColumnConstraints(p_casa_num_s)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_casa_num_s LIKE vetb00006.casa_num_s
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00006_casa_num_s_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00006.barrio_s" column
-#+
-#+ @param p_barrio_s - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00006_barrio_s_checkColumnConstraints(p_barrio_s)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_barrio_s LIKE vetb00006.barrio_s
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00006_barrio_s_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00006.urbanizacion_s" column
-#+
-#+ @param p_urbanizacion_s - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00006_urbanizacion_s_checkColumnConstraints(p_urbanizacion_s)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_urbanizacion_s LIKE vetb00006.urbanizacion_s
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00006_urbanizacion_s_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00006.cod_provincia_s" column
-#+
-#+ @param p_cod_provincia_s - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00006_cod_provincia_s_checkColumnConstraints(p_cod_provincia_s)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_provincia_s LIKE vetb00006.cod_provincia_s
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00006_cod_provincia_s_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00006.telefono_s" column
-#+
-#+ @param p_telefono_s - CHAR(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00006_telefono_s_checkColumnConstraints(p_telefono_s)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_telefono_s LIKE vetb00006.telefono_s
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00006_telefono_s_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00006.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00006_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE vetb00006.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00006_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00006.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00006_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE vetb00006.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00006_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00006.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00006_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE vetb00006.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00006_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00006.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00006_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE vetb00006.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00006_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00006.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00006_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE vetb00006.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00006_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00005" table
-#+
-#+ @param p_data - a row data LIKE vetb00005.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00005_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vetb00005.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vetb00005_tipo_cliente_checkColumnConstraints(p_data.tipo_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00005_sec_cliente_checkColumnConstraints(p_data.sec_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00005_calle_checkColumnConstraints(p_data.calle) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00005_casa_num_checkColumnConstraints(p_data.casa_num) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00005_barrio_checkColumnConstraints(p_data.barrio) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00005_urbanizacion_checkColumnConstraints(p_data.urbanizacion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00005_secuencia_visita_checkColumnConstraints(p_data.secuencia_visita) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00005_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00005_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00005_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00005_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00005_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00005_checkTableConstraints
-
-{}
-#+ Check constraints on the "vetb00005.tipo_cliente" column
-#+
-#+ @param p_tipo_cliente - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00005_tipo_cliente_checkColumnConstraints(p_tipo_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_cliente LIKE vetb00005.tipo_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_tipo_cliente IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- tipo_cliente: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00005_tipo_cliente_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00005.sec_cliente" column
-#+
-#+ @param p_sec_cliente - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00005_sec_cliente_checkColumnConstraints(p_sec_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_cliente LIKE vetb00005.sec_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_sec_cliente IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- sec_cliente: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00005_sec_cliente_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00005.calle" column
-#+
-#+ @param p_calle - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00005_calle_checkColumnConstraints(p_calle)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_calle LIKE vetb00005.calle
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00005_calle_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00005.casa_num" column
-#+
-#+ @param p_casa_num - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00005_casa_num_checkColumnConstraints(p_casa_num)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_casa_num LIKE vetb00005.casa_num
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00005_casa_num_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00005.barrio" column
-#+
-#+ @param p_barrio - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00005_barrio_checkColumnConstraints(p_barrio)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_barrio LIKE vetb00005.barrio
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00005_barrio_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00005.urbanizacion" column
-#+
-#+ @param p_urbanizacion - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00005_urbanizacion_checkColumnConstraints(p_urbanizacion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_urbanizacion LIKE vetb00005.urbanizacion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00005_urbanizacion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00005.secuencia_visita" column
-#+
-#+ @param p_secuencia_visita - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00005_secuencia_visita_checkColumnConstraints(p_secuencia_visita)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_secuencia_visita LIKE vetb00005.secuencia_visita
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00005_secuencia_visita_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00005.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00005_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE vetb00005.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00005_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00005.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00005_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE vetb00005.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00005_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00005.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00005_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE vetb00005.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00005_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00005.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00005_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE vetb00005.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00005_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00005.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00005_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE vetb00005.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00005_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00004" table
-#+
-#+ @param p_data - a row data LIKE vetb00004.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00004_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vetb00004.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vetb00004_tipo_cliente_checkColumnConstraints(p_data.tipo_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00004_sec_cliente_checkColumnConstraints(p_data.sec_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00004_nombre_checkColumnConstraints(p_data.nombre) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00004_cod_zona_checkColumnConstraints(p_data.cod_zona) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00004_cod_provincia_checkColumnConstraints(p_data.cod_provincia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00004_telefono_checkColumnConstraints(p_data.telefono) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00004_fax_checkColumnConstraints(p_data.fax) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00004_telex_checkColumnConstraints(p_data.telex) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00004_patente_checkColumnConstraints(p_data.patente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00004_limite_credito_checkColumnConstraints(p_data.limite_credito) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00004_zona_postal_checkColumnConstraints(p_data.zona_postal) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00004_num_rnc_checkColumnConstraints(p_data.num_rnc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00004_nombre_patente_checkColumnConstraints(p_data.nombre_patente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00004_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00004_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00004_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00004_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00004_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00004_puesto_laboral_checkColumnConstraints(p_data.puesto_laboral) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00004_telefono_casa_checkColumnConstraints(p_data.telefono_casa) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00004_tipo_negocio_checkColumnConstraints(p_data.tipo_negocio) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00004_cond_pago_checkColumnConstraints(p_data.cond_pago) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00004_id_ciudad_checkColumnConstraints(p_data.id_ciudad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00004_checkTableConstraints
-
-{}
-#+ Check constraints on the "vetb00004.tipo_cliente" column
-#+
-#+ @param p_tipo_cliente - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00004_tipo_cliente_checkColumnConstraints(p_tipo_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_cliente LIKE vetb00004.tipo_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_tipo_cliente IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- tipo_cliente: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00004_tipo_cliente_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00004.sec_cliente" column
-#+
-#+ @param p_sec_cliente - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00004_sec_cliente_checkColumnConstraints(p_sec_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_cliente LIKE vetb00004.sec_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_sec_cliente IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- sec_cliente: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00004_sec_cliente_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00004.nombre" column
-#+
-#+ @param p_nombre - CHAR(100) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00004_nombre_checkColumnConstraints(p_nombre)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombre LIKE vetb00004.nombre
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00004_nombre_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00004.cod_zona" column
-#+
-#+ @param p_cod_zona - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00004_cod_zona_checkColumnConstraints(p_cod_zona)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_zona LIKE vetb00004.cod_zona
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00004_cod_zona_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00004.cod_provincia" column
-#+
-#+ @param p_cod_provincia - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00004_cod_provincia_checkColumnConstraints(p_cod_provincia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_provincia LIKE vetb00004.cod_provincia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00004_cod_provincia_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00004.telefono" column
-#+
-#+ @param p_telefono - CHAR(16) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00004_telefono_checkColumnConstraints(p_telefono)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_telefono LIKE vetb00004.telefono
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00004_telefono_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00004.fax" column
-#+
-#+ @param p_fax - CHAR(16) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00004_fax_checkColumnConstraints(p_fax)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fax LIKE vetb00004.fax
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00004_fax_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00004.telex" column
-#+
-#+ @param p_telex - CHAR(16) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00004_telex_checkColumnConstraints(p_telex)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_telex LIKE vetb00004.telex
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00004_telex_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00004.patente" column
-#+
-#+ @param p_patente - VARCHAR2(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00004_patente_checkColumnConstraints(p_patente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_patente LIKE vetb00004.patente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00004_patente_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00004.limite_credito" column
-#+
-#+ @param p_limite_credito - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00004_limite_credito_checkColumnConstraints(p_limite_credito)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_limite_credito LIKE vetb00004.limite_credito
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00004_limite_credito_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00004.zona_postal" column
-#+
-#+ @param p_zona_postal - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00004_zona_postal_checkColumnConstraints(p_zona_postal)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_zona_postal LIKE vetb00004.zona_postal
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00004_zona_postal_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00004.num_rnc" column
-#+
-#+ @param p_num_rnc - CHAR(25) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00004_num_rnc_checkColumnConstraints(p_num_rnc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_rnc LIKE vetb00004.num_rnc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00004_num_rnc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00004.nombre_patente" column
-#+
-#+ @param p_nombre_patente - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00004_nombre_patente_checkColumnConstraints(p_nombre_patente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombre_patente LIKE vetb00004.nombre_patente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00004_nombre_patente_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00004.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00004_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE vetb00004.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00004_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00004.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00004_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE vetb00004.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00004_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00004.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00004_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE vetb00004.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00004_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00004.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00004_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE vetb00004.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00004_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00004.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00004_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE vetb00004.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00004_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00004.puesto_laboral" column
-#+
-#+ @param p_puesto_laboral - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00004_puesto_laboral_checkColumnConstraints(p_puesto_laboral)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_puesto_laboral LIKE vetb00004.puesto_laboral
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00004_puesto_laboral_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00004.telefono_casa" column
-#+
-#+ @param p_telefono_casa - CHAR(15) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00004_telefono_casa_checkColumnConstraints(p_telefono_casa)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_telefono_casa LIKE vetb00004.telefono_casa
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00004_telefono_casa_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00004.tipo_negocio" column
-#+
-#+ @param p_tipo_negocio - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00004_tipo_negocio_checkColumnConstraints(p_tipo_negocio)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_negocio LIKE vetb00004.tipo_negocio
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00004_tipo_negocio_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00004.cond_pago" column
-#+
-#+ @param p_cond_pago - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00004_cond_pago_checkColumnConstraints(p_cond_pago)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cond_pago LIKE vetb00004.cond_pago
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00004_cond_pago_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00004.id_ciudad" column
-#+
-#+ @param p_id_ciudad - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00004_id_ciudad_checkColumnConstraints(p_id_ciudad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_id_ciudad LIKE vetb00004.id_ciudad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00004_id_ciudad_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00003" table
-#+
-#+ @param p_data - a row data LIKE vetb00003.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00003_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vetb00003.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vetb00003_cod_cia_checkColumnConstraints(p_data.cod_cia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00003_factura_checkColumnConstraints(p_data.factura) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00003_area_checkColumnConstraints(p_data.area) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00003_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00003_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00003_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00003_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00003_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00003_cantidad_2_checkColumnConstraints(p_data.cantidad_2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00003_bonificacion_checkColumnConstraints(p_data.bonificacion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00003_precio_checkColumnConstraints(p_data.precio) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00003_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00003_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00003_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00003_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00003_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00003_checkTableConstraints
-
-{}
-#+ Check constraints on the "vetb00003.cod_cia" column
-#+
-#+ @param p_cod_cia - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00003_cod_cia_checkColumnConstraints(p_cod_cia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_cia LIKE vetb00003.cod_cia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00003_cod_cia_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00003.factura" column
-#+
-#+ @param p_factura - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00003_factura_checkColumnConstraints(p_factura)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_factura LIKE vetb00003.factura
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00003_factura_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00003.area" column
-#+
-#+ @param p_area - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00003_area_checkColumnConstraints(p_area)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_area LIKE vetb00003.area
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00003_area_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00003.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00003_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE vetb00003.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00003_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00003.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00003_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE vetb00003.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00003_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00003.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00003_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE vetb00003.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00003_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00003.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00003_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE vetb00003.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00003_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00003.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00003_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE vetb00003.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00003_cantidad_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00003.cantidad_2" column
-#+
-#+ @param p_cantidad_2 - DECIMAL(14,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00003_cantidad_2_checkColumnConstraints(p_cantidad_2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad_2 LIKE vetb00003.cantidad_2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00003_cantidad_2_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00003.bonificacion" column
-#+
-#+ @param p_bonificacion - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00003_bonificacion_checkColumnConstraints(p_bonificacion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_bonificacion LIKE vetb00003.bonificacion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00003_bonificacion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00003.precio" column
-#+
-#+ @param p_precio - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00003_precio_checkColumnConstraints(p_precio)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_precio LIKE vetb00003.precio
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00003_precio_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00003.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00003_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE vetb00003.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00003_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00003.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00003_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE vetb00003.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00003_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00003.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00003_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE vetb00003.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00003_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00003.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00003_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE vetb00003.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00003_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00003.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00003_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE vetb00003.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00003_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00002" table
-#+
-#+ @param p_data - a row data LIKE vetb00002.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00002_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vetb00002.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vetb00002_cod_cia_checkColumnConstraints(p_data.cod_cia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00002_factura_checkColumnConstraints(p_data.factura) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00002_fecha_factura_checkColumnConstraints(p_data.fecha_factura) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00002_ventas_checkColumnConstraints(p_data.ventas) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00002_zona_checkColumnConstraints(p_data.zona) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00002_orden_checkColumnConstraints(p_data.orden) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00002_fecha_orden_checkColumnConstraints(p_data.fecha_orden) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00002_conduce_checkColumnConstraints(p_data.conduce) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00002_fecha_conduce_checkColumnConstraints(p_data.fecha_conduce) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00002_tipo_cliente_checkColumnConstraints(p_data.tipo_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00002_sec_cliente_checkColumnConstraints(p_data.sec_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00002_cod_vend_checkColumnConstraints(p_data.cod_vend) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00002_sec_vend_checkColumnConstraints(p_data.sec_vend) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00002_cond_pago_checkColumnConstraints(p_data.cond_pago) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00002_porc_itbi_checkColumnConstraints(p_data.porc_itbi) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00002_porc_desc_checkColumnConstraints(p_data.porc_desc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00002_prima_us_checkColumnConstraints(p_data.prima_us) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00002_sub_total_checkColumnConstraints(p_data.sub_total) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00002_monto_desc_checkColumnConstraints(p_data.monto_desc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00002_monto_itbi_checkColumnConstraints(p_data.monto_itbi) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00002_neto_checkColumnConstraints(p_data.neto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00002_fecha_embarque_checkColumnConstraints(p_data.fecha_embarque) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00002_status_impresion_checkColumnConstraints(p_data.status_impresion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00002_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00002_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00002_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00002_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00002_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00002_documento_checkColumnConstraints(p_data.documento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00002_placa_transporte_checkColumnConstraints(p_data.placa_transporte) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00002_sucid_checkColumnConstraints(p_data.sucid) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00002_num_req_checkColumnConstraints(p_data.num_req) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00002_checkTableConstraints
-
-{}
-#+ Check constraints on the "vetb00002.cod_cia" column
-#+
-#+ @param p_cod_cia - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00002_cod_cia_checkColumnConstraints(p_cod_cia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_cia LIKE vetb00002.cod_cia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00002_cod_cia_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00002.factura" column
-#+
-#+ @param p_factura - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00002_factura_checkColumnConstraints(p_factura)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_factura LIKE vetb00002.factura
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_factura IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- factura: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00002_factura_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00002.fecha_factura" column
-#+
-#+ @param p_fecha_factura - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00002_fecha_factura_checkColumnConstraints(p_fecha_factura)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_factura LIKE vetb00002.fecha_factura
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00002_fecha_factura_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00002.ventas" column
-#+
-#+ @param p_ventas - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00002_ventas_checkColumnConstraints(p_ventas)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ventas LIKE vetb00002.ventas
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00002_ventas_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00002.zona" column
-#+
-#+ @param p_zona - VARCHAR2(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00002_zona_checkColumnConstraints(p_zona)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_zona LIKE vetb00002.zona
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00002_zona_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00002.orden" column
-#+
-#+ @param p_orden - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00002_orden_checkColumnConstraints(p_orden)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_orden LIKE vetb00002.orden
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00002_orden_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00002.fecha_orden" column
-#+
-#+ @param p_fecha_orden - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00002_fecha_orden_checkColumnConstraints(p_fecha_orden)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_orden LIKE vetb00002.fecha_orden
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00002_fecha_orden_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00002.conduce" column
-#+
-#+ @param p_conduce - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00002_conduce_checkColumnConstraints(p_conduce)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_conduce LIKE vetb00002.conduce
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00002_conduce_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00002.fecha_conduce" column
-#+
-#+ @param p_fecha_conduce - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00002_fecha_conduce_checkColumnConstraints(p_fecha_conduce)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_conduce LIKE vetb00002.fecha_conduce
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00002_fecha_conduce_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00002.tipo_cliente" column
-#+
-#+ @param p_tipo_cliente - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00002_tipo_cliente_checkColumnConstraints(p_tipo_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_cliente LIKE vetb00002.tipo_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00002_tipo_cliente_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00002.sec_cliente" column
-#+
-#+ @param p_sec_cliente - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00002_sec_cliente_checkColumnConstraints(p_sec_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_cliente LIKE vetb00002.sec_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00002_sec_cliente_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00002.cod_vend" column
-#+
-#+ @param p_cod_vend - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00002_cod_vend_checkColumnConstraints(p_cod_vend)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_vend LIKE vetb00002.cod_vend
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00002_cod_vend_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00002.sec_vend" column
-#+
-#+ @param p_sec_vend - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00002_sec_vend_checkColumnConstraints(p_sec_vend)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_vend LIKE vetb00002.sec_vend
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00002_sec_vend_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00002.cond_pago" column
-#+
-#+ @param p_cond_pago - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00002_cond_pago_checkColumnConstraints(p_cond_pago)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cond_pago LIKE vetb00002.cond_pago
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00002_cond_pago_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00002.porc_itbi" column
-#+
-#+ @param p_porc_itbi - DECIMAL(5,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00002_porc_itbi_checkColumnConstraints(p_porc_itbi)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_porc_itbi LIKE vetb00002.porc_itbi
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00002_porc_itbi_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00002.porc_desc" column
-#+
-#+ @param p_porc_desc - DECIMAL(8,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00002_porc_desc_checkColumnConstraints(p_porc_desc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_porc_desc LIKE vetb00002.porc_desc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00002_porc_desc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00002.prima_us" column
-#+
-#+ @param p_prima_us - DECIMAL(6,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00002_prima_us_checkColumnConstraints(p_prima_us)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_prima_us LIKE vetb00002.prima_us
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00002_prima_us_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00002.sub_total" column
-#+
-#+ @param p_sub_total - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00002_sub_total_checkColumnConstraints(p_sub_total)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sub_total LIKE vetb00002.sub_total
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00002_sub_total_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00002.monto_desc" column
-#+
-#+ @param p_monto_desc - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00002_monto_desc_checkColumnConstraints(p_monto_desc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_monto_desc LIKE vetb00002.monto_desc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00002_monto_desc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00002.monto_itbi" column
-#+
-#+ @param p_monto_itbi - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00002_monto_itbi_checkColumnConstraints(p_monto_itbi)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_monto_itbi LIKE vetb00002.monto_itbi
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00002_monto_itbi_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00002.neto" column
-#+
-#+ @param p_neto - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00002_neto_checkColumnConstraints(p_neto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_neto LIKE vetb00002.neto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_neto IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- neto: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00002_neto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00002.fecha_embarque" column
-#+
-#+ @param p_fecha_embarque - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00002_fecha_embarque_checkColumnConstraints(p_fecha_embarque)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_embarque LIKE vetb00002.fecha_embarque
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00002_fecha_embarque_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00002.status_impresion" column
-#+
-#+ @param p_status_impresion - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00002_status_impresion_checkColumnConstraints(p_status_impresion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_impresion LIKE vetb00002.status_impresion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00002_status_impresion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00002.status_t" column
-#+
-#+ @param p_status_t - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00002_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE vetb00002.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00002_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00002.us_crea" column
-#+
-#+ @param p_us_crea - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00002_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE vetb00002.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00002_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00002.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00002_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE vetb00002.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00002_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00002.us_mod" column
-#+
-#+ @param p_us_mod - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00002_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE vetb00002.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00002_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00002.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00002_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE vetb00002.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00002_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00002.documento" column
-#+
-#+ @param p_documento - CHAR(15) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00002_documento_checkColumnConstraints(p_documento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_documento LIKE vetb00002.documento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00002_documento_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00002.placa_transporte" column
-#+
-#+ @param p_placa_transporte - CHAR(25) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00002_placa_transporte_checkColumnConstraints(p_placa_transporte)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_placa_transporte LIKE vetb00002.placa_transporte
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00002_placa_transporte_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00002.sucid" column
-#+
-#+ @param p_sucid - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00002_sucid_checkColumnConstraints(p_sucid)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sucid LIKE vetb00002.sucid
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00002_sucid_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00002.num_req" column
-#+
-#+ @param p_num_req - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00002_num_req_checkColumnConstraints(p_num_req)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_req LIKE vetb00002.num_req
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00002_num_req_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00001" table
-#+
-#+ @param p_data - a row data LIKE vetb00001.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00001_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vetb00001.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vetb00001_cod_cia_checkColumnConstraints(p_data.cod_cia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00001_ult_factura_checkColumnConstraints(p_data.ult_factura) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00001_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00001_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00001_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00001_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00001_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00001_sucid_checkColumnConstraints(p_data.sucid) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00001_checkTableConstraints
-
-{}
-#+ Check constraints on the "vetb00001.cod_cia" column
-#+
-#+ @param p_cod_cia - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00001_cod_cia_checkColumnConstraints(p_cod_cia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_cia LIKE vetb00001.cod_cia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00001_cod_cia_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00001.ult_factura" column
-#+
-#+ @param p_ult_factura - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00001_ult_factura_checkColumnConstraints(p_ult_factura)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ult_factura LIKE vetb00001.ult_factura
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00001_ult_factura_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00001.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00001_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE vetb00001.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00001_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00001.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00001_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE vetb00001.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00001_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00001.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00001_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE vetb00001.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00001_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00001.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00001_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE vetb00001.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00001_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00001.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00001_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE vetb00001.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00001_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vetb00001.sucid" column
-#+
-#+ @param p_sucid - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00001_sucid_checkColumnConstraints(p_sucid)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sucid LIKE vetb00001.sucid
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vetb00001_sucid_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ventas" table
-#+
-#+ @param p_data - a row data LIKE ventas.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_ventas_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE ventas.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_ventas_factura_checkColumnConstraints(p_data.factura) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ventas_checkTableConstraints
-
-{}
-#+ Check constraints on the "ventas.factura" column
-#+
-#+ @param p_factura - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ventas_factura_checkColumnConstraints(p_factura)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_factura LIKE ventas.factura
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ventas_factura_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vacaciones" table
-#+
-#+ @param p_data - a row data LIKE vacaciones.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vacaciones_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vacaciones.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vacaciones_ano_checkColumnConstraints(p_data.ano) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vacaciones_num_emp_checkColumnConstraints(p_data.num_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vacaciones_cod_puesto_checkColumnConstraints(p_data.cod_puesto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vacaciones_nom1_emp_checkColumnConstraints(p_data.nom1_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vacaciones_nom2_emp_checkColumnConstraints(p_data.nom2_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vacaciones_apell1_emp_checkColumnConstraints(p_data.apell1_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vacaciones_apell2_emp_checkColumnConstraints(p_data.apell2_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vacaciones_cedula_checkColumnConstraints(p_data.cedula) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vacaciones_serie_checkColumnConstraints(p_data.serie) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vacaciones_nomina_checkColumnConstraints(p_data.nomina) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vacaciones_fecha_ing_checkColumnConstraints(p_data.fecha_ing) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vacaciones_nom_puesto_checkColumnConstraints(p_data.nom_puesto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vacaciones_fech_vac_checkColumnConstraints(p_data.fech_vac) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vacaciones_dia_checkColumnConstraints(p_data.dia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vacaciones_checkTableConstraints
-
-{}
-#+ Check constraints on the "vacaciones.ano" column
-#+
-#+ @param p_ano - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vacaciones_ano_checkColumnConstraints(p_ano)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ano LIKE vacaciones.ano
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vacaciones_ano_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vacaciones.num_emp" column
-#+
-#+ @param p_num_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vacaciones_num_emp_checkColumnConstraints(p_num_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_emp LIKE vacaciones.num_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vacaciones_num_emp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vacaciones.cod_puesto" column
-#+
-#+ @param p_cod_puesto - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vacaciones_cod_puesto_checkColumnConstraints(p_cod_puesto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_puesto LIKE vacaciones.cod_puesto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vacaciones_cod_puesto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vacaciones.nom1_emp" column
-#+
-#+ @param p_nom1_emp - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vacaciones_nom1_emp_checkColumnConstraints(p_nom1_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nom1_emp LIKE vacaciones.nom1_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vacaciones_nom1_emp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vacaciones.nom2_emp" column
-#+
-#+ @param p_nom2_emp - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vacaciones_nom2_emp_checkColumnConstraints(p_nom2_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nom2_emp LIKE vacaciones.nom2_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vacaciones_nom2_emp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vacaciones.apell1_emp" column
-#+
-#+ @param p_apell1_emp - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vacaciones_apell1_emp_checkColumnConstraints(p_apell1_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_apell1_emp LIKE vacaciones.apell1_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vacaciones_apell1_emp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vacaciones.apell2_emp" column
-#+
-#+ @param p_apell2_emp - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vacaciones_apell2_emp_checkColumnConstraints(p_apell2_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_apell2_emp LIKE vacaciones.apell2_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vacaciones_apell2_emp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vacaciones.cedula" column
-#+
-#+ @param p_cedula - CHAR(11) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vacaciones_cedula_checkColumnConstraints(p_cedula)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cedula LIKE vacaciones.cedula
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vacaciones_cedula_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vacaciones.serie" column
-#+
-#+ @param p_serie - CHAR(4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vacaciones_serie_checkColumnConstraints(p_serie)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_serie LIKE vacaciones.serie
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vacaciones_serie_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vacaciones.nomina" column
-#+
-#+ @param p_nomina - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vacaciones_nomina_checkColumnConstraints(p_nomina)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nomina LIKE vacaciones.nomina
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vacaciones_nomina_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vacaciones.fecha_ing" column
-#+
-#+ @param p_fecha_ing - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vacaciones_fecha_ing_checkColumnConstraints(p_fecha_ing)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_ing LIKE vacaciones.fecha_ing
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vacaciones_fecha_ing_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vacaciones.nom_puesto" column
-#+
-#+ @param p_nom_puesto - CHAR(25) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vacaciones_nom_puesto_checkColumnConstraints(p_nom_puesto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nom_puesto LIKE vacaciones.nom_puesto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vacaciones_nom_puesto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vacaciones.fech_vac" column
-#+
-#+ @param p_fech_vac - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vacaciones_fech_vac_checkColumnConstraints(p_fech_vac)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_vac LIKE vacaciones.fech_vac
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vacaciones_fech_vac_checkColumnConstraints
-
-{}
-#+ Check constraints on the "vacaciones.dia" column
-#+
-#+ @param p_dia - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vacaciones_dia_checkColumnConstraints(p_dia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_dia LIKE vacaciones.dia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.vacaciones_dia_checkColumnConstraints
-
-{}
-#+ Check constraints on the "usuarios" table
-#+
-#+ @param p_data - a row data LIKE usuarios.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_usuarios_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE usuarios.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_usuarios_usucodigo_checkColumnConstraints(p_data.usucodigo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_usuarios_usuclave_checkColumnConstraints(p_data.usuclave) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_usuarios_usunombre_checkColumnConstraints(p_data.usunombre) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.usuarios_checkTableConstraints
-
-{}
-#+ Check constraints on the "usuarios.usucodigo" column
-#+
-#+ @param p_usucodigo - VARCHAR2(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_usuarios_usucodigo_checkColumnConstraints(p_usucodigo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_usucodigo LIKE usuarios.usucodigo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_usucodigo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- usucodigo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.usuarios_usucodigo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "usuarios.usuclave" column
-#+
-#+ @param p_usuclave - VARCHAR2(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_usuarios_usuclave_checkColumnConstraints(p_usuclave)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_usuclave LIKE usuarios.usuclave
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_usuclave IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- usuclave: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.usuarios_usuclave_checkColumnConstraints
-
-{}
-#+ Check constraints on the "usuarios.usunombre" column
-#+
-#+ @param p_usunombre - VARCHAR2(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_usuarios_usunombre_checkColumnConstraints(p_usunombre)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_usunombre LIKE usuarios.usunombre
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.usuarios_usunombre_checkColumnConstraints
-
-{}
-#+ Check constraints on the "userinfo" table
-#+
-#+ @param p_data - a row data LIKE userinfo.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_userinfo_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE userinfo.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_userinfo_userid_checkColumnConstraints(p_data.userid) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_userinfo_badgenumber_checkColumnConstraints(p_data.badgenumber) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_userinfo_ssn_checkColumnConstraints(p_data.ssn) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_userinfo_name_checkColumnConstraints(p_data.name) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_userinfo_gender_checkColumnConstraints(p_data.gender) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_userinfo_title_checkColumnConstraints(p_data.title) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_userinfo_pager_checkColumnConstraints(p_data.pager) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_userinfo_birthday_checkColumnConstraints(p_data.birthday) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_userinfo_hiredday_checkColumnConstraints(p_data.hiredday) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_userinfo_street_checkColumnConstraints(p_data.street) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_userinfo_city_checkColumnConstraints(p_data.city) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_userinfo_state_checkColumnConstraints(p_data.state) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_userinfo_zip_checkColumnConstraints(p_data.zip) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_userinfo_ophone_checkColumnConstraints(p_data.ophone) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_userinfo_fphone_checkColumnConstraints(p_data.fphone) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_userinfo_verificationmethod_checkColumnConstraints(p_data.verificationmethod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_userinfo_defaultdeptid_checkColumnConstraints(p_data.defaultdeptid) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_userinfo_securityflags_checkColumnConstraints(p_data.securityflags) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_userinfo_att_checkColumnConstraints(p_data.att) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_userinfo_inlate_checkColumnConstraints(p_data.inlate) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_userinfo_outearly_checkColumnConstraints(p_data.outearly) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_userinfo_overtime_checkColumnConstraints(p_data.overtime) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_userinfo_sep_checkColumnConstraints(p_data.sep) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_userinfo_holiday_checkColumnConstraints(p_data.holiday) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_userinfo_minzu_checkColumnConstraints(p_data.minzu) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_userinfo_password_checkColumnConstraints(p_data.password) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_userinfo_lunchduration_checkColumnConstraints(p_data.lunchduration) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_userinfo_mverifypass_checkColumnConstraints(p_data.mverifypass) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_userinfo_photo_checkColumnConstraints(p_data.photo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_userinfo_notes_checkColumnConstraints(p_data.notes) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_userinfo_privilege_checkColumnConstraints(p_data.privilege) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_userinfo_inheritdeptsch_checkColumnConstraints(p_data.inheritdeptsch) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_userinfo_inheritdeptschclass_checkColumnConstraints(p_data.inheritdeptschclass) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_userinfo_autoschplan_checkColumnConstraints(p_data.autoschplan) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_userinfo_minautoschinterval_checkColumnConstraints(p_data.minautoschinterval) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_userinfo_registerot_checkColumnConstraints(p_data.registerot) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_userinfo_inheritdeptrule_checkColumnConstraints(p_data.inheritdeptrule) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_userinfo_emprivilege_checkColumnConstraints(p_data.emprivilege) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_userinfo_cardno_checkColumnConstraints(p_data.cardno) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.userinfo_checkTableConstraints
-
-{}
-#+ Check constraints on the "userinfo.userid" column
-#+
-#+ @param p_userid - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_userinfo_userid_checkColumnConstraints(p_userid)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_userid LIKE userinfo.userid
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_userid IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- userid: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.userinfo_userid_checkColumnConstraints
-
-{}
-#+ Check constraints on the "userinfo.badgenumber" column
-#+
-#+ @param p_badgenumber - VARCHAR2(24) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_userinfo_badgenumber_checkColumnConstraints(p_badgenumber)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_badgenumber LIKE userinfo.badgenumber
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_badgenumber IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- badgenumber: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.userinfo_badgenumber_checkColumnConstraints
-
-{}
-#+ Check constraints on the "userinfo.ssn" column
-#+
-#+ @param p_ssn - VARCHAR2(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_userinfo_ssn_checkColumnConstraints(p_ssn)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ssn LIKE userinfo.ssn
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.userinfo_ssn_checkColumnConstraints
-
-{}
-#+ Check constraints on the "userinfo.name" column
-#+
-#+ @param p_name - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_userinfo_name_checkColumnConstraints(p_name)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_name LIKE userinfo.name
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.userinfo_name_checkColumnConstraints
-
-{}
-#+ Check constraints on the "userinfo.gender" column
-#+
-#+ @param p_gender - VARCHAR2(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_userinfo_gender_checkColumnConstraints(p_gender)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_gender LIKE userinfo.gender
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.userinfo_gender_checkColumnConstraints
-
-{}
-#+ Check constraints on the "userinfo.title" column
-#+
-#+ @param p_title - VARCHAR2(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_userinfo_title_checkColumnConstraints(p_title)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_title LIKE userinfo.title
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.userinfo_title_checkColumnConstraints
-
-{}
-#+ Check constraints on the "userinfo.pager" column
-#+
-#+ @param p_pager - VARCHAR2(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_userinfo_pager_checkColumnConstraints(p_pager)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_pager LIKE userinfo.pager
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.userinfo_pager_checkColumnConstraints
-
-{}
-#+ Check constraints on the "userinfo.birthday" column
-#+
-#+ @param p_birthday - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_userinfo_birthday_checkColumnConstraints(p_birthday)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_birthday LIKE userinfo.birthday
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.userinfo_birthday_checkColumnConstraints
-
-{}
-#+ Check constraints on the "userinfo.hiredday" column
-#+
-#+ @param p_hiredday - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_userinfo_hiredday_checkColumnConstraints(p_hiredday)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_hiredday LIKE userinfo.hiredday
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.userinfo_hiredday_checkColumnConstraints
-
-{}
-#+ Check constraints on the "userinfo.street" column
-#+
-#+ @param p_street - VARCHAR2(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_userinfo_street_checkColumnConstraints(p_street)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_street LIKE userinfo.street
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.userinfo_street_checkColumnConstraints
-
-{}
-#+ Check constraints on the "userinfo.city" column
-#+
-#+ @param p_city - VARCHAR2(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_userinfo_city_checkColumnConstraints(p_city)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_city LIKE userinfo.city
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.userinfo_city_checkColumnConstraints
-
-{}
-#+ Check constraints on the "userinfo.state" column
-#+
-#+ @param p_state - VARCHAR2(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_userinfo_state_checkColumnConstraints(p_state)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_state LIKE userinfo.state
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.userinfo_state_checkColumnConstraints
-
-{}
-#+ Check constraints on the "userinfo.zip" column
-#+
-#+ @param p_zip - VARCHAR2(12) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_userinfo_zip_checkColumnConstraints(p_zip)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_zip LIKE userinfo.zip
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.userinfo_zip_checkColumnConstraints
-
-{}
-#+ Check constraints on the "userinfo.ophone" column
-#+
-#+ @param p_ophone - VARCHAR2(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_userinfo_ophone_checkColumnConstraints(p_ophone)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ophone LIKE userinfo.ophone
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.userinfo_ophone_checkColumnConstraints
-
-{}
-#+ Check constraints on the "userinfo.fphone" column
-#+
-#+ @param p_fphone - VARCHAR2(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_userinfo_fphone_checkColumnConstraints(p_fphone)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fphone LIKE userinfo.fphone
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.userinfo_fphone_checkColumnConstraints
-
-{}
-#+ Check constraints on the "userinfo.verificationmethod" column
-#+
-#+ @param p_verificationmethod - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_userinfo_verificationmethod_checkColumnConstraints(p_verificationmethod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_verificationmethod LIKE userinfo.verificationmethod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.userinfo_verificationmethod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "userinfo.defaultdeptid" column
-#+
-#+ @param p_defaultdeptid - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_userinfo_defaultdeptid_checkColumnConstraints(p_defaultdeptid)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_defaultdeptid LIKE userinfo.defaultdeptid
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.userinfo_defaultdeptid_checkColumnConstraints
-
-{}
-#+ Check constraints on the "userinfo.securityflags" column
-#+
-#+ @param p_securityflags - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_userinfo_securityflags_checkColumnConstraints(p_securityflags)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_securityflags LIKE userinfo.securityflags
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.userinfo_securityflags_checkColumnConstraints
-
-{}
-#+ Check constraints on the "userinfo.att" column
-#+
-#+ @param p_att - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_userinfo_att_checkColumnConstraints(p_att)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_att LIKE userinfo.att
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_att IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- att: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.userinfo_att_checkColumnConstraints
-
-{}
-#+ Check constraints on the "userinfo.inlate" column
-#+
-#+ @param p_inlate - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_userinfo_inlate_checkColumnConstraints(p_inlate)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_inlate LIKE userinfo.inlate
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_inlate IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- inlate: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.userinfo_inlate_checkColumnConstraints
-
-{}
-#+ Check constraints on the "userinfo.outearly" column
-#+
-#+ @param p_outearly - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_userinfo_outearly_checkColumnConstraints(p_outearly)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_outearly LIKE userinfo.outearly
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_outearly IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- outearly: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.userinfo_outearly_checkColumnConstraints
-
-{}
-#+ Check constraints on the "userinfo.overtime" column
-#+
-#+ @param p_overtime - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_userinfo_overtime_checkColumnConstraints(p_overtime)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_overtime LIKE userinfo.overtime
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_overtime IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- overtime: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.userinfo_overtime_checkColumnConstraints
-
-{}
-#+ Check constraints on the "userinfo.sep" column
-#+
-#+ @param p_sep - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_userinfo_sep_checkColumnConstraints(p_sep)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sep LIKE userinfo.sep
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_sep IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- sep: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.userinfo_sep_checkColumnConstraints
-
-{}
-#+ Check constraints on the "userinfo.holiday" column
-#+
-#+ @param p_holiday - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_userinfo_holiday_checkColumnConstraints(p_holiday)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_holiday LIKE userinfo.holiday
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_holiday IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- holiday: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.userinfo_holiday_checkColumnConstraints
-
-{}
-#+ Check constraints on the "userinfo.minzu" column
-#+
-#+ @param p_minzu - VARCHAR2(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_userinfo_minzu_checkColumnConstraints(p_minzu)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_minzu LIKE userinfo.minzu
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.userinfo_minzu_checkColumnConstraints
-
-{}
-#+ Check constraints on the "userinfo.password" column
-#+
-#+ @param p_password - VARCHAR2(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_userinfo_password_checkColumnConstraints(p_password)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_password LIKE userinfo.password
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.userinfo_password_checkColumnConstraints
-
-{}
-#+ Check constraints on the "userinfo.lunchduration" column
-#+
-#+ @param p_lunchduration - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_userinfo_lunchduration_checkColumnConstraints(p_lunchduration)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_lunchduration LIKE userinfo.lunchduration
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_lunchduration IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- lunchduration: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.userinfo_lunchduration_checkColumnConstraints
-
-{}
-#+ Check constraints on the "userinfo.mverifypass" column
-#+
-#+ @param p_mverifypass - VARCHAR2(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_userinfo_mverifypass_checkColumnConstraints(p_mverifypass)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mverifypass LIKE userinfo.mverifypass
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.userinfo_mverifypass_checkColumnConstraints
-
-{}
-#+ Check constraints on the "userinfo.photo" column
-#+
-#+ @param p_photo - BYTE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_userinfo_photo_checkColumnConstraints(p_photo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_photo LIKE userinfo.photo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.userinfo_photo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "userinfo.notes" column
-#+
-#+ @param p_notes - BYTE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_userinfo_notes_checkColumnConstraints(p_notes)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_notes LIKE userinfo.notes
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.userinfo_notes_checkColumnConstraints
-
-{}
-#+ Check constraints on the "userinfo.privilege" column
-#+
-#+ @param p_privilege - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_userinfo_privilege_checkColumnConstraints(p_privilege)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_privilege LIKE userinfo.privilege
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.userinfo_privilege_checkColumnConstraints
-
-{}
-#+ Check constraints on the "userinfo.inheritdeptsch" column
-#+
-#+ @param p_inheritdeptsch - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_userinfo_inheritdeptsch_checkColumnConstraints(p_inheritdeptsch)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_inheritdeptsch LIKE userinfo.inheritdeptsch
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.userinfo_inheritdeptsch_checkColumnConstraints
-
-{}
-#+ Check constraints on the "userinfo.inheritdeptschclass" column
-#+
-#+ @param p_inheritdeptschclass - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_userinfo_inheritdeptschclass_checkColumnConstraints(p_inheritdeptschclass)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_inheritdeptschclass LIKE userinfo.inheritdeptschclass
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.userinfo_inheritdeptschclass_checkColumnConstraints
-
-{}
-#+ Check constraints on the "userinfo.autoschplan" column
-#+
-#+ @param p_autoschplan - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_userinfo_autoschplan_checkColumnConstraints(p_autoschplan)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_autoschplan LIKE userinfo.autoschplan
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.userinfo_autoschplan_checkColumnConstraints
-
-{}
-#+ Check constraints on the "userinfo.minautoschinterval" column
-#+
-#+ @param p_minautoschinterval - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_userinfo_minautoschinterval_checkColumnConstraints(p_minautoschinterval)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_minautoschinterval LIKE userinfo.minautoschinterval
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.userinfo_minautoschinterval_checkColumnConstraints
-
-{}
-#+ Check constraints on the "userinfo.registerot" column
-#+
-#+ @param p_registerot - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_userinfo_registerot_checkColumnConstraints(p_registerot)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_registerot LIKE userinfo.registerot
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.userinfo_registerot_checkColumnConstraints
-
-{}
-#+ Check constraints on the "userinfo.inheritdeptrule" column
-#+
-#+ @param p_inheritdeptrule - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_userinfo_inheritdeptrule_checkColumnConstraints(p_inheritdeptrule)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_inheritdeptrule LIKE userinfo.inheritdeptrule
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.userinfo_inheritdeptrule_checkColumnConstraints
-
-{}
-#+ Check constraints on the "userinfo.emprivilege" column
-#+
-#+ @param p_emprivilege - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_userinfo_emprivilege_checkColumnConstraints(p_emprivilege)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_emprivilege LIKE userinfo.emprivilege
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.userinfo_emprivilege_checkColumnConstraints
-
-{}
-#+ Check constraints on the "userinfo.cardno" column
-#+
-#+ @param p_cardno - VARCHAR2(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_userinfo_cardno_checkColumnConstraints(p_cardno)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cardno LIKE userinfo.cardno
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.userinfo_cardno_checkColumnConstraints
-
-{}
-#+ Check constraints on the "travertino" table
-#+
-#+ @param p_data - a row data LIKE travertino.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_travertino_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE travertino.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_travertino_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_travertino_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_travertino_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_travertino_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_travertino_porc_checkColumnConstraints(p_data.porc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.travertino_checkTableConstraints
-
-{}
-#+ Check constraints on the "travertino.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_travertino_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE travertino.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.travertino_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "travertino.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_travertino_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE travertino.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.travertino_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "travertino.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_travertino_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE travertino.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.travertino_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "travertino.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_travertino_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE travertino.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.travertino_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "travertino.porc" column
-#+
-#+ @param p_porc - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_travertino_porc_checkColumnConstraints(p_porc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_porc LIKE travertino.porc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.travertino_porc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpvetb00003" table
-#+
-#+ @param p_data - a row data LIKE tmpvetb00003.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpvetb00003_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE tmpvetb00003.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_tmpvetb00003_cod_cia_checkColumnConstraints(p_data.cod_cia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpvetb00003_factura_checkColumnConstraints(p_data.factura) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpvetb00003_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpvetb00003_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpvetb00003_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpvetb00003_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpvetb00003_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpvetb00003_cantidad_2_checkColumnConstraints(p_data.cantidad_2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpvetb00003_bonificacion_checkColumnConstraints(p_data.bonificacion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpvetb00003_precio_checkColumnConstraints(p_data.precio) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpvetb00003_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpvetb00003_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpvetb00003_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpvetb00003_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpvetb00003_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpvetb00003_checkTableConstraints
-
-{}
-#+ Check constraints on the "tmpvetb00003.cod_cia" column
-#+
-#+ @param p_cod_cia - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpvetb00003_cod_cia_checkColumnConstraints(p_cod_cia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_cia LIKE tmpvetb00003.cod_cia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpvetb00003_cod_cia_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpvetb00003.factura" column
-#+
-#+ @param p_factura - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpvetb00003_factura_checkColumnConstraints(p_factura)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_factura LIKE tmpvetb00003.factura
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpvetb00003_factura_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpvetb00003.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpvetb00003_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE tmpvetb00003.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpvetb00003_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpvetb00003.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpvetb00003_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE tmpvetb00003.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpvetb00003_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpvetb00003.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpvetb00003_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE tmpvetb00003.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpvetb00003_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpvetb00003.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpvetb00003_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE tmpvetb00003.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpvetb00003_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpvetb00003.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpvetb00003_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE tmpvetb00003.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpvetb00003_cantidad_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpvetb00003.cantidad_2" column
-#+
-#+ @param p_cantidad_2 - DECIMAL(14,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpvetb00003_cantidad_2_checkColumnConstraints(p_cantidad_2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad_2 LIKE tmpvetb00003.cantidad_2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpvetb00003_cantidad_2_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpvetb00003.bonificacion" column
-#+
-#+ @param p_bonificacion - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpvetb00003_bonificacion_checkColumnConstraints(p_bonificacion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_bonificacion LIKE tmpvetb00003.bonificacion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpvetb00003_bonificacion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpvetb00003.precio" column
-#+
-#+ @param p_precio - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpvetb00003_precio_checkColumnConstraints(p_precio)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_precio LIKE tmpvetb00003.precio
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpvetb00003_precio_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpvetb00003.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpvetb00003_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE tmpvetb00003.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpvetb00003_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpvetb00003.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpvetb00003_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE tmpvetb00003.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpvetb00003_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpvetb00003.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpvetb00003_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE tmpvetb00003.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpvetb00003_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpvetb00003.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpvetb00003_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE tmpvetb00003.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpvetb00003_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpvetb00003.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpvetb00003_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE tmpvetb00003.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpvetb00003_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpvetb00002" table
-#+
-#+ @param p_data - a row data LIKE tmpvetb00002.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpvetb00002_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE tmpvetb00002.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_tmpvetb00002_cod_cia_checkColumnConstraints(p_data.cod_cia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpvetb00002_factura_checkColumnConstraints(p_data.factura) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpvetb00002_fecha_factura_checkColumnConstraints(p_data.fecha_factura) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpvetb00002_ventas_checkColumnConstraints(p_data.ventas) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpvetb00002_zona_checkColumnConstraints(p_data.zona) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpvetb00002_orden_checkColumnConstraints(p_data.orden) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpvetb00002_fecha_orden_checkColumnConstraints(p_data.fecha_orden) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpvetb00002_conduce_checkColumnConstraints(p_data.conduce) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpvetb00002_fecha_conduce_checkColumnConstraints(p_data.fecha_conduce) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpvetb00002_tipo_cliente_checkColumnConstraints(p_data.tipo_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpvetb00002_sec_cliente_checkColumnConstraints(p_data.sec_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpvetb00002_cod_vend_checkColumnConstraints(p_data.cod_vend) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpvetb00002_sec_vend_checkColumnConstraints(p_data.sec_vend) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpvetb00002_cond_pago_checkColumnConstraints(p_data.cond_pago) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpvetb00002_porc_itbi_checkColumnConstraints(p_data.porc_itbi) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpvetb00002_porc_desc_checkColumnConstraints(p_data.porc_desc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpvetb00002_prima_us_checkColumnConstraints(p_data.prima_us) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpvetb00002_sub_total_checkColumnConstraints(p_data.sub_total) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpvetb00002_monto_desc_checkColumnConstraints(p_data.monto_desc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpvetb00002_monto_itbi_checkColumnConstraints(p_data.monto_itbi) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpvetb00002_neto_checkColumnConstraints(p_data.neto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpvetb00002_fecha_embarque_checkColumnConstraints(p_data.fecha_embarque) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpvetb00002_status_impresion_checkColumnConstraints(p_data.status_impresion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpvetb00002_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpvetb00002_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpvetb00002_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpvetb00002_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpvetb00002_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpvetb00002_documento_checkColumnConstraints(p_data.documento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpvetb00002_placa_transporte_checkColumnConstraints(p_data.placa_transporte) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpvetb00002_checkTableConstraints
-
-{}
-#+ Check constraints on the "tmpvetb00002.cod_cia" column
-#+
-#+ @param p_cod_cia - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpvetb00002_cod_cia_checkColumnConstraints(p_cod_cia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_cia LIKE tmpvetb00002.cod_cia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpvetb00002_cod_cia_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpvetb00002.factura" column
-#+
-#+ @param p_factura - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpvetb00002_factura_checkColumnConstraints(p_factura)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_factura LIKE tmpvetb00002.factura
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_factura IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- factura: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpvetb00002_factura_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpvetb00002.fecha_factura" column
-#+
-#+ @param p_fecha_factura - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpvetb00002_fecha_factura_checkColumnConstraints(p_fecha_factura)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_factura LIKE tmpvetb00002.fecha_factura
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpvetb00002_fecha_factura_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpvetb00002.ventas" column
-#+
-#+ @param p_ventas - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpvetb00002_ventas_checkColumnConstraints(p_ventas)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ventas LIKE tmpvetb00002.ventas
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpvetb00002_ventas_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpvetb00002.zona" column
-#+
-#+ @param p_zona - VARCHAR2(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpvetb00002_zona_checkColumnConstraints(p_zona)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_zona LIKE tmpvetb00002.zona
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpvetb00002_zona_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpvetb00002.orden" column
-#+
-#+ @param p_orden - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpvetb00002_orden_checkColumnConstraints(p_orden)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_orden LIKE tmpvetb00002.orden
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpvetb00002_orden_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpvetb00002.fecha_orden" column
-#+
-#+ @param p_fecha_orden - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpvetb00002_fecha_orden_checkColumnConstraints(p_fecha_orden)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_orden LIKE tmpvetb00002.fecha_orden
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpvetb00002_fecha_orden_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpvetb00002.conduce" column
-#+
-#+ @param p_conduce - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpvetb00002_conduce_checkColumnConstraints(p_conduce)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_conduce LIKE tmpvetb00002.conduce
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpvetb00002_conduce_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpvetb00002.fecha_conduce" column
-#+
-#+ @param p_fecha_conduce - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpvetb00002_fecha_conduce_checkColumnConstraints(p_fecha_conduce)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_conduce LIKE tmpvetb00002.fecha_conduce
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpvetb00002_fecha_conduce_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpvetb00002.tipo_cliente" column
-#+
-#+ @param p_tipo_cliente - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpvetb00002_tipo_cliente_checkColumnConstraints(p_tipo_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_cliente LIKE tmpvetb00002.tipo_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpvetb00002_tipo_cliente_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpvetb00002.sec_cliente" column
-#+
-#+ @param p_sec_cliente - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpvetb00002_sec_cliente_checkColumnConstraints(p_sec_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_cliente LIKE tmpvetb00002.sec_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpvetb00002_sec_cliente_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpvetb00002.cod_vend" column
-#+
-#+ @param p_cod_vend - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpvetb00002_cod_vend_checkColumnConstraints(p_cod_vend)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_vend LIKE tmpvetb00002.cod_vend
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpvetb00002_cod_vend_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpvetb00002.sec_vend" column
-#+
-#+ @param p_sec_vend - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpvetb00002_sec_vend_checkColumnConstraints(p_sec_vend)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_vend LIKE tmpvetb00002.sec_vend
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpvetb00002_sec_vend_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpvetb00002.cond_pago" column
-#+
-#+ @param p_cond_pago - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpvetb00002_cond_pago_checkColumnConstraints(p_cond_pago)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cond_pago LIKE tmpvetb00002.cond_pago
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpvetb00002_cond_pago_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpvetb00002.porc_itbi" column
-#+
-#+ @param p_porc_itbi - DECIMAL(5,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpvetb00002_porc_itbi_checkColumnConstraints(p_porc_itbi)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_porc_itbi LIKE tmpvetb00002.porc_itbi
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpvetb00002_porc_itbi_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpvetb00002.porc_desc" column
-#+
-#+ @param p_porc_desc - DECIMAL(8,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpvetb00002_porc_desc_checkColumnConstraints(p_porc_desc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_porc_desc LIKE tmpvetb00002.porc_desc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpvetb00002_porc_desc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpvetb00002.prima_us" column
-#+
-#+ @param p_prima_us - DECIMAL(6,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpvetb00002_prima_us_checkColumnConstraints(p_prima_us)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_prima_us LIKE tmpvetb00002.prima_us
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpvetb00002_prima_us_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpvetb00002.sub_total" column
-#+
-#+ @param p_sub_total - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpvetb00002_sub_total_checkColumnConstraints(p_sub_total)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sub_total LIKE tmpvetb00002.sub_total
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpvetb00002_sub_total_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpvetb00002.monto_desc" column
-#+
-#+ @param p_monto_desc - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpvetb00002_monto_desc_checkColumnConstraints(p_monto_desc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_monto_desc LIKE tmpvetb00002.monto_desc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpvetb00002_monto_desc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpvetb00002.monto_itbi" column
-#+
-#+ @param p_monto_itbi - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpvetb00002_monto_itbi_checkColumnConstraints(p_monto_itbi)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_monto_itbi LIKE tmpvetb00002.monto_itbi
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpvetb00002_monto_itbi_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpvetb00002.neto" column
-#+
-#+ @param p_neto - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpvetb00002_neto_checkColumnConstraints(p_neto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_neto LIKE tmpvetb00002.neto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_neto IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- neto: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpvetb00002_neto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpvetb00002.fecha_embarque" column
-#+
-#+ @param p_fecha_embarque - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpvetb00002_fecha_embarque_checkColumnConstraints(p_fecha_embarque)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_embarque LIKE tmpvetb00002.fecha_embarque
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpvetb00002_fecha_embarque_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpvetb00002.status_impresion" column
-#+
-#+ @param p_status_impresion - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpvetb00002_status_impresion_checkColumnConstraints(p_status_impresion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_impresion LIKE tmpvetb00002.status_impresion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpvetb00002_status_impresion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpvetb00002.status_t" column
-#+
-#+ @param p_status_t - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpvetb00002_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE tmpvetb00002.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpvetb00002_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpvetb00002.us_crea" column
-#+
-#+ @param p_us_crea - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpvetb00002_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE tmpvetb00002.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpvetb00002_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpvetb00002.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpvetb00002_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE tmpvetb00002.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpvetb00002_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpvetb00002.us_mod" column
-#+
-#+ @param p_us_mod - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpvetb00002_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE tmpvetb00002.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpvetb00002_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpvetb00002.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpvetb00002_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE tmpvetb00002.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpvetb00002_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpvetb00002.documento" column
-#+
-#+ @param p_documento - CHAR(15) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpvetb00002_documento_checkColumnConstraints(p_documento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_documento LIKE tmpvetb00002.documento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpvetb00002_documento_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpvetb00002.placa_transporte" column
-#+
-#+ @param p_placa_transporte - CHAR(25) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpvetb00002_placa_transporte_checkColumnConstraints(p_placa_transporte)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_placa_transporte LIKE tmpvetb00002.placa_transporte
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpvetb00002_placa_transporte_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpventas43" table
-#+
-#+ @param p_data - a row data LIKE tmpventas43.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpventas43_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE tmpventas43.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_tmpventas43_codlista_checkColumnConstraints(p_data.codlista) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpventas43_ventas_checkColumnConstraints(p_data.ventas) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpventas43_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpventas43_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpventas43_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpventas43_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpventas43_precio_checkColumnConstraints(p_data.precio) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpventas43_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpventas43_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpventas43_checkTableConstraints
-
-{}
-#+ Check constraints on the "tmpventas43.codlista" column
-#+
-#+ @param p_codlista - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpventas43_codlista_checkColumnConstraints(p_codlista)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codlista LIKE tmpventas43.codlista
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpventas43_codlista_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpventas43.ventas" column
-#+
-#+ @param p_ventas - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpventas43_ventas_checkColumnConstraints(p_ventas)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ventas LIKE tmpventas43.ventas
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpventas43_ventas_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpventas43.cod_n" column
-#+
-#+ @param p_cod_n - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpventas43_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE tmpventas43.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpventas43_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpventas43.cod_grupo" column
-#+
-#+ @param p_cod_grupo - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpventas43_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE tmpventas43.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpventas43_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpventas43.cod_tipo" column
-#+
-#+ @param p_cod_tipo - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpventas43_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE tmpventas43.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpventas43_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpventas43.cod_sec" column
-#+
-#+ @param p_cod_sec - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpventas43_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE tmpventas43.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpventas43_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpventas43.precio" column
-#+
-#+ @param p_precio - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpventas43_precio_checkColumnConstraints(p_precio)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_precio LIKE tmpventas43.precio
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpventas43_precio_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpventas43.us_crea" column
-#+
-#+ @param p_us_crea - VARCHAR2(255) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpventas43_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE tmpventas43.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpventas43_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpventas43.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpventas43_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE tmpventas43.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpventas43_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpventas" table
-#+
-#+ @param p_data - a row data LIKE tmpventas.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpventas_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE tmpventas.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_tmpventas_descrip_checkColumnConstraints(p_data.descrip) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpventas_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpventas_vbruto_checkColumnConstraints(p_data.vbruto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpventas_ventasdia_checkColumnConstraints(p_data.ventasdia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpventas_checkTableConstraints
-
-{}
-#+ Check constraints on the "tmpventas.descrip" column
-#+
-#+ @param p_descrip - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpventas_descrip_checkColumnConstraints(p_descrip)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descrip LIKE tmpventas.descrip
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpventas_descrip_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpventas.descripcion" column
-#+
-#+ @param p_descripcion - VARCHAR2(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpventas_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE tmpventas.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpventas_descripcion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpventas.vbruto" column
-#+
-#+ @param p_vbruto - CHAR(18) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpventas_vbruto_checkColumnConstraints(p_vbruto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_vbruto LIKE tmpventas.vbruto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpventas_vbruto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpventas.ventasdia" column
-#+
-#+ @param p_ventasdia - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpventas_ventasdia_checkColumnConstraints(p_ventasdia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ventasdia LIKE tmpventas.ventasdia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_ventasdia IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- ventasdia: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpventas_ventasdia_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmptipo" table
-#+
-#+ @param p_data - a row data LIKE tmptipo.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmptipo_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE tmptipo.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_tmptipo_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmptipo_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- CALL smarmotech_dbxconstraints_tmptipo_pk_tmptipo_checkUniqueConstraint(p_forUpdate, p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmptipo_checkTableConstraints
-
-{}
-#+ Check the primary key uniqueness constraint on the "tmptipo"
-#+
-#+ @param p_key - Primary Key
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmptipo_pk_tmptipo_checkUniqueConstraint(p_forUpdate, p_key)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_key
- RECORD
- tmptipo_cod_tipo LIKE tmptipo.cod_tipo
- END RECORD
- DEFINE l_key
- RECORD
- tmptipo_cod_tipo LIKE tmptipo.cod_tipo
- END RECORD
- DEFINE l_where STRING
- DEFINE l_sqlQuery STRING
- DEFINE l_count INTEGER
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- LET l_where = "WHERE tmptipo.cod_tipo = ? "
-
- let l_sqlQuery = "SELECT COUNT(*), cod_tipo FROM tmptipo ", l_where, " GROUP BY cod_tipo"
-
- PREPARE cur_tmptipo_pk_tmptipo_checkUniqueConstraint FROM l_sqlQuery
- EXECUTE cur_tmptipo_pk_tmptipo_checkUniqueConstraint INTO l_count, l_key.* USING p_key.*
- FREE cur_tmptipo_pk_tmptipo_checkUniqueConstraint
- IF (NOT p_forUpdate AND l_count > 0) OR (p_forUpdate AND l_count > 0 AND p_key.* != l_key.*) THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_tipo: " || ERROR_BAM_00002) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmptipo_pk_tmptipo_checkUniqueConstraint
-
-{}
-#+ Check constraints on the "tmptipo.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmptipo_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE tmptipo.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_tipo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_tipo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmptipo_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmptipo.descripcion" column
-#+
-#+ @param p_descripcion - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmptipo_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE tmptipo.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmptipo_descripcion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpproductos" table
-#+
-#+ @param p_data - a row data LIKE tmpproductos.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpproductos_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE tmpproductos.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_tmpproductos_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpproductos_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpproductos_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpproductos_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpproductos_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpproductos_checkTableConstraints
-
-{}
-#+ Check constraints on the "tmpproductos.descripcion" column
-#+
-#+ @param p_descripcion - CHAR(120) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpproductos_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE tmpproductos.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpproductos_descripcion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpproductos.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpproductos_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE tmpproductos.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpproductos_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpproductos.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpproductos_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE tmpproductos.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpproductos_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpproductos.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpproductos_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE tmpproductos.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpproductos_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpproductos.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpproductos_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE tmpproductos.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpproductos_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmppreciosm2" table
-#+
-#+ @param p_data - a row data LIKE tmppreciosm2.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmppreciosm2_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE tmppreciosm2.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_tmppreciosm2_cod_lista_checkColumnConstraints(p_data.cod_lista) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmppreciosm2_ventas_checkColumnConstraints(p_data.ventas) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmppreciosm2_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmppreciosm2_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmppreciosm2_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmppreciosm2_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmppreciosm2_precio_checkColumnConstraints(p_data.precio) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmppreciosm2_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmppreciosm2_checkTableConstraints
-
-{}
-#+ Check constraints on the "tmppreciosm2.cod_lista" column
-#+
-#+ @param p_cod_lista - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmppreciosm2_cod_lista_checkColumnConstraints(p_cod_lista)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_lista LIKE tmppreciosm2.cod_lista
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmppreciosm2_cod_lista_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmppreciosm2.ventas" column
-#+
-#+ @param p_ventas - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmppreciosm2_ventas_checkColumnConstraints(p_ventas)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ventas LIKE tmppreciosm2.ventas
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmppreciosm2_ventas_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmppreciosm2.cod_n" column
-#+
-#+ @param p_cod_n - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmppreciosm2_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE tmppreciosm2.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmppreciosm2_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmppreciosm2.cod_grupo" column
-#+
-#+ @param p_cod_grupo - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmppreciosm2_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE tmppreciosm2.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmppreciosm2_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmppreciosm2.cod_tipo" column
-#+
-#+ @param p_cod_tipo - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmppreciosm2_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE tmppreciosm2.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmppreciosm2_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmppreciosm2.cod_sec" column
-#+
-#+ @param p_cod_sec - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmppreciosm2_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE tmppreciosm2.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmppreciosm2_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmppreciosm2.precio" column
-#+
-#+ @param p_precio - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmppreciosm2_precio_checkColumnConstraints(p_precio)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_precio LIKE tmppreciosm2.precio
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmppreciosm2_precio_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmppreciosm2.descripcion" column
-#+
-#+ @param p_descripcion - VARCHAR2(255) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmppreciosm2_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE tmppreciosm2.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmppreciosm2_descripcion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmppreciosm1" table
-#+
-#+ @param p_data - a row data LIKE tmppreciosm1.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmppreciosm1_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE tmppreciosm1.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_tmppreciosm1_cod_lista_checkColumnConstraints(p_data.cod_lista) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmppreciosm1_ventas_checkColumnConstraints(p_data.ventas) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmppreciosm1_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmppreciosm1_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmppreciosm1_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmppreciosm1_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmppreciosm1_precio_checkColumnConstraints(p_data.precio) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmppreciosm1_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmppreciosm1_checkTableConstraints
-
-{}
-#+ Check constraints on the "tmppreciosm1.cod_lista" column
-#+
-#+ @param p_cod_lista - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmppreciosm1_cod_lista_checkColumnConstraints(p_cod_lista)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_lista LIKE tmppreciosm1.cod_lista
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmppreciosm1_cod_lista_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmppreciosm1.ventas" column
-#+
-#+ @param p_ventas - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmppreciosm1_ventas_checkColumnConstraints(p_ventas)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ventas LIKE tmppreciosm1.ventas
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmppreciosm1_ventas_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmppreciosm1.cod_n" column
-#+
-#+ @param p_cod_n - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmppreciosm1_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE tmppreciosm1.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmppreciosm1_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmppreciosm1.cod_grupo" column
-#+
-#+ @param p_cod_grupo - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmppreciosm1_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE tmppreciosm1.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmppreciosm1_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmppreciosm1.cod_tipo" column
-#+
-#+ @param p_cod_tipo - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmppreciosm1_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE tmppreciosm1.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmppreciosm1_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmppreciosm1.cod_sec" column
-#+
-#+ @param p_cod_sec - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmppreciosm1_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE tmppreciosm1.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmppreciosm1_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmppreciosm1.precio" column
-#+
-#+ @param p_precio - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmppreciosm1_precio_checkColumnConstraints(p_precio)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_precio LIKE tmppreciosm1.precio
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmppreciosm1_precio_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmppreciosm1.descripcion" column
-#+
-#+ @param p_descripcion - VARCHAR2(255) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmppreciosm1_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE tmppreciosm1.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmppreciosm1_descripcion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmppreciosg2" table
-#+
-#+ @param p_data - a row data LIKE tmppreciosg2.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmppreciosg2_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE tmppreciosg2.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_tmppreciosg2_ventas_checkColumnConstraints(p_data.ventas) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmppreciosg2_cod_lista_checkColumnConstraints(p_data.cod_lista) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmppreciosg2_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmppreciosg2_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmppreciosg2_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmppreciosg2_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmppreciosg2_precio_checkColumnConstraints(p_data.precio) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmppreciosg2_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmppreciosg2_checkTableConstraints
-
-{}
-#+ Check constraints on the "tmppreciosg2.ventas" column
-#+
-#+ @param p_ventas - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmppreciosg2_ventas_checkColumnConstraints(p_ventas)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ventas LIKE tmppreciosg2.ventas
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmppreciosg2_ventas_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmppreciosg2.cod_lista" column
-#+
-#+ @param p_cod_lista - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmppreciosg2_cod_lista_checkColumnConstraints(p_cod_lista)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_lista LIKE tmppreciosg2.cod_lista
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmppreciosg2_cod_lista_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmppreciosg2.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmppreciosg2_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE tmppreciosg2.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmppreciosg2_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmppreciosg2.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmppreciosg2_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE tmppreciosg2.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmppreciosg2_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmppreciosg2.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmppreciosg2_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE tmppreciosg2.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmppreciosg2_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmppreciosg2.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmppreciosg2_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE tmppreciosg2.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmppreciosg2_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmppreciosg2.precio" column
-#+
-#+ @param p_precio - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmppreciosg2_precio_checkColumnConstraints(p_precio)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_precio LIKE tmppreciosg2.precio
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmppreciosg2_precio_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmppreciosg2.descripcion" column
-#+
-#+ @param p_descripcion - VARCHAR2(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmppreciosg2_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE tmppreciosg2.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmppreciosg2_descripcion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmppreciosg1" table
-#+
-#+ @param p_data - a row data LIKE tmppreciosg1.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmppreciosg1_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE tmppreciosg1.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_tmppreciosg1_ventas_checkColumnConstraints(p_data.ventas) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmppreciosg1_cod_lista_checkColumnConstraints(p_data.cod_lista) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmppreciosg1_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmppreciosg1_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmppreciosg1_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmppreciosg1_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmppreciosg1_precio_checkColumnConstraints(p_data.precio) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmppreciosg1_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmppreciosg1_checkTableConstraints
-
-{}
-#+ Check constraints on the "tmppreciosg1.ventas" column
-#+
-#+ @param p_ventas - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmppreciosg1_ventas_checkColumnConstraints(p_ventas)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ventas LIKE tmppreciosg1.ventas
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmppreciosg1_ventas_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmppreciosg1.cod_lista" column
-#+
-#+ @param p_cod_lista - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmppreciosg1_cod_lista_checkColumnConstraints(p_cod_lista)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_lista LIKE tmppreciosg1.cod_lista
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmppreciosg1_cod_lista_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmppreciosg1.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmppreciosg1_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE tmppreciosg1.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmppreciosg1_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmppreciosg1.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmppreciosg1_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE tmppreciosg1.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmppreciosg1_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmppreciosg1.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmppreciosg1_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE tmppreciosg1.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmppreciosg1_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmppreciosg1.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmppreciosg1_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE tmppreciosg1.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmppreciosg1_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmppreciosg1.precio" column
-#+
-#+ @param p_precio - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmppreciosg1_precio_checkColumnConstraints(p_precio)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_precio LIKE tmppreciosg1.precio
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmppreciosg1_precio_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmppreciosg1.descripcion" column
-#+
-#+ @param p_descripcion - VARCHAR2(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmppreciosg1_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE tmppreciosg1.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmppreciosg1_descripcion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmppreciosferia" table
-#+
-#+ @param p_data - a row data LIKE tmppreciosferia.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmppreciosferia_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE tmppreciosferia.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_tmppreciosferia_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmppreciosferia_cod_lista_checkColumnConstraints(p_data.cod_lista) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmppreciosferia_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmppreciosferia_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmppreciosferia_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmppreciosferia_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmppreciosferia_precio_checkColumnConstraints(p_data.precio) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmppreciosferia_f8_checkColumnConstraints(p_data.f8) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmppreciosferia_f9_checkColumnConstraints(p_data.f9) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmppreciosferia_f10_checkColumnConstraints(p_data.f10) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmppreciosferia_f11_checkColumnConstraints(p_data.f11) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmppreciosferia_checkTableConstraints
-
-{}
-#+ Check constraints on the "tmppreciosferia.descripcion" column
-#+
-#+ @param p_descripcion - VARCHAR2(255) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmppreciosferia_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE tmppreciosferia.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmppreciosferia_descripcion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmppreciosferia.cod_lista" column
-#+
-#+ @param p_cod_lista - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmppreciosferia_cod_lista_checkColumnConstraints(p_cod_lista)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_lista LIKE tmppreciosferia.cod_lista
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmppreciosferia_cod_lista_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmppreciosferia.cod_n" column
-#+
-#+ @param p_cod_n - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmppreciosferia_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE tmppreciosferia.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmppreciosferia_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmppreciosferia.cod_grupo" column
-#+
-#+ @param p_cod_grupo - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmppreciosferia_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE tmppreciosferia.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmppreciosferia_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmppreciosferia.cod_tipo" column
-#+
-#+ @param p_cod_tipo - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmppreciosferia_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE tmppreciosferia.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmppreciosferia_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmppreciosferia.cod_sec" column
-#+
-#+ @param p_cod_sec - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmppreciosferia_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE tmppreciosferia.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmppreciosferia_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmppreciosferia.precio" column
-#+
-#+ @param p_precio - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmppreciosferia_precio_checkColumnConstraints(p_precio)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_precio LIKE tmppreciosferia.precio
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmppreciosferia_precio_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmppreciosferia.f8" column
-#+
-#+ @param p_f8 - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmppreciosferia_f8_checkColumnConstraints(p_f8)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_f8 LIKE tmppreciosferia.f8
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmppreciosferia_f8_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmppreciosferia.f9" column
-#+
-#+ @param p_f9 - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmppreciosferia_f9_checkColumnConstraints(p_f9)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_f9 LIKE tmppreciosferia.f9
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmppreciosferia_f9_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmppreciosferia.f10" column
-#+
-#+ @param p_f10 - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmppreciosferia_f10_checkColumnConstraints(p_f10)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_f10 LIKE tmppreciosferia.f10
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmppreciosferia_f10_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmppreciosferia.f11" column
-#+
-#+ @param p_f11 - VARCHAR2(255) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmppreciosferia_f11_checkColumnConstraints(p_f11)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_f11 LIKE tmppreciosferia.f11
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmppreciosferia_f11_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpplanchas" table
-#+
-#+ @param p_data - a row data LIKE tmpplanchas.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpplanchas_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE tmpplanchas.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_tmpplanchas_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpplanchas_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpplanchas_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpplanchas_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpplanchas_material_checkColumnConstraints(p_data.material) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpplanchas_labor_checkColumnConstraints(p_data.labor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpplanchas_gasto_checkColumnConstraints(p_data.gasto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpplanchas_checkTableConstraints
-
-{}
-#+ Check constraints on the "tmpplanchas.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpplanchas_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE tmpplanchas.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpplanchas_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpplanchas.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpplanchas_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE tmpplanchas.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpplanchas_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpplanchas.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpplanchas_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE tmpplanchas.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpplanchas_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpplanchas.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpplanchas_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE tmpplanchas.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpplanchas_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpplanchas.material" column
-#+
-#+ @param p_material - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpplanchas_material_checkColumnConstraints(p_material)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_material LIKE tmpplanchas.material
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpplanchas_material_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpplanchas.labor" column
-#+
-#+ @param p_labor - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpplanchas_labor_checkColumnConstraints(p_labor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_labor LIKE tmpplanchas.labor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpplanchas_labor_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpplanchas.gasto" column
-#+
-#+ @param p_gasto - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpplanchas_gasto_checkColumnConstraints(p_gasto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_gasto LIKE tmpplanchas.gasto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpplanchas_gasto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpordenes" table
-#+
-#+ @param p_data - a row data LIKE tmpordenes.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpordenes_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE tmpordenes.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_tmpordenes_num_oc_checkColumnConstraints(p_data.num_oc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpordenes_cantidad_orden_checkColumnConstraints(p_data.cantidad_orden) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpordenes_cantidad_conduce_checkColumnConstraints(p_data.cantidad_conduce) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpordenes_diferencia_checkColumnConstraints(p_data.diferencia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpordenes_checkTableConstraints
-
-{}
-#+ Check constraints on the "tmpordenes.num_oc" column
-#+
-#+ @param p_num_oc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpordenes_num_oc_checkColumnConstraints(p_num_oc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_oc LIKE tmpordenes.num_oc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpordenes_num_oc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpordenes.cantidad_orden" column
-#+
-#+ @param p_cantidad_orden - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpordenes_cantidad_orden_checkColumnConstraints(p_cantidad_orden)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad_orden LIKE tmpordenes.cantidad_orden
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpordenes_cantidad_orden_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpordenes.cantidad_conduce" column
-#+
-#+ @param p_cantidad_conduce - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpordenes_cantidad_conduce_checkColumnConstraints(p_cantidad_conduce)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad_conduce LIKE tmpordenes.cantidad_conduce
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpordenes_cantidad_conduce_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpordenes.diferencia" column
-#+
-#+ @param p_diferencia - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpordenes_diferencia_checkColumnConstraints(p_diferencia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_diferencia LIKE tmpordenes.diferencia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpordenes_diferencia_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpmedida" table
-#+
-#+ @param p_data - a row data LIKE tmpmedida.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpmedida_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE tmpmedida.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_tmpmedida_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpmedida_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- CALL smarmotech_dbxconstraints_tmpmedida_pk_tmpmedida_checkUniqueConstraint(p_forUpdate, p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpmedida_checkTableConstraints
-
-{}
-#+ Check the primary key uniqueness constraint on the "tmpmedida"
-#+
-#+ @param p_key - Primary Key
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpmedida_pk_tmpmedida_checkUniqueConstraint(p_forUpdate, p_key)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_key
- RECORD
- tmpmedida_cod_sec LIKE tmpmedida.cod_sec
- END RECORD
- DEFINE l_key
- RECORD
- tmpmedida_cod_sec LIKE tmpmedida.cod_sec
- END RECORD
- DEFINE l_where STRING
- DEFINE l_sqlQuery STRING
- DEFINE l_count INTEGER
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- LET l_where = "WHERE tmpmedida.cod_sec = ? "
-
- let l_sqlQuery = "SELECT COUNT(*), cod_sec FROM tmpmedida ", l_where, " GROUP BY cod_sec"
-
- PREPARE cur_tmpmedida_pk_tmpmedida_checkUniqueConstraint FROM l_sqlQuery
- EXECUTE cur_tmpmedida_pk_tmpmedida_checkUniqueConstraint INTO l_count, l_key.* USING p_key.*
- FREE cur_tmpmedida_pk_tmpmedida_checkUniqueConstraint
- IF (NOT p_forUpdate AND l_count > 0) OR (p_forUpdate AND l_count > 0 AND p_key.* != l_key.*) THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_sec: " || ERROR_BAM_00002) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpmedida_pk_tmpmedida_checkUniqueConstraint
-
-{}
-#+ Check constraints on the "tmpmedida.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpmedida_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE tmpmedida.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_sec IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_sec: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpmedida_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpmedida.descripcion" column
-#+
-#+ @param p_descripcion - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpmedida_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE tmpmedida.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpmedida_descripcion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpmatprima" table
-#+
-#+ @param p_data - a row data LIKE tmpmatprima.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpmatprima_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE tmpmatprima.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_tmpmatprima_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpmatprima_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpmatprima_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpmatprima_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpmatprima_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpmatprima_checkTableConstraints
-
-{}
-#+ Check constraints on the "tmpmatprima.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpmatprima_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE tmpmatprima.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpmatprima_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpmatprima.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpmatprima_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE tmpmatprima.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpmatprima_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpmatprima.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpmatprima_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE tmpmatprima.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpmatprima_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpmatprima.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpmatprima_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE tmpmatprima.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpmatprima_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpmatprima.cantidad" column
-#+
-#+ @param p_cantidad - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpmatprima_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE tmpmatprima.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpmatprima_cantidad_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpiptb012" table
-#+
-#+ @param p_data - a row data LIKE tmpiptb012.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb012_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE tmpiptb012.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_tmpiptb012_idtrx_checkColumnConstraints(p_data.idtrx) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb012_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb012_bodega_checkColumnConstraints(p_data.bodega) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb012_cod_seccion_checkColumnConstraints(p_data.cod_seccion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb012_cod_tramo_checkColumnConstraints(p_data.cod_tramo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb012_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb012_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb012_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb012_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb012_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb012_balance_checkColumnConstraints(p_data.balance) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb012_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb012_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb012_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb012_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb012_lado_1_checkColumnConstraints(p_data.lado_1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb012_lado_2_checkColumnConstraints(p_data.lado_2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb012_lado_3_checkColumnConstraints(p_data.lado_3) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpiptb012_checkTableConstraints
-
-{}
-#+ Check constraints on the "tmpiptb012.idtrx" column
-#+
-#+ @param p_idtrx - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb012_idtrx_checkColumnConstraints(p_idtrx)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_idtrx LIKE tmpiptb012.idtrx
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpiptb012_idtrx_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpiptb012.fecha" column
-#+
-#+ @param p_fecha - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb012_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE tmpiptb012.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpiptb012_fecha_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpiptb012.bodega" column
-#+
-#+ @param p_bodega - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb012_bodega_checkColumnConstraints(p_bodega)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_bodega LIKE tmpiptb012.bodega
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpiptb012_bodega_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpiptb012.cod_seccion" column
-#+
-#+ @param p_cod_seccion - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb012_cod_seccion_checkColumnConstraints(p_cod_seccion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_seccion LIKE tmpiptb012.cod_seccion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpiptb012_cod_seccion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpiptb012.cod_tramo" column
-#+
-#+ @param p_cod_tramo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb012_cod_tramo_checkColumnConstraints(p_cod_tramo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tramo LIKE tmpiptb012.cod_tramo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpiptb012_cod_tramo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpiptb012.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb012_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE tmpiptb012.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpiptb012_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpiptb012.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb012_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE tmpiptb012.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpiptb012_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpiptb012.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb012_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE tmpiptb012.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpiptb012_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpiptb012.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb012_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE tmpiptb012.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpiptb012_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpiptb012.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb012_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE tmpiptb012.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpiptb012_cantidad_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpiptb012.balance" column
-#+
-#+ @param p_balance - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb012_balance_checkColumnConstraints(p_balance)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_balance LIKE tmpiptb012.balance
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpiptb012_balance_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpiptb012.us_crea" column
-#+
-#+ @param p_us_crea - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb012_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE tmpiptb012.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpiptb012_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpiptb012.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb012_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE tmpiptb012.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpiptb012_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpiptb012.us_mod" column
-#+
-#+ @param p_us_mod - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb012_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE tmpiptb012.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpiptb012_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpiptb012.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb012_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE tmpiptb012.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpiptb012_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpiptb012.lado_1" column
-#+
-#+ @param p_lado_1 - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb012_lado_1_checkColumnConstraints(p_lado_1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_lado_1 LIKE tmpiptb012.lado_1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpiptb012_lado_1_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpiptb012.lado_2" column
-#+
-#+ @param p_lado_2 - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb012_lado_2_checkColumnConstraints(p_lado_2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_lado_2 LIKE tmpiptb012.lado_2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpiptb012_lado_2_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpiptb012.lado_3" column
-#+
-#+ @param p_lado_3 - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb012_lado_3_checkColumnConstraints(p_lado_3)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_lado_3 LIKE tmpiptb012.lado_3
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpiptb012_lado_3_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpiptb00027" table
-#+
-#+ @param p_data - a row data LIKE tmpiptb00027.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00027_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE tmpiptb00027.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_tmpiptb00027_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00027_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00027_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00027_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpiptb00027_checkTableConstraints
-
-{}
-#+ Check constraints on the "tmpiptb00027.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00027_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE tmpiptb00027.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpiptb00027_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpiptb00027.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00027_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE tmpiptb00027.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpiptb00027_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpiptb00027.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00027_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE tmpiptb00027.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpiptb00027_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpiptb00027.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00027_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE tmpiptb00027.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpiptb00027_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpiptb00012" table
-#+
-#+ @param p_data - a row data LIKE tmpiptb00012.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00012_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE tmpiptb00012.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_tmpiptb00012_idtrx_checkColumnConstraints(p_data.idtrx) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00012_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00012_bodega_checkColumnConstraints(p_data.bodega) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00012_cod_seccion_checkColumnConstraints(p_data.cod_seccion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00012_cod_tramo_checkColumnConstraints(p_data.cod_tramo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00012_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00012_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00012_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00012_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00012_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00012_balance_checkColumnConstraints(p_data.balance) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00012_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00012_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00012_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00012_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00012_lado_1_checkColumnConstraints(p_data.lado_1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00012_lado_2_checkColumnConstraints(p_data.lado_2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00012_lado_3_checkColumnConstraints(p_data.lado_3) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpiptb00012_checkTableConstraints
-
-{}
-#+ Check constraints on the "tmpiptb00012.idtrx" column
-#+
-#+ @param p_idtrx - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00012_idtrx_checkColumnConstraints(p_idtrx)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_idtrx LIKE tmpiptb00012.idtrx
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpiptb00012_idtrx_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpiptb00012.fecha" column
-#+
-#+ @param p_fecha - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00012_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE tmpiptb00012.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpiptb00012_fecha_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpiptb00012.bodega" column
-#+
-#+ @param p_bodega - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00012_bodega_checkColumnConstraints(p_bodega)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_bodega LIKE tmpiptb00012.bodega
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpiptb00012_bodega_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpiptb00012.cod_seccion" column
-#+
-#+ @param p_cod_seccion - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00012_cod_seccion_checkColumnConstraints(p_cod_seccion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_seccion LIKE tmpiptb00012.cod_seccion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpiptb00012_cod_seccion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpiptb00012.cod_tramo" column
-#+
-#+ @param p_cod_tramo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00012_cod_tramo_checkColumnConstraints(p_cod_tramo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tramo LIKE tmpiptb00012.cod_tramo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpiptb00012_cod_tramo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpiptb00012.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00012_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE tmpiptb00012.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpiptb00012_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpiptb00012.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00012_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE tmpiptb00012.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpiptb00012_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpiptb00012.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00012_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE tmpiptb00012.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpiptb00012_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpiptb00012.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00012_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE tmpiptb00012.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpiptb00012_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpiptb00012.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00012_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE tmpiptb00012.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpiptb00012_cantidad_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpiptb00012.balance" column
-#+
-#+ @param p_balance - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00012_balance_checkColumnConstraints(p_balance)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_balance LIKE tmpiptb00012.balance
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpiptb00012_balance_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpiptb00012.us_crea" column
-#+
-#+ @param p_us_crea - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00012_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE tmpiptb00012.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpiptb00012_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpiptb00012.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00012_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE tmpiptb00012.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpiptb00012_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpiptb00012.us_mod" column
-#+
-#+ @param p_us_mod - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00012_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE tmpiptb00012.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpiptb00012_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpiptb00012.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00012_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE tmpiptb00012.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpiptb00012_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpiptb00012.lado_1" column
-#+
-#+ @param p_lado_1 - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00012_lado_1_checkColumnConstraints(p_lado_1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_lado_1 LIKE tmpiptb00012.lado_1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpiptb00012_lado_1_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpiptb00012.lado_2" column
-#+
-#+ @param p_lado_2 - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00012_lado_2_checkColumnConstraints(p_lado_2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_lado_2 LIKE tmpiptb00012.lado_2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpiptb00012_lado_2_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpiptb00012.lado_3" column
-#+
-#+ @param p_lado_3 - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00012_lado_3_checkColumnConstraints(p_lado_3)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_lado_3 LIKE tmpiptb00012.lado_3
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpiptb00012_lado_3_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpiptb00006" table
-#+
-#+ @param p_data - a row data LIKE tmpiptb00006.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00006_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE tmpiptb00006.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_tmpiptb00006_cod_cia_checkColumnConstraints(p_data.cod_cia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00006_num_doc_checkColumnConstraints(p_data.num_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00006_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00006_fact_no_checkColumnConstraints(p_data.fact_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00006_conduce_no_checkColumnConstraints(p_data.conduce_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00006_tipo_checkColumnConstraints(p_data.tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00006_orden_compra_checkColumnConstraints(p_data.orden_compra) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00006_cod_sp_checkColumnConstraints(p_data.cod_sp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00006_cod_sp_sec_checkColumnConstraints(p_data.cod_sp_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00006_cod_transp_checkColumnConstraints(p_data.cod_transp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00006_sec_transp_checkColumnConstraints(p_data.sec_transp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00006_placa_checkColumnConstraints(p_data.placa) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00006_cod_tarifa_checkColumnConstraints(p_data.cod_tarifa) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00006_cod_mov_checkColumnConstraints(p_data.cod_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00006_detalle_checkColumnConstraints(p_data.detalle) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00006_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00006_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00006_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00006_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00006_cantidad_1_checkColumnConstraints(p_data.cantidad_1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00006_cantidad_2_checkColumnConstraints(p_data.cantidad_2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00006_cond_recep_checkColumnConstraints(p_data.cond_recep) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00006_uso_tiempo_checkColumnConstraints(p_data.uso_tiempo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00006_bodega_checkColumnConstraints(p_data.bodega) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00006_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00006_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00006_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00006_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00006_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00006_num_req_checkColumnConstraints(p_data.num_req) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpiptb00006_checkTableConstraints
-
-{}
-#+ Check constraints on the "tmpiptb00006.cod_cia" column
-#+
-#+ @param p_cod_cia - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00006_cod_cia_checkColumnConstraints(p_cod_cia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_cia LIKE tmpiptb00006.cod_cia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpiptb00006_cod_cia_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpiptb00006.num_doc" column
-#+
-#+ @param p_num_doc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00006_num_doc_checkColumnConstraints(p_num_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_doc LIKE tmpiptb00006.num_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_num_doc IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- num_doc: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpiptb00006_num_doc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpiptb00006.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00006_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE tmpiptb00006.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_fecha IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- fecha: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpiptb00006_fecha_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpiptb00006.fact_no" column
-#+
-#+ @param p_fact_no - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00006_fact_no_checkColumnConstraints(p_fact_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fact_no LIKE tmpiptb00006.fact_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpiptb00006_fact_no_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpiptb00006.conduce_no" column
-#+
-#+ @param p_conduce_no - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00006_conduce_no_checkColumnConstraints(p_conduce_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_conduce_no LIKE tmpiptb00006.conduce_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpiptb00006_conduce_no_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpiptb00006.tipo" column
-#+
-#+ @param p_tipo - CHAR(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00006_tipo_checkColumnConstraints(p_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo LIKE tmpiptb00006.tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpiptb00006_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpiptb00006.orden_compra" column
-#+
-#+ @param p_orden_compra - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00006_orden_compra_checkColumnConstraints(p_orden_compra)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_orden_compra LIKE tmpiptb00006.orden_compra
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpiptb00006_orden_compra_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpiptb00006.cod_sp" column
-#+
-#+ @param p_cod_sp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00006_cod_sp_checkColumnConstraints(p_cod_sp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sp LIKE tmpiptb00006.cod_sp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpiptb00006_cod_sp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpiptb00006.cod_sp_sec" column
-#+
-#+ @param p_cod_sp_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00006_cod_sp_sec_checkColumnConstraints(p_cod_sp_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sp_sec LIKE tmpiptb00006.cod_sp_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpiptb00006_cod_sp_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpiptb00006.cod_transp" column
-#+
-#+ @param p_cod_transp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00006_cod_transp_checkColumnConstraints(p_cod_transp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_transp LIKE tmpiptb00006.cod_transp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpiptb00006_cod_transp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpiptb00006.sec_transp" column
-#+
-#+ @param p_sec_transp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00006_sec_transp_checkColumnConstraints(p_sec_transp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_transp LIKE tmpiptb00006.sec_transp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpiptb00006_sec_transp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpiptb00006.placa" column
-#+
-#+ @param p_placa - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00006_placa_checkColumnConstraints(p_placa)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_placa LIKE tmpiptb00006.placa
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpiptb00006_placa_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpiptb00006.cod_tarifa" column
-#+
-#+ @param p_cod_tarifa - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00006_cod_tarifa_checkColumnConstraints(p_cod_tarifa)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tarifa LIKE tmpiptb00006.cod_tarifa
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpiptb00006_cod_tarifa_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpiptb00006.cod_mov" column
-#+
-#+ @param p_cod_mov - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00006_cod_mov_checkColumnConstraints(p_cod_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mov LIKE tmpiptb00006.cod_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_mov IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_mov: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpiptb00006_cod_mov_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpiptb00006.detalle" column
-#+
-#+ @param p_detalle - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00006_detalle_checkColumnConstraints(p_detalle)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_detalle LIKE tmpiptb00006.detalle
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpiptb00006_detalle_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpiptb00006.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00006_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE tmpiptb00006.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_n IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_n: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpiptb00006_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpiptb00006.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00006_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE tmpiptb00006.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_grupo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_grupo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpiptb00006_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpiptb00006.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00006_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE tmpiptb00006.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_tipo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_tipo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpiptb00006_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpiptb00006.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00006_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE tmpiptb00006.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_sec IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_sec: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpiptb00006_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpiptb00006.cantidad_1" column
-#+
-#+ @param p_cantidad_1 - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00006_cantidad_1_checkColumnConstraints(p_cantidad_1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad_1 LIKE tmpiptb00006.cantidad_1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpiptb00006_cantidad_1_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpiptb00006.cantidad_2" column
-#+
-#+ @param p_cantidad_2 - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00006_cantidad_2_checkColumnConstraints(p_cantidad_2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad_2 LIKE tmpiptb00006.cantidad_2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cantidad_2 IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cantidad_2: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpiptb00006_cantidad_2_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpiptb00006.cond_recep" column
-#+
-#+ @param p_cond_recep - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00006_cond_recep_checkColumnConstraints(p_cond_recep)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cond_recep LIKE tmpiptb00006.cond_recep
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpiptb00006_cond_recep_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpiptb00006.uso_tiempo" column
-#+
-#+ @param p_uso_tiempo - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00006_uso_tiempo_checkColumnConstraints(p_uso_tiempo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_uso_tiempo LIKE tmpiptb00006.uso_tiempo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpiptb00006_uso_tiempo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpiptb00006.bodega" column
-#+
-#+ @param p_bodega - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00006_bodega_checkColumnConstraints(p_bodega)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_bodega LIKE tmpiptb00006.bodega
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpiptb00006_bodega_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpiptb00006.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00006_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE tmpiptb00006.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpiptb00006_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpiptb00006.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00006_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE tmpiptb00006.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpiptb00006_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpiptb00006.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00006_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE tmpiptb00006.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpiptb00006_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpiptb00006.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00006_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE tmpiptb00006.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpiptb00006_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpiptb00006.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00006_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE tmpiptb00006.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpiptb00006_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpiptb00006.num_req" column
-#+
-#+ @param p_num_req - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00006_num_req_checkColumnConstraints(p_num_req)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_req LIKE tmpiptb00006.num_req
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpiptb00006_num_req_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpiptb00002" table
-#+
-#+ @param p_data - a row data LIKE tmpiptb00002.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00002_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE tmpiptb00002.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_tmpiptb00002_cod_cia_checkColumnConstraints(p_data.cod_cia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00002_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00002_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00002_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00002_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00002_descrip_esp_checkColumnConstraints(p_data.descrip_esp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00002_descrip_ing_checkColumnConstraints(p_data.descrip_ing) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00002_unidad_med_checkColumnConstraints(p_data.unidad_med) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00002_nomenclatura_checkColumnConstraints(p_data.nomenclatura) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00002_bodega_checkColumnConstraints(p_data.bodega) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00002_exist_max_checkColumnConstraints(p_data.exist_max) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00002_exist_min_checkColumnConstraints(p_data.exist_min) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00002_dia_llegada_checkColumnConstraints(p_data.dia_llegada) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00002_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00002_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00002_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00002_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00002_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00002_control_existencia_checkColumnConstraints(p_data.control_existencia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00002_control_itbis_checkColumnConstraints(p_data.control_itbis) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00002_pcodn_checkColumnConstraints(p_data.pcodn) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00002_pcodgrupo_checkColumnConstraints(p_data.pcodgrupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00002_pcodtipo_checkColumnConstraints(p_data.pcodtipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00002_pcodsec_checkColumnConstraints(p_data.pcodsec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00002_material_checkColumnConstraints(p_data.material) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00002_labor_checkColumnConstraints(p_data.labor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00002_gastos_checkColumnConstraints(p_data.gastos) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00002_factor_checkColumnConstraints(p_data.factor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpiptb00002_checkTableConstraints
-
-{}
-#+ Check constraints on the "tmpiptb00002.cod_cia" column
-#+
-#+ @param p_cod_cia - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00002_cod_cia_checkColumnConstraints(p_cod_cia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_cia LIKE tmpiptb00002.cod_cia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpiptb00002_cod_cia_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpiptb00002.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00002_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE tmpiptb00002.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpiptb00002_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpiptb00002.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00002_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE tmpiptb00002.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpiptb00002_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpiptb00002.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00002_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE tmpiptb00002.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpiptb00002_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpiptb00002.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00002_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE tmpiptb00002.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpiptb00002_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpiptb00002.descrip_esp" column
-#+
-#+ @param p_descrip_esp - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00002_descrip_esp_checkColumnConstraints(p_descrip_esp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descrip_esp LIKE tmpiptb00002.descrip_esp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpiptb00002_descrip_esp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpiptb00002.descrip_ing" column
-#+
-#+ @param p_descrip_ing - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00002_descrip_ing_checkColumnConstraints(p_descrip_ing)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descrip_ing LIKE tmpiptb00002.descrip_ing
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpiptb00002_descrip_ing_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpiptb00002.unidad_med" column
-#+
-#+ @param p_unidad_med - CHAR(4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00002_unidad_med_checkColumnConstraints(p_unidad_med)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_unidad_med LIKE tmpiptb00002.unidad_med
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpiptb00002_unidad_med_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpiptb00002.nomenclatura" column
-#+
-#+ @param p_nomenclatura - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00002_nomenclatura_checkColumnConstraints(p_nomenclatura)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nomenclatura LIKE tmpiptb00002.nomenclatura
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpiptb00002_nomenclatura_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpiptb00002.bodega" column
-#+
-#+ @param p_bodega - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00002_bodega_checkColumnConstraints(p_bodega)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_bodega LIKE tmpiptb00002.bodega
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpiptb00002_bodega_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpiptb00002.exist_max" column
-#+
-#+ @param p_exist_max - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00002_exist_max_checkColumnConstraints(p_exist_max)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_exist_max LIKE tmpiptb00002.exist_max
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpiptb00002_exist_max_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpiptb00002.exist_min" column
-#+
-#+ @param p_exist_min - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00002_exist_min_checkColumnConstraints(p_exist_min)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_exist_min LIKE tmpiptb00002.exist_min
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpiptb00002_exist_min_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpiptb00002.dia_llegada" column
-#+
-#+ @param p_dia_llegada - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00002_dia_llegada_checkColumnConstraints(p_dia_llegada)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_dia_llegada LIKE tmpiptb00002.dia_llegada
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpiptb00002_dia_llegada_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpiptb00002.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00002_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE tmpiptb00002.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpiptb00002_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpiptb00002.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00002_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE tmpiptb00002.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpiptb00002_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpiptb00002.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00002_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE tmpiptb00002.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpiptb00002_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpiptb00002.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00002_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE tmpiptb00002.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpiptb00002_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpiptb00002.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00002_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE tmpiptb00002.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpiptb00002_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpiptb00002.control_existencia" column
-#+
-#+ @param p_control_existencia - VARCHAR2(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00002_control_existencia_checkColumnConstraints(p_control_existencia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_control_existencia LIKE tmpiptb00002.control_existencia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpiptb00002_control_existencia_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpiptb00002.control_itbis" column
-#+
-#+ @param p_control_itbis - VARCHAR2(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00002_control_itbis_checkColumnConstraints(p_control_itbis)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_control_itbis LIKE tmpiptb00002.control_itbis
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpiptb00002_control_itbis_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpiptb00002.pcodn" column
-#+
-#+ @param p_pcodn - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00002_pcodn_checkColumnConstraints(p_pcodn)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_pcodn LIKE tmpiptb00002.pcodn
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpiptb00002_pcodn_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpiptb00002.pcodgrupo" column
-#+
-#+ @param p_pcodgrupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00002_pcodgrupo_checkColumnConstraints(p_pcodgrupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_pcodgrupo LIKE tmpiptb00002.pcodgrupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpiptb00002_pcodgrupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpiptb00002.pcodtipo" column
-#+
-#+ @param p_pcodtipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00002_pcodtipo_checkColumnConstraints(p_pcodtipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_pcodtipo LIKE tmpiptb00002.pcodtipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpiptb00002_pcodtipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpiptb00002.pcodsec" column
-#+
-#+ @param p_pcodsec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00002_pcodsec_checkColumnConstraints(p_pcodsec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_pcodsec LIKE tmpiptb00002.pcodsec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpiptb00002_pcodsec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpiptb00002.material" column
-#+
-#+ @param p_material - DECIMAL(18,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00002_material_checkColumnConstraints(p_material)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_material LIKE tmpiptb00002.material
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpiptb00002_material_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpiptb00002.labor" column
-#+
-#+ @param p_labor - DECIMAL(18,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00002_labor_checkColumnConstraints(p_labor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_labor LIKE tmpiptb00002.labor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpiptb00002_labor_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpiptb00002.gastos" column
-#+
-#+ @param p_gastos - DECIMAL(18,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00002_gastos_checkColumnConstraints(p_gastos)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_gastos LIKE tmpiptb00002.gastos
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpiptb00002_gastos_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpiptb00002.factor" column
-#+
-#+ @param p_factor - DECIMAL(18,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00002_factor_checkColumnConstraints(p_factor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_factor LIKE tmpiptb00002.factor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpiptb00002_factor_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpinvm" table
-#+
-#+ @param p_data - a row data LIKE tmpinvm.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpinvm_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE tmpinvm.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_tmpinvm_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpinvm_l1_checkColumnConstraints(p_data.l1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpinvm_l2_checkColumnConstraints(p_data.l2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpinvm_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpinvm_medida_checkColumnConstraints(p_data.medida) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpinvm_codn_checkColumnConstraints(p_data.codn) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpinvm_codgrupo_checkColumnConstraints(p_data.codgrupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpinvm_codtipo_checkColumnConstraints(p_data.codtipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpinvm_codsec_checkColumnConstraints(p_data.codsec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpinvm_existencia_checkColumnConstraints(p_data.existencia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpinvm_costo_checkColumnConstraints(p_data.costo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpinvm_clasificacion_checkColumnConstraints(p_data.clasificacion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpinvm_checkTableConstraints
-
-{}
-#+ Check constraints on the "tmpinvm.descripcion" column
-#+
-#+ @param p_descripcion - VARCHAR2(255) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpinvm_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE tmpinvm.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpinvm_descripcion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpinvm.l1" column
-#+
-#+ @param p_l1 - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpinvm_l1_checkColumnConstraints(p_l1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_l1 LIKE tmpinvm.l1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpinvm_l1_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpinvm.l2" column
-#+
-#+ @param p_l2 - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpinvm_l2_checkColumnConstraints(p_l2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_l2 LIKE tmpinvm.l2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpinvm_l2_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpinvm.cantidad" column
-#+
-#+ @param p_cantidad - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpinvm_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE tmpinvm.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpinvm_cantidad_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpinvm.medida" column
-#+
-#+ @param p_medida - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpinvm_medida_checkColumnConstraints(p_medida)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_medida LIKE tmpinvm.medida
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpinvm_medida_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpinvm.codn" column
-#+
-#+ @param p_codn - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpinvm_codn_checkColumnConstraints(p_codn)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codn LIKE tmpinvm.codn
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpinvm_codn_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpinvm.codgrupo" column
-#+
-#+ @param p_codgrupo - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpinvm_codgrupo_checkColumnConstraints(p_codgrupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codgrupo LIKE tmpinvm.codgrupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpinvm_codgrupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpinvm.codtipo" column
-#+
-#+ @param p_codtipo - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpinvm_codtipo_checkColumnConstraints(p_codtipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codtipo LIKE tmpinvm.codtipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpinvm_codtipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpinvm.codsec" column
-#+
-#+ @param p_codsec - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpinvm_codsec_checkColumnConstraints(p_codsec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codsec LIKE tmpinvm.codsec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpinvm_codsec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpinvm.existencia" column
-#+
-#+ @param p_existencia - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpinvm_existencia_checkColumnConstraints(p_existencia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_existencia LIKE tmpinvm.existencia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpinvm_existencia_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpinvm.costo" column
-#+
-#+ @param p_costo - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpinvm_costo_checkColumnConstraints(p_costo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_costo LIKE tmpinvm.costo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpinvm_costo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpinvm.clasificacion" column
-#+
-#+ @param p_clasificacion - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpinvm_clasificacion_checkColumnConstraints(p_clasificacion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_clasificacion LIKE tmpinvm.clasificacion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpinvm_clasificacion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpinventariofisico" table
-#+
-#+ @param p_data - a row data LIKE tmpinventariofisico.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpinventariofisico_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE tmpinventariofisico.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_tmpinventariofisico_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpinventariofisico_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpinventariofisico_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpinventariofisico_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpinventariofisico_existencia_checkColumnConstraints(p_data.existencia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpinventariofisico_cod_n1_checkColumnConstraints(p_data.cod_n1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpinventariofisico_cod_grupo1_checkColumnConstraints(p_data.cod_grupo1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpinventariofisico_cod_tipo1_checkColumnConstraints(p_data.cod_tipo1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpinventariofisico_cod_sec1_checkColumnConstraints(p_data.cod_sec1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpinventariofisico_fisico_checkColumnConstraints(p_data.fisico) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpinventariofisico_costo_checkColumnConstraints(p_data.costo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpinventariofisico_checkTableConstraints
-
-{}
-#+ Check constraints on the "tmpinventariofisico.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpinventariofisico_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE tmpinventariofisico.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpinventariofisico_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpinventariofisico.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpinventariofisico_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE tmpinventariofisico.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpinventariofisico_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpinventariofisico.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpinventariofisico_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE tmpinventariofisico.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpinventariofisico_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpinventariofisico.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpinventariofisico_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE tmpinventariofisico.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpinventariofisico_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpinventariofisico.existencia" column
-#+
-#+ @param p_existencia - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpinventariofisico_existencia_checkColumnConstraints(p_existencia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_existencia LIKE tmpinventariofisico.existencia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpinventariofisico_existencia_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpinventariofisico.cod_n1" column
-#+
-#+ @param p_cod_n1 - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpinventariofisico_cod_n1_checkColumnConstraints(p_cod_n1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n1 LIKE tmpinventariofisico.cod_n1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpinventariofisico_cod_n1_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpinventariofisico.cod_grupo1" column
-#+
-#+ @param p_cod_grupo1 - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpinventariofisico_cod_grupo1_checkColumnConstraints(p_cod_grupo1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo1 LIKE tmpinventariofisico.cod_grupo1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpinventariofisico_cod_grupo1_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpinventariofisico.cod_tipo1" column
-#+
-#+ @param p_cod_tipo1 - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpinventariofisico_cod_tipo1_checkColumnConstraints(p_cod_tipo1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo1 LIKE tmpinventariofisico.cod_tipo1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpinventariofisico_cod_tipo1_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpinventariofisico.cod_sec1" column
-#+
-#+ @param p_cod_sec1 - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpinventariofisico_cod_sec1_checkColumnConstraints(p_cod_sec1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec1 LIKE tmpinventariofisico.cod_sec1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpinventariofisico_cod_sec1_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpinventariofisico.fisico" column
-#+
-#+ @param p_fisico - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpinventariofisico_fisico_checkColumnConstraints(p_fisico)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fisico LIKE tmpinventariofisico.fisico
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpinventariofisico_fisico_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpinventariofisico.costo" column
-#+
-#+ @param p_costo - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpinventariofisico_costo_checkColumnConstraints(p_costo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_costo LIKE tmpinventariofisico.costo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpinventariofisico_costo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpinventario" table
-#+
-#+ @param p_data - a row data LIKE tmpinventario.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpinventario_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE tmpinventario.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_tmpinventario_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpinventario_l1_checkColumnConstraints(p_data.l1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpinventario_l2_checkColumnConstraints(p_data.l2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpinventario_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpinventario_metros_checkColumnConstraints(p_data.metros) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpinventario_codn_checkColumnConstraints(p_data.codn) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpinventario_codgrupo_checkColumnConstraints(p_data.codgrupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpinventario_codtipo_checkColumnConstraints(p_data.codtipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpinventario_codsec_checkColumnConstraints(p_data.codsec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpinventario_existencia_checkColumnConstraints(p_data.existencia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpinventario_tipo_checkColumnConstraints(p_data.tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpinventario_checkTableConstraints
-
-{}
-#+ Check constraints on the "tmpinventario.descripcion" column
-#+
-#+ @param p_descripcion - VARCHAR2(255) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpinventario_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE tmpinventario.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpinventario_descripcion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpinventario.l1" column
-#+
-#+ @param p_l1 - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpinventario_l1_checkColumnConstraints(p_l1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_l1 LIKE tmpinventario.l1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpinventario_l1_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpinventario.l2" column
-#+
-#+ @param p_l2 - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpinventario_l2_checkColumnConstraints(p_l2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_l2 LIKE tmpinventario.l2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpinventario_l2_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpinventario.cantidad" column
-#+
-#+ @param p_cantidad - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpinventario_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE tmpinventario.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpinventario_cantidad_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpinventario.metros" column
-#+
-#+ @param p_metros - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpinventario_metros_checkColumnConstraints(p_metros)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_metros LIKE tmpinventario.metros
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpinventario_metros_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpinventario.codn" column
-#+
-#+ @param p_codn - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpinventario_codn_checkColumnConstraints(p_codn)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codn LIKE tmpinventario.codn
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpinventario_codn_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpinventario.codgrupo" column
-#+
-#+ @param p_codgrupo - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpinventario_codgrupo_checkColumnConstraints(p_codgrupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codgrupo LIKE tmpinventario.codgrupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpinventario_codgrupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpinventario.codtipo" column
-#+
-#+ @param p_codtipo - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpinventario_codtipo_checkColumnConstraints(p_codtipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codtipo LIKE tmpinventario.codtipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpinventario_codtipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpinventario.codsec" column
-#+
-#+ @param p_codsec - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpinventario_codsec_checkColumnConstraints(p_codsec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codsec LIKE tmpinventario.codsec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpinventario_codsec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpinventario.existencia" column
-#+
-#+ @param p_existencia - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpinventario_existencia_checkColumnConstraints(p_existencia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_existencia LIKE tmpinventario.existencia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpinventario_existencia_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpinventario.tipo" column
-#+
-#+ @param p_tipo - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpinventario_tipo_checkColumnConstraints(p_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo LIKE tmpinventario.tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpinventario_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpgrupo" table
-#+
-#+ @param p_data - a row data LIKE tmpgrupo.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpgrupo_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE tmpgrupo.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_tmpgrupo_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpgrupo_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- CALL smarmotech_dbxconstraints_tmpgrupo_pk_tmpgrupo_checkUniqueConstraint(p_forUpdate, p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpgrupo_checkTableConstraints
-
-{}
-#+ Check the primary key uniqueness constraint on the "tmpgrupo"
-#+
-#+ @param p_key - Primary Key
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpgrupo_pk_tmpgrupo_checkUniqueConstraint(p_forUpdate, p_key)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_key
- RECORD
- tmpgrupo_cod_grupo LIKE tmpgrupo.cod_grupo
- END RECORD
- DEFINE l_key
- RECORD
- tmpgrupo_cod_grupo LIKE tmpgrupo.cod_grupo
- END RECORD
- DEFINE l_where STRING
- DEFINE l_sqlQuery STRING
- DEFINE l_count INTEGER
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- LET l_where = "WHERE tmpgrupo.cod_grupo = ? "
-
- let l_sqlQuery = "SELECT COUNT(*), cod_grupo FROM tmpgrupo ", l_where, " GROUP BY cod_grupo"
-
- PREPARE cur_tmpgrupo_pk_tmpgrupo_checkUniqueConstraint FROM l_sqlQuery
- EXECUTE cur_tmpgrupo_pk_tmpgrupo_checkUniqueConstraint INTO l_count, l_key.* USING p_key.*
- FREE cur_tmpgrupo_pk_tmpgrupo_checkUniqueConstraint
- IF (NOT p_forUpdate AND l_count > 0) OR (p_forUpdate AND l_count > 0 AND p_key.* != l_key.*) THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_grupo: " || ERROR_BAM_00002) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpgrupo_pk_tmpgrupo_checkUniqueConstraint
-
-{}
-#+ Check constraints on the "tmpgrupo.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpgrupo_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE tmpgrupo.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_grupo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_grupo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpgrupo_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpgrupo.descripcion" column
-#+
-#+ @param p_descripcion - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpgrupo_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE tmpgrupo.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpgrupo_descripcion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpferia5" table
-#+
-#+ @param p_data - a row data LIKE tmpferia5.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpferia5_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE tmpferia5.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_tmpferia5_cod_lista_checkColumnConstraints(p_data.cod_lista) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpferia5_ventas_checkColumnConstraints(p_data.ventas) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpferia5_codn_checkColumnConstraints(p_data.codn) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpferia5_codgrupo_checkColumnConstraints(p_data.codgrupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpferia5_codtipo_checkColumnConstraints(p_data.codtipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpferia5_codsec_checkColumnConstraints(p_data.codsec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpferia5_precio_checkColumnConstraints(p_data.precio) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpferia5_checkTableConstraints
-
-{}
-#+ Check constraints on the "tmpferia5.cod_lista" column
-#+
-#+ @param p_cod_lista - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpferia5_cod_lista_checkColumnConstraints(p_cod_lista)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_lista LIKE tmpferia5.cod_lista
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpferia5_cod_lista_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpferia5.ventas" column
-#+
-#+ @param p_ventas - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpferia5_ventas_checkColumnConstraints(p_ventas)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ventas LIKE tmpferia5.ventas
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpferia5_ventas_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpferia5.codn" column
-#+
-#+ @param p_codn - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpferia5_codn_checkColumnConstraints(p_codn)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codn LIKE tmpferia5.codn
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpferia5_codn_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpferia5.codgrupo" column
-#+
-#+ @param p_codgrupo - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpferia5_codgrupo_checkColumnConstraints(p_codgrupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codgrupo LIKE tmpferia5.codgrupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpferia5_codgrupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpferia5.codtipo" column
-#+
-#+ @param p_codtipo - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpferia5_codtipo_checkColumnConstraints(p_codtipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codtipo LIKE tmpferia5.codtipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpferia5_codtipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpferia5.codsec" column
-#+
-#+ @param p_codsec - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpferia5_codsec_checkColumnConstraints(p_codsec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codsec LIKE tmpferia5.codsec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpferia5_codsec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpferia5.precio" column
-#+
-#+ @param p_precio - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpferia5_precio_checkColumnConstraints(p_precio)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_precio LIKE tmpferia5.precio
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpferia5_precio_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpferia3" table
-#+
-#+ @param p_data - a row data LIKE tmpferia3.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpferia3_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE tmpferia3.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_tmpferia3_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpferia3_cod_lista_checkColumnConstraints(p_data.cod_lista) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpferia3_ventas_checkColumnConstraints(p_data.ventas) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpferia3_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpferia3_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpferia3_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpferia3_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpferia3_precio_checkColumnConstraints(p_data.precio) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpferia3_checkTableConstraints
-
-{}
-#+ Check constraints on the "tmpferia3.descripcion" column
-#+
-#+ @param p_descripcion - VARCHAR2(255) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpferia3_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE tmpferia3.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpferia3_descripcion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpferia3.cod_lista" column
-#+
-#+ @param p_cod_lista - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpferia3_cod_lista_checkColumnConstraints(p_cod_lista)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_lista LIKE tmpferia3.cod_lista
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpferia3_cod_lista_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpferia3.ventas" column
-#+
-#+ @param p_ventas - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpferia3_ventas_checkColumnConstraints(p_ventas)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ventas LIKE tmpferia3.ventas
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpferia3_ventas_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpferia3.cod_n" column
-#+
-#+ @param p_cod_n - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpferia3_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE tmpferia3.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpferia3_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpferia3.cod_grupo" column
-#+
-#+ @param p_cod_grupo - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpferia3_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE tmpferia3.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpferia3_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpferia3.cod_tipo" column
-#+
-#+ @param p_cod_tipo - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpferia3_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE tmpferia3.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpferia3_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpferia3.cod_sec" column
-#+
-#+ @param p_cod_sec - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpferia3_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE tmpferia3.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpferia3_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpferia3.precio" column
-#+
-#+ @param p_precio - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpferia3_precio_checkColumnConstraints(p_precio)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_precio LIKE tmpferia3.precio
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpferia3_precio_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpferia2" table
-#+
-#+ @param p_data - a row data LIKE tmpferia2.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpferia2_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE tmpferia2.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_tmpferia2_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpferia2_cod_lista_checkColumnConstraints(p_data.cod_lista) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpferia2_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpferia2_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpferia2_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpferia2_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpferia2_precio_checkColumnConstraints(p_data.precio) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpferia2_f8_checkColumnConstraints(p_data.f8) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpferia2_f9_checkColumnConstraints(p_data.f9) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpferia2_f10_checkColumnConstraints(p_data.f10) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpferia2_checkTableConstraints
-
-{}
-#+ Check constraints on the "tmpferia2.descripcion" column
-#+
-#+ @param p_descripcion - VARCHAR2(255) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpferia2_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE tmpferia2.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpferia2_descripcion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpferia2.cod_lista" column
-#+
-#+ @param p_cod_lista - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpferia2_cod_lista_checkColumnConstraints(p_cod_lista)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_lista LIKE tmpferia2.cod_lista
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpferia2_cod_lista_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpferia2.cod_n" column
-#+
-#+ @param p_cod_n - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpferia2_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE tmpferia2.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpferia2_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpferia2.cod_grupo" column
-#+
-#+ @param p_cod_grupo - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpferia2_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE tmpferia2.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpferia2_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpferia2.cod_tipo" column
-#+
-#+ @param p_cod_tipo - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpferia2_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE tmpferia2.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpferia2_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpferia2.cod_sec" column
-#+
-#+ @param p_cod_sec - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpferia2_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE tmpferia2.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpferia2_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpferia2.precio" column
-#+
-#+ @param p_precio - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpferia2_precio_checkColumnConstraints(p_precio)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_precio LIKE tmpferia2.precio
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpferia2_precio_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpferia2.f8" column
-#+
-#+ @param p_f8 - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpferia2_f8_checkColumnConstraints(p_f8)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_f8 LIKE tmpferia2.f8
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpferia2_f8_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpferia2.f9" column
-#+
-#+ @param p_f9 - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpferia2_f9_checkColumnConstraints(p_f9)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_f9 LIKE tmpferia2.f9
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpferia2_f9_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpferia2.f10" column
-#+
-#+ @param p_f10 - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpferia2_f10_checkColumnConstraints(p_f10)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_f10 LIKE tmpferia2.f10
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpferia2_f10_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpfempleados" table
-#+
-#+ @param p_data - a row data LIKE tmpfempleados.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpfempleados_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE tmpfempleados.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_tmpfempleados_num_emp_checkColumnConstraints(p_data.num_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpfempleados_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpfempleados_fecha_inicio_checkColumnConstraints(p_data.fecha_inicio) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpfempleados_valor_checkColumnConstraints(p_data.valor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpfempleados_estado_checkColumnConstraints(p_data.estado) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpfempleados_checkTableConstraints
-
-{}
-#+ Check constraints on the "tmpfempleados.num_emp" column
-#+
-#+ @param p_num_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpfempleados_num_emp_checkColumnConstraints(p_num_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_emp LIKE tmpfempleados.num_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpfempleados_num_emp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpfempleados.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpfempleados_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE tmpfempleados.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpfempleados_fecha_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpfempleados.fecha_inicio" column
-#+
-#+ @param p_fecha_inicio - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpfempleados_fecha_inicio_checkColumnConstraints(p_fecha_inicio)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_inicio LIKE tmpfempleados.fecha_inicio
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpfempleados_fecha_inicio_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpfempleados.valor" column
-#+
-#+ @param p_valor - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpfempleados_valor_checkColumnConstraints(p_valor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valor LIKE tmpfempleados.valor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpfempleados_valor_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpfempleados.estado" column
-#+
-#+ @param p_estado - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpfempleados_estado_checkColumnConstraints(p_estado)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_estado LIKE tmpfempleados.estado
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpfempleados_estado_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpfacturas" table
-#+
-#+ @param p_data - a row data LIKE tmpfacturas.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpfacturas_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE tmpfacturas.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_tmpfacturas_factura_checkColumnConstraints(p_data.factura) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpfacturas_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpfacturas_precio_checkColumnConstraints(p_data.precio) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpfacturas_desc#_checkColumnConstraints(p_data.desc#) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpfacturas_valor_checkColumnConstraints(p_data.valor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpfacturas_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpfacturas_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpfacturas_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpfacturas_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpfacturas_f10_checkColumnConstraints(p_data.f10) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpfacturas_f11_checkColumnConstraints(p_data.f11) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpfacturas_f12_checkColumnConstraints(p_data.f12) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpfacturas_f13_checkColumnConstraints(p_data.f13) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpfacturas_f14_checkColumnConstraints(p_data.f14) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpfacturas_f15_checkColumnConstraints(p_data.f15) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpfacturas_checkTableConstraints
-
-{}
-#+ Check constraints on the "tmpfacturas.factura" column
-#+
-#+ @param p_factura - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpfacturas_factura_checkColumnConstraints(p_factura)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_factura LIKE tmpfacturas.factura
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpfacturas_factura_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpfacturas.cantidad" column
-#+
-#+ @param p_cantidad - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpfacturas_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE tmpfacturas.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpfacturas_cantidad_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpfacturas.precio" column
-#+
-#+ @param p_precio - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpfacturas_precio_checkColumnConstraints(p_precio)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_precio LIKE tmpfacturas.precio
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpfacturas_precio_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpfacturas.desc#" column
-#+
-#+ @param p_desc# - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpfacturas_desc#_checkColumnConstraints(p_desc#)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_desc# LIKE tmpfacturas.desc#
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpfacturas_desc#_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpfacturas.valor" column
-#+
-#+ @param p_valor - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpfacturas_valor_checkColumnConstraints(p_valor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valor LIKE tmpfacturas.valor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpfacturas_valor_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpfacturas.cod_n" column
-#+
-#+ @param p_cod_n - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpfacturas_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE tmpfacturas.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpfacturas_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpfacturas.cod_grupo" column
-#+
-#+ @param p_cod_grupo - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpfacturas_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE tmpfacturas.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpfacturas_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpfacturas.cod_tipo" column
-#+
-#+ @param p_cod_tipo - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpfacturas_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE tmpfacturas.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpfacturas_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpfacturas.cod_sec" column
-#+
-#+ @param p_cod_sec - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpfacturas_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE tmpfacturas.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpfacturas_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpfacturas.f10" column
-#+
-#+ @param p_f10 - VARCHAR2(255) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpfacturas_f10_checkColumnConstraints(p_f10)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_f10 LIKE tmpfacturas.f10
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpfacturas_f10_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpfacturas.f11" column
-#+
-#+ @param p_f11 - VARCHAR2(255) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpfacturas_f11_checkColumnConstraints(p_f11)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_f11 LIKE tmpfacturas.f11
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpfacturas_f11_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpfacturas.f12" column
-#+
-#+ @param p_f12 - VARCHAR2(255) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpfacturas_f12_checkColumnConstraints(p_f12)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_f12 LIKE tmpfacturas.f12
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpfacturas_f12_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpfacturas.f13" column
-#+
-#+ @param p_f13 - VARCHAR2(255) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpfacturas_f13_checkColumnConstraints(p_f13)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_f13 LIKE tmpfacturas.f13
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpfacturas_f13_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpfacturas.f14" column
-#+
-#+ @param p_f14 - VARCHAR2(255) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpfacturas_f14_checkColumnConstraints(p_f14)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_f14 LIKE tmpfacturas.f14
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpfacturas_f14_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpfacturas.f15" column
-#+
-#+ @param p_f15 - VARCHAR2(255) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpfacturas_f15_checkColumnConstraints(p_f15)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_f15 LIKE tmpfacturas.f15
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpfacturas_f15_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpexcel" table
-#+
-#+ @param p_data - a row data LIKE tmpexcel.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpexcel_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE tmpexcel.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_tmpexcel_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpexcel_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpexcel_checkTableConstraints
-
-{}
-#+ Check constraints on the "tmpexcel.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpexcel_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE tmpexcel.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpexcel_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpexcel.descripcion" column
-#+
-#+ @param p_descripcion - VARCHAR2(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpexcel_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE tmpexcel.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpexcel_descripcion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpduplicados" table
-#+
-#+ @param p_data - a row data LIKE tmpduplicados.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpduplicados_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE tmpduplicados.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_tmpduplicados_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpduplicados_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpduplicados_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpduplicados_cod_seg_checkColumnConstraints(p_data.cod_seg) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpduplicados_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpduplicados_veces_checkColumnConstraints(p_data.veces) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpduplicados_checkTableConstraints
-
-{}
-#+ Check constraints on the "tmpduplicados.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpduplicados_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE tmpduplicados.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpduplicados_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpduplicados.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpduplicados_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE tmpduplicados.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpduplicados_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpduplicados.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpduplicados_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE tmpduplicados.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpduplicados_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpduplicados.cod_seg" column
-#+
-#+ @param p_cod_seg - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpduplicados_cod_seg_checkColumnConstraints(p_cod_seg)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_seg LIKE tmpduplicados.cod_seg
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpduplicados_cod_seg_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpduplicados.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpduplicados_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE tmpduplicados.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpduplicados_cantidad_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpduplicados.veces" column
-#+
-#+ @param p_veces - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpduplicados_veces_checkColumnConstraints(p_veces)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_veces LIKE tmpduplicados.veces
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpduplicados_veces_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpdetallefact" table
-#+
-#+ @param p_data - a row data LIKE tmpdetallefact.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpdetallefact_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE tmpdetallefact.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_tmpdetallefact_factura_checkColumnConstraints(p_data.factura) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpdetallefact_clase_checkColumnConstraints(p_data.clase) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpdetallefact_grupo_checkColumnConstraints(p_data.grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpdetallefact_tipo_checkColumnConstraints(p_data.tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpdetallefact_medida_checkColumnConstraints(p_data.medida) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpdetallefact_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpdetallefact_precio_checkColumnConstraints(p_data.precio) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpdetallefact_descuento_checkColumnConstraints(p_data.descuento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpdetallefact_f9_checkColumnConstraints(p_data.f9) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpdetallefact_checkTableConstraints
-
-{}
-#+ Check constraints on the "tmpdetallefact.factura" column
-#+
-#+ @param p_factura - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpdetallefact_factura_checkColumnConstraints(p_factura)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_factura LIKE tmpdetallefact.factura
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpdetallefact_factura_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpdetallefact.clase" column
-#+
-#+ @param p_clase - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpdetallefact_clase_checkColumnConstraints(p_clase)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_clase LIKE tmpdetallefact.clase
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpdetallefact_clase_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpdetallefact.grupo" column
-#+
-#+ @param p_grupo - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpdetallefact_grupo_checkColumnConstraints(p_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_grupo LIKE tmpdetallefact.grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpdetallefact_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpdetallefact.tipo" column
-#+
-#+ @param p_tipo - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpdetallefact_tipo_checkColumnConstraints(p_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo LIKE tmpdetallefact.tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpdetallefact_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpdetallefact.medida" column
-#+
-#+ @param p_medida - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpdetallefact_medida_checkColumnConstraints(p_medida)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_medida LIKE tmpdetallefact.medida
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpdetallefact_medida_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpdetallefact.cantidad" column
-#+
-#+ @param p_cantidad - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpdetallefact_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE tmpdetallefact.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpdetallefact_cantidad_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpdetallefact.precio" column
-#+
-#+ @param p_precio - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpdetallefact_precio_checkColumnConstraints(p_precio)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_precio LIKE tmpdetallefact.precio
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpdetallefact_precio_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpdetallefact.descuento" column
-#+
-#+ @param p_descuento - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpdetallefact_descuento_checkColumnConstraints(p_descuento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descuento LIKE tmpdetallefact.descuento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpdetallefact_descuento_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpdetallefact.f9" column
-#+
-#+ @param p_f9 - VARCHAR2(255) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpdetallefact_f9_checkColumnConstraints(p_f9)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_f9 LIKE tmpdetallefact.f9
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpdetallefact_f9_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpcostosferia" table
-#+
-#+ @param p_data - a row data LIKE tmpcostosferia.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcostosferia_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE tmpcostosferia.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_tmpcostosferia_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcostosferia_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcostosferia_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcostosferia_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcostosferia_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcostosferia_existencia_checkColumnConstraints(p_data.existencia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcostosferia_costo_std_checkColumnConstraints(p_data.costo_std) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcostosferia_precio_us_checkColumnConstraints(p_data.precio_us) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcostosferia_costo_liq_checkColumnConstraints(p_data.costo_liq) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpcostosferia_checkTableConstraints
-
-{}
-#+ Check constraints on the "tmpcostosferia.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcostosferia_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE tmpcostosferia.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpcostosferia_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpcostosferia.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcostosferia_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE tmpcostosferia.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpcostosferia_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpcostosferia.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcostosferia_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE tmpcostosferia.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpcostosferia_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpcostosferia.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcostosferia_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE tmpcostosferia.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpcostosferia_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpcostosferia.descripcion" column
-#+
-#+ @param p_descripcion - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcostosferia_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE tmpcostosferia.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpcostosferia_descripcion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpcostosferia.existencia" column
-#+
-#+ @param p_existencia - DECIMAL(12,3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcostosferia_existencia_checkColumnConstraints(p_existencia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_existencia LIKE tmpcostosferia.existencia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpcostosferia_existencia_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpcostosferia.costo_std" column
-#+
-#+ @param p_costo_std - DECIMAL(12,3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcostosferia_costo_std_checkColumnConstraints(p_costo_std)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_costo_std LIKE tmpcostosferia.costo_std
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpcostosferia_costo_std_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpcostosferia.precio_us" column
-#+
-#+ @param p_precio_us - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcostosferia_precio_us_checkColumnConstraints(p_precio_us)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_precio_us LIKE tmpcostosferia.precio_us
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpcostosferia_precio_us_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpcostosferia.costo_liq" column
-#+
-#+ @param p_costo_liq - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcostosferia_costo_liq_checkColumnConstraints(p_costo_liq)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_costo_liq LIKE tmpcostosferia.costo_liq
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpcostosferia_costo_liq_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpcostos1" table
-#+
-#+ @param p_data - a row data LIKE tmpcostos1.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcostos1_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE tmpcostos1.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_tmpcostos1_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcostos1_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcostos1_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcostos1_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcostos1_costo_mat#_checkColumnConstraints(p_data.costo_mat#) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcostos1_labor_checkColumnConstraints(p_data.labor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcostos1_gastos_checkColumnConstraints(p_data.gastos) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpcostos1_checkTableConstraints
-
-{}
-#+ Check constraints on the "tmpcostos1.cod_n" column
-#+
-#+ @param p_cod_n - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcostos1_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE tmpcostos1.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpcostos1_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpcostos1.cod_grupo" column
-#+
-#+ @param p_cod_grupo - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcostos1_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE tmpcostos1.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpcostos1_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpcostos1.cod_tipo" column
-#+
-#+ @param p_cod_tipo - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcostos1_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE tmpcostos1.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpcostos1_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpcostos1.cod_sec" column
-#+
-#+ @param p_cod_sec - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcostos1_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE tmpcostos1.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpcostos1_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpcostos1.costo_mat#" column
-#+
-#+ @param p_costo_mat# - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcostos1_costo_mat#_checkColumnConstraints(p_costo_mat#)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_costo_mat# LIKE tmpcostos1.costo_mat#
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpcostos1_costo_mat#_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpcostos1.labor" column
-#+
-#+ @param p_labor - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcostos1_labor_checkColumnConstraints(p_labor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_labor LIKE tmpcostos1.labor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpcostos1_labor_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpcostos1.gastos" column
-#+
-#+ @param p_gastos - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcostos1_gastos_checkColumnConstraints(p_gastos)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_gastos LIKE tmpcostos1.gastos
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpcostos1_gastos_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpcostos" table
-#+
-#+ @param p_data - a row data LIKE tmpcostos.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcostos_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE tmpcostos.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_tmpcostos_ventas_checkColumnConstraints(p_data.ventas) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcostos_ano_checkColumnConstraints(p_data.ano) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcostos_mes_ini_checkColumnConstraints(p_data.mes_ini) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcostos_mes_fin_checkColumnConstraints(p_data.mes_fin) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcostos_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcostos_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcostos_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcostos_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcostos_material_checkColumnConstraints(p_data.material) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcostos_labor_checkColumnConstraints(p_data.labor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcostos_gastos_checkColumnConstraints(p_data.gastos) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcostos_f12_checkColumnConstraints(p_data.f12) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcostos_f13_checkColumnConstraints(p_data.f13) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpcostos_checkTableConstraints
-
-{}
-#+ Check constraints on the "tmpcostos.ventas" column
-#+
-#+ @param p_ventas - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcostos_ventas_checkColumnConstraints(p_ventas)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ventas LIKE tmpcostos.ventas
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpcostos_ventas_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpcostos.ano" column
-#+
-#+ @param p_ano - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcostos_ano_checkColumnConstraints(p_ano)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ano LIKE tmpcostos.ano
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpcostos_ano_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpcostos.mes_ini" column
-#+
-#+ @param p_mes_ini - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcostos_mes_ini_checkColumnConstraints(p_mes_ini)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mes_ini LIKE tmpcostos.mes_ini
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpcostos_mes_ini_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpcostos.mes_fin" column
-#+
-#+ @param p_mes_fin - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcostos_mes_fin_checkColumnConstraints(p_mes_fin)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mes_fin LIKE tmpcostos.mes_fin
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpcostos_mes_fin_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpcostos.cod_n" column
-#+
-#+ @param p_cod_n - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcostos_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE tmpcostos.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpcostos_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpcostos.cod_grupo" column
-#+
-#+ @param p_cod_grupo - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcostos_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE tmpcostos.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpcostos_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpcostos.cod_tipo" column
-#+
-#+ @param p_cod_tipo - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcostos_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE tmpcostos.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpcostos_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpcostos.cod_sec" column
-#+
-#+ @param p_cod_sec - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcostos_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE tmpcostos.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpcostos_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpcostos.material" column
-#+
-#+ @param p_material - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcostos_material_checkColumnConstraints(p_material)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_material LIKE tmpcostos.material
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpcostos_material_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpcostos.labor" column
-#+
-#+ @param p_labor - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcostos_labor_checkColumnConstraints(p_labor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_labor LIKE tmpcostos.labor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpcostos_labor_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpcostos.gastos" column
-#+
-#+ @param p_gastos - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcostos_gastos_checkColumnConstraints(p_gastos)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_gastos LIKE tmpcostos.gastos
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpcostos_gastos_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpcostos.f12" column
-#+
-#+ @param p_f12 - VARCHAR2(255) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcostos_f12_checkColumnConstraints(p_f12)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_f12 LIKE tmpcostos.f12
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpcostos_f12_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpcostos.f13" column
-#+
-#+ @param p_f13 - VARCHAR2(255) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcostos_f13_checkColumnConstraints(p_f13)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_f13 LIKE tmpcostos.f13
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpcostos_f13_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpcodsec" table
-#+
-#+ @param p_data - a row data LIKE tmpcodsec.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcodsec_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE tmpcodsec.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_tmpcodsec_codsec_checkColumnConstraints(p_data.codsec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcodsec_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpcodsec_checkTableConstraints
-
-{}
-#+ Check constraints on the "tmpcodsec.codsec" column
-#+
-#+ @param p_codsec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcodsec_codsec_checkColumnConstraints(p_codsec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codsec LIKE tmpcodsec.codsec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpcodsec_codsec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpcodsec.descripcion" column
-#+
-#+ @param p_descripcion - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcodsec_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE tmpcodsec.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpcodsec_descripcion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpcodigos1" table
-#+
-#+ @param p_data - a row data LIKE tmpcodigos1.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcodigos1_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE tmpcodigos1.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_tmpcodigos1_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcodigos1_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcodigos1_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcodigos1_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcodigos1_material_checkColumnConstraints(p_data.material) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcodigos1_labor_checkColumnConstraints(p_data.labor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcodigos1_gasto_checkColumnConstraints(p_data.gasto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpcodigos1_checkTableConstraints
-
-{}
-#+ Check constraints on the "tmpcodigos1.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcodigos1_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE tmpcodigos1.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpcodigos1_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpcodigos1.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcodigos1_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE tmpcodigos1.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpcodigos1_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpcodigos1.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcodigos1_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE tmpcodigos1.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpcodigos1_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpcodigos1.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcodigos1_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE tmpcodigos1.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpcodigos1_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpcodigos1.material" column
-#+
-#+ @param p_material - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcodigos1_material_checkColumnConstraints(p_material)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_material LIKE tmpcodigos1.material
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpcodigos1_material_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpcodigos1.labor" column
-#+
-#+ @param p_labor - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcodigos1_labor_checkColumnConstraints(p_labor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_labor LIKE tmpcodigos1.labor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpcodigos1_labor_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpcodigos1.gasto" column
-#+
-#+ @param p_gasto - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcodigos1_gasto_checkColumnConstraints(p_gasto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_gasto LIKE tmpcodigos1.gasto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpcodigos1_gasto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpcodigos" table
-#+
-#+ @param p_data - a row data LIKE tmpcodigos.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcodigos_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE tmpcodigos.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_tmpcodigos_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcodigos_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcodigos_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcodigos_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpcodigos_checkTableConstraints
-
-{}
-#+ Check constraints on the "tmpcodigos.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcodigos_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE tmpcodigos.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpcodigos_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpcodigos.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcodigos_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE tmpcodigos.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpcodigos_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpcodigos.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcodigos_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE tmpcodigos.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpcodigos_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpcodigos.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcodigos_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE tmpcodigos.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpcodigos_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpcodigorepetido" table
-#+
-#+ @param p_data - a row data LIKE tmpcodigorepetido.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcodigorepetido_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE tmpcodigorepetido.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_tmpcodigorepetido_cod_cia_checkColumnConstraints(p_data.cod_cia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcodigorepetido_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcodigorepetido_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcodigorepetido_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcodigorepetido_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcodigorepetido_cuenta_checkColumnConstraints(p_data.cuenta) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpcodigorepetido_checkTableConstraints
-
-{}
-#+ Check constraints on the "tmpcodigorepetido.cod_cia" column
-#+
-#+ @param p_cod_cia - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcodigorepetido_cod_cia_checkColumnConstraints(p_cod_cia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_cia LIKE tmpcodigorepetido.cod_cia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpcodigorepetido_cod_cia_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpcodigorepetido.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcodigorepetido_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE tmpcodigorepetido.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpcodigorepetido_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpcodigorepetido.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcodigorepetido_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE tmpcodigorepetido.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpcodigorepetido_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpcodigorepetido.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcodigorepetido_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE tmpcodigorepetido.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpcodigorepetido_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpcodigorepetido.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcodigorepetido_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE tmpcodigorepetido.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpcodigorepetido_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpcodigorepetido.cuenta" column
-#+
-#+ @param p_cuenta - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcodigorepetido_cuenta_checkColumnConstraints(p_cuenta)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cuenta LIKE tmpcodigorepetido.cuenta
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpcodigorepetido_cuenta_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpcod12" table
-#+
-#+ @param p_data - a row data LIKE tmpcod12.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcod12_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE tmpcod12.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_tmpcod12_ficha_checkColumnConstraints(p_data.ficha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcod12_valor_checkColumnConstraints(p_data.valor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcod12_codmov_checkColumnConstraints(p_data.codmov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpcod12_checkTableConstraints
-
-{}
-#+ Check constraints on the "tmpcod12.ficha" column
-#+
-#+ @param p_ficha - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcod12_ficha_checkColumnConstraints(p_ficha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ficha LIKE tmpcod12.ficha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpcod12_ficha_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpcod12.valor" column
-#+
-#+ @param p_valor - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcod12_valor_checkColumnConstraints(p_valor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valor LIKE tmpcod12.valor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpcod12_valor_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpcod12.codmov" column
-#+
-#+ @param p_codmov - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcod12_codmov_checkColumnConstraints(p_codmov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codmov LIKE tmpcod12.codmov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpcod12_codmov_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpcod11" table
-#+
-#+ @param p_data - a row data LIKE tmpcod11.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcod11_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE tmpcod11.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_tmpcod11_ficha_checkColumnConstraints(p_data.ficha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcod11_valor_checkColumnConstraints(p_data.valor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcod11_codmov_checkColumnConstraints(p_data.codmov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpcod11_checkTableConstraints
-
-{}
-#+ Check constraints on the "tmpcod11.ficha" column
-#+
-#+ @param p_ficha - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcod11_ficha_checkColumnConstraints(p_ficha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ficha LIKE tmpcod11.ficha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpcod11_ficha_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpcod11.valor" column
-#+
-#+ @param p_valor - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcod11_valor_checkColumnConstraints(p_valor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valor LIKE tmpcod11.valor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpcod11_valor_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpcod11.codmov" column
-#+
-#+ @param p_codmov - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcod11_codmov_checkColumnConstraints(p_codmov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codmov LIKE tmpcod11.codmov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpcod11_codmov_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpclientes" table
-#+
-#+ @param p_data - a row data LIKE tmpclientes.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpclientes_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE tmpclientes.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_tmpclientes_tipo_cliente_checkColumnConstraints(p_data.tipo_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpclientes_sec_cliente_checkColumnConstraints(p_data.sec_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpclientes_nombre_checkColumnConstraints(p_data.nombre) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpclientes_cod_zona_checkColumnConstraints(p_data.cod_zona) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpclientes_cod_provincia_checkColumnConstraints(p_data.cod_provincia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpclientes_telefono_checkColumnConstraints(p_data.telefono) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpclientes_fax_checkColumnConstraints(p_data.fax) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpclientes_telex_checkColumnConstraints(p_data.telex) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpclientes_patente_checkColumnConstraints(p_data.patente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpclientes_limite_credito_checkColumnConstraints(p_data.limite_credito) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpclientes_zona_postal_checkColumnConstraints(p_data.zona_postal) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpclientes_num_rnc_checkColumnConstraints(p_data.num_rnc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpclientes_nombre_patente_checkColumnConstraints(p_data.nombre_patente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpclientes_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpclientes_checkTableConstraints
-
-{}
-#+ Check constraints on the "tmpclientes.tipo_cliente" column
-#+
-#+ @param p_tipo_cliente - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpclientes_tipo_cliente_checkColumnConstraints(p_tipo_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_cliente LIKE tmpclientes.tipo_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpclientes_tipo_cliente_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpclientes.sec_cliente" column
-#+
-#+ @param p_sec_cliente - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpclientes_sec_cliente_checkColumnConstraints(p_sec_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_cliente LIKE tmpclientes.sec_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpclientes_sec_cliente_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpclientes.nombre" column
-#+
-#+ @param p_nombre - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpclientes_nombre_checkColumnConstraints(p_nombre)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombre LIKE tmpclientes.nombre
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpclientes_nombre_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpclientes.cod_zona" column
-#+
-#+ @param p_cod_zona - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpclientes_cod_zona_checkColumnConstraints(p_cod_zona)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_zona LIKE tmpclientes.cod_zona
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpclientes_cod_zona_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpclientes.cod_provincia" column
-#+
-#+ @param p_cod_provincia - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpclientes_cod_provincia_checkColumnConstraints(p_cod_provincia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_provincia LIKE tmpclientes.cod_provincia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpclientes_cod_provincia_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpclientes.telefono" column
-#+
-#+ @param p_telefono - CHAR(16) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpclientes_telefono_checkColumnConstraints(p_telefono)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_telefono LIKE tmpclientes.telefono
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpclientes_telefono_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpclientes.fax" column
-#+
-#+ @param p_fax - CHAR(16) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpclientes_fax_checkColumnConstraints(p_fax)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fax LIKE tmpclientes.fax
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpclientes_fax_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpclientes.telex" column
-#+
-#+ @param p_telex - CHAR(16) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpclientes_telex_checkColumnConstraints(p_telex)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_telex LIKE tmpclientes.telex
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpclientes_telex_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpclientes.patente" column
-#+
-#+ @param p_patente - CHAR(11) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpclientes_patente_checkColumnConstraints(p_patente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_patente LIKE tmpclientes.patente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpclientes_patente_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpclientes.limite_credito" column
-#+
-#+ @param p_limite_credito - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpclientes_limite_credito_checkColumnConstraints(p_limite_credito)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_limite_credito LIKE tmpclientes.limite_credito
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpclientes_limite_credito_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpclientes.zona_postal" column
-#+
-#+ @param p_zona_postal - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpclientes_zona_postal_checkColumnConstraints(p_zona_postal)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_zona_postal LIKE tmpclientes.zona_postal
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpclientes_zona_postal_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpclientes.num_rnc" column
-#+
-#+ @param p_num_rnc - CHAR(11) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpclientes_num_rnc_checkColumnConstraints(p_num_rnc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_rnc LIKE tmpclientes.num_rnc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpclientes_num_rnc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpclientes.nombre_patente" column
-#+
-#+ @param p_nombre_patente - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpclientes_nombre_patente_checkColumnConstraints(p_nombre_patente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombre_patente LIKE tmpclientes.nombre_patente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpclientes_nombre_patente_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpclientes.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpclientes_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE tmpclientes.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpclientes_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpclasificacion" table
-#+
-#+ @param p_data - a row data LIKE tmpclasificacion.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpclasificacion_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE tmpclasificacion.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_tmpclasificacion_tipo_cliente_checkColumnConstraints(p_data.tipo_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpclasificacion_sec_cliente_checkColumnConstraints(p_data.sec_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpclasificacion_tipo_negocio_checkColumnConstraints(p_data.tipo_negocio) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpclasificacion_f4_checkColumnConstraints(p_data.f4) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpclasificacion_f5_checkColumnConstraints(p_data.f5) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpclasificacion_f6_checkColumnConstraints(p_data.f6) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpclasificacion_f7_checkColumnConstraints(p_data.f7) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpclasificacion_checkTableConstraints
-
-{}
-#+ Check constraints on the "tmpclasificacion.tipo_cliente" column
-#+
-#+ @param p_tipo_cliente - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpclasificacion_tipo_cliente_checkColumnConstraints(p_tipo_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_cliente LIKE tmpclasificacion.tipo_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpclasificacion_tipo_cliente_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpclasificacion.sec_cliente" column
-#+
-#+ @param p_sec_cliente - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpclasificacion_sec_cliente_checkColumnConstraints(p_sec_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_cliente LIKE tmpclasificacion.sec_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpclasificacion_sec_cliente_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpclasificacion.tipo_negocio" column
-#+
-#+ @param p_tipo_negocio - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpclasificacion_tipo_negocio_checkColumnConstraints(p_tipo_negocio)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_negocio LIKE tmpclasificacion.tipo_negocio
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpclasificacion_tipo_negocio_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpclasificacion.f4" column
-#+
-#+ @param p_f4 - VARCHAR2(255) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpclasificacion_f4_checkColumnConstraints(p_f4)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_f4 LIKE tmpclasificacion.f4
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpclasificacion_f4_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpclasificacion.f5" column
-#+
-#+ @param p_f5 - VARCHAR2(255) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpclasificacion_f5_checkColumnConstraints(p_f5)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_f5 LIKE tmpclasificacion.f5
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpclasificacion_f5_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpclasificacion.f6" column
-#+
-#+ @param p_f6 - VARCHAR2(255) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpclasificacion_f6_checkColumnConstraints(p_f6)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_f6 LIKE tmpclasificacion.f6
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpclasificacion_f6_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpclasificacion.f7" column
-#+
-#+ @param p_f7 - VARCHAR2(255) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpclasificacion_f7_checkColumnConstraints(p_f7)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_f7 LIKE tmpclasificacion.f7
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpclasificacion_f7_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpclase1" table
-#+
-#+ @param p_data - a row data LIKE tmpclase1.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpclase1_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE tmpclase1.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_tmpclase1_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpclase1_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpclase1_checkTableConstraints
-
-{}
-#+ Check constraints on the "tmpclase1.cod_n" column
-#+
-#+ @param p_cod_n - VARCHAR2(255) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpclase1_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE tmpclase1.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpclase1_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpclase1.descripcion" column
-#+
-#+ @param p_descripcion - VARCHAR2(255) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpclase1_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE tmpclase1.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpclase1_descripcion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpclase" table
-#+
-#+ @param p_data - a row data LIKE tmpclase.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpclase_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE tmpclase.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_tmpclase_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpclase_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- CALL smarmotech_dbxconstraints_tmpclase_pk_tmpclase_checkUniqueConstraint(p_forUpdate, p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpclase_checkTableConstraints
-
-{}
-#+ Check the primary key uniqueness constraint on the "tmpclase"
-#+
-#+ @param p_key - Primary Key
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpclase_pk_tmpclase_checkUniqueConstraint(p_forUpdate, p_key)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_key
- RECORD
- tmpclase_cod_n LIKE tmpclase.cod_n
- END RECORD
- DEFINE l_key
- RECORD
- tmpclase_cod_n LIKE tmpclase.cod_n
- END RECORD
- DEFINE l_where STRING
- DEFINE l_sqlQuery STRING
- DEFINE l_count INTEGER
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- LET l_where = "WHERE tmpclase.cod_n = ? "
-
- let l_sqlQuery = "SELECT COUNT(*), cod_n FROM tmpclase ", l_where, " GROUP BY cod_n"
-
- PREPARE cur_tmpclase_pk_tmpclase_checkUniqueConstraint FROM l_sqlQuery
- EXECUTE cur_tmpclase_pk_tmpclase_checkUniqueConstraint INTO l_count, l_key.* USING p_key.*
- FREE cur_tmpclase_pk_tmpclase_checkUniqueConstraint
- IF (NOT p_forUpdate AND l_count > 0) OR (p_forUpdate AND l_count > 0 AND p_key.* != l_key.*) THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_n: " || ERROR_BAM_00002) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpclase_pk_tmpclase_checkUniqueConstraint
-
-{}
-#+ Check constraints on the "tmpclase.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpclase_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE tmpclase.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_n IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_n: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpclase_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpclase.descripcion" column
-#+
-#+ @param p_descripcion - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpclase_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE tmpclase.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpclase_descripcion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpcctb01" table
-#+
-#+ @param p_data - a row data LIKE tmpcctb01.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcctb01_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE tmpcctb01.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_tmpcctb01_cuenta_no_checkColumnConstraints(p_data.cuenta_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcctb01_cod_cia_checkColumnConstraints(p_data.cod_cia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcctb01_tipo_doc_checkColumnConstraints(p_data.tipo_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcctb01_num_doc_checkColumnConstraints(p_data.num_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcctb01_tipo_cliente_checkColumnConstraints(p_data.tipo_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcctb01_sec_cliente_checkColumnConstraints(p_data.sec_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcctb01_cod_emp_checkColumnConstraints(p_data.cod_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcctb01_cod_emp_sec_checkColumnConstraints(p_data.cod_emp_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcctb01_fecha_orig_checkColumnConstraints(p_data.fecha_orig) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcctb01_fecha_ven_checkColumnConstraints(p_data.fecha_ven) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcctb01_aplica_a_checkColumnConstraints(p_data.aplica_a) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcctb01_banco_checkColumnConstraints(p_data.banco) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcctb01_num_cheque_checkColumnConstraints(p_data.num_cheque) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcctb01_valor_checkColumnConstraints(p_data.valor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcctb01_valor_efectivo_checkColumnConstraints(p_data.valor_efectivo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcctb01_valor_cheque_checkColumnConstraints(p_data.valor_cheque) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcctb01_costo_checkColumnConstraints(p_data.costo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcctb01_monto_desc_checkColumnConstraints(p_data.monto_desc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcctb01_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcctb01_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcctb01_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcctb01_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcctb01_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpcctb01_checkTableConstraints
-
-{}
-#+ Check constraints on the "tmpcctb01.cuenta_no" column
-#+
-#+ @param p_cuenta_no - CHAR(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcctb01_cuenta_no_checkColumnConstraints(p_cuenta_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cuenta_no LIKE tmpcctb01.cuenta_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpcctb01_cuenta_no_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpcctb01.cod_cia" column
-#+
-#+ @param p_cod_cia - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcctb01_cod_cia_checkColumnConstraints(p_cod_cia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_cia LIKE tmpcctb01.cod_cia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpcctb01_cod_cia_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpcctb01.tipo_doc" column
-#+
-#+ @param p_tipo_doc - CHAR(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcctb01_tipo_doc_checkColumnConstraints(p_tipo_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_doc LIKE tmpcctb01.tipo_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpcctb01_tipo_doc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpcctb01.num_doc" column
-#+
-#+ @param p_num_doc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcctb01_num_doc_checkColumnConstraints(p_num_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_doc LIKE tmpcctb01.num_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_num_doc IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- num_doc: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpcctb01_num_doc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpcctb01.tipo_cliente" column
-#+
-#+ @param p_tipo_cliente - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcctb01_tipo_cliente_checkColumnConstraints(p_tipo_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_cliente LIKE tmpcctb01.tipo_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpcctb01_tipo_cliente_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpcctb01.sec_cliente" column
-#+
-#+ @param p_sec_cliente - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcctb01_sec_cliente_checkColumnConstraints(p_sec_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_cliente LIKE tmpcctb01.sec_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpcctb01_sec_cliente_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpcctb01.cod_emp" column
-#+
-#+ @param p_cod_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcctb01_cod_emp_checkColumnConstraints(p_cod_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_emp LIKE tmpcctb01.cod_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpcctb01_cod_emp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpcctb01.cod_emp_sec" column
-#+
-#+ @param p_cod_emp_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcctb01_cod_emp_sec_checkColumnConstraints(p_cod_emp_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_emp_sec LIKE tmpcctb01.cod_emp_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpcctb01_cod_emp_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpcctb01.fecha_orig" column
-#+
-#+ @param p_fecha_orig - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcctb01_fecha_orig_checkColumnConstraints(p_fecha_orig)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_orig LIKE tmpcctb01.fecha_orig
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpcctb01_fecha_orig_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpcctb01.fecha_ven" column
-#+
-#+ @param p_fecha_ven - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcctb01_fecha_ven_checkColumnConstraints(p_fecha_ven)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_ven LIKE tmpcctb01.fecha_ven
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpcctb01_fecha_ven_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpcctb01.aplica_a" column
-#+
-#+ @param p_aplica_a - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcctb01_aplica_a_checkColumnConstraints(p_aplica_a)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_aplica_a LIKE tmpcctb01.aplica_a
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpcctb01_aplica_a_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpcctb01.banco" column
-#+
-#+ @param p_banco - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcctb01_banco_checkColumnConstraints(p_banco)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_banco LIKE tmpcctb01.banco
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpcctb01_banco_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpcctb01.num_cheque" column
-#+
-#+ @param p_num_cheque - CHAR(12) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcctb01_num_cheque_checkColumnConstraints(p_num_cheque)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_cheque LIKE tmpcctb01.num_cheque
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpcctb01_num_cheque_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpcctb01.valor" column
-#+
-#+ @param p_valor - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcctb01_valor_checkColumnConstraints(p_valor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valor LIKE tmpcctb01.valor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_valor IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- valor: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpcctb01_valor_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpcctb01.valor_efectivo" column
-#+
-#+ @param p_valor_efectivo - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcctb01_valor_efectivo_checkColumnConstraints(p_valor_efectivo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valor_efectivo LIKE tmpcctb01.valor_efectivo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpcctb01_valor_efectivo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpcctb01.valor_cheque" column
-#+
-#+ @param p_valor_cheque - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcctb01_valor_cheque_checkColumnConstraints(p_valor_cheque)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valor_cheque LIKE tmpcctb01.valor_cheque
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpcctb01_valor_cheque_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpcctb01.costo" column
-#+
-#+ @param p_costo - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcctb01_costo_checkColumnConstraints(p_costo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_costo LIKE tmpcctb01.costo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpcctb01_costo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpcctb01.monto_desc" column
-#+
-#+ @param p_monto_desc - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcctb01_monto_desc_checkColumnConstraints(p_monto_desc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_monto_desc LIKE tmpcctb01.monto_desc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpcctb01_monto_desc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpcctb01.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcctb01_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE tmpcctb01.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpcctb01_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpcctb01.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcctb01_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE tmpcctb01.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpcctb01_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpcctb01.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcctb01_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE tmpcctb01.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpcctb01_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpcctb01.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcctb01_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE tmpcctb01.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpcctb01_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpcctb01.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcctb01_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE tmpcctb01.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpcctb01_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpcam" table
-#+
-#+ @param p_data - a row data LIKE tmpcam.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcam_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE tmpcam.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_tmpcam_labor_checkColumnConstraints(p_data.labor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcam_gasto_checkColumnConstraints(p_data.gasto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcam_codn_checkColumnConstraints(p_data.codn) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcam_codgrupo_checkColumnConstraints(p_data.codgrupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcam_codtipo_checkColumnConstraints(p_data.codtipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcam_codsec_checkColumnConstraints(p_data.codsec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpcam_checkTableConstraints
-
-{}
-#+ Check constraints on the "tmpcam.labor" column
-#+
-#+ @param p_labor - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcam_labor_checkColumnConstraints(p_labor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_labor LIKE tmpcam.labor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpcam_labor_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpcam.gasto" column
-#+
-#+ @param p_gasto - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcam_gasto_checkColumnConstraints(p_gasto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_gasto LIKE tmpcam.gasto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpcam_gasto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpcam.codn" column
-#+
-#+ @param p_codn - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcam_codn_checkColumnConstraints(p_codn)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codn LIKE tmpcam.codn
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpcam_codn_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpcam.codgrupo" column
-#+
-#+ @param p_codgrupo - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcam_codgrupo_checkColumnConstraints(p_codgrupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codgrupo LIKE tmpcam.codgrupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpcam_codgrupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpcam.codtipo" column
-#+
-#+ @param p_codtipo - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcam_codtipo_checkColumnConstraints(p_codtipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codtipo LIKE tmpcam.codtipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpcam_codtipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpcam.codsec" column
-#+
-#+ @param p_codsec - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcam_codsec_checkColumnConstraints(p_codsec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codsec LIKE tmpcam.codsec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpcam_codsec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpaumento" table
-#+
-#+ @param p_data - a row data LIKE tmpaumento.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpaumento_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE tmpaumento.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_tmpaumento_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpaumento_num_nomi_checkColumnConstraints(p_data.num_nomi) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpaumento_num_emp_checkColumnConstraints(p_data.num_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpaumento_valor_checkColumnConstraints(p_data.valor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpaumento_cod_mov_checkColumnConstraints(p_data.cod_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpaumento_checkTableConstraints
-
-{}
-#+ Check constraints on the "tmpaumento.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpaumento_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE tmpaumento.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpaumento_fecha_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpaumento.num_nomi" column
-#+
-#+ @param p_num_nomi - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpaumento_num_nomi_checkColumnConstraints(p_num_nomi)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_nomi LIKE tmpaumento.num_nomi
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpaumento_num_nomi_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpaumento.num_emp" column
-#+
-#+ @param p_num_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpaumento_num_emp_checkColumnConstraints(p_num_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_emp LIKE tmpaumento.num_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpaumento_num_emp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpaumento.valor" column
-#+
-#+ @param p_valor - DECIMAL(18,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpaumento_valor_checkColumnConstraints(p_valor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valor LIKE tmpaumento.valor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpaumento_valor_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpaumento.cod_mov" column
-#+
-#+ @param p_cod_mov - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpaumento_cod_mov_checkColumnConstraints(p_cod_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mov LIKE tmpaumento.cod_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpaumento_cod_mov_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpactualiza" table
-#+
-#+ @param p_data - a row data LIKE tmpactualiza.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpactualiza_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE tmpactualiza.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_tmpactualiza_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpactualiza_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpactualiza_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpactualiza_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpactualiza_cod1_checkColumnConstraints(p_data.cod1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpactualiza_grupo1_checkColumnConstraints(p_data.grupo1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpactualiza_tipo2_checkColumnConstraints(p_data.tipo2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpactualiza_sec1_checkColumnConstraints(p_data.sec1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpactualiza_checkTableConstraints
-
-{}
-#+ Check constraints on the "tmpactualiza.cod_n" column
-#+
-#+ @param p_cod_n - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpactualiza_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE tmpactualiza.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpactualiza_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpactualiza.cod_grupo" column
-#+
-#+ @param p_cod_grupo - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpactualiza_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE tmpactualiza.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpactualiza_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpactualiza.cod_tipo" column
-#+
-#+ @param p_cod_tipo - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpactualiza_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE tmpactualiza.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpactualiza_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpactualiza.cod_sec" column
-#+
-#+ @param p_cod_sec - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpactualiza_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE tmpactualiza.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpactualiza_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpactualiza.cod1" column
-#+
-#+ @param p_cod1 - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpactualiza_cod1_checkColumnConstraints(p_cod1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod1 LIKE tmpactualiza.cod1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpactualiza_cod1_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpactualiza.grupo1" column
-#+
-#+ @param p_grupo1 - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpactualiza_grupo1_checkColumnConstraints(p_grupo1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_grupo1 LIKE tmpactualiza.grupo1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpactualiza_grupo1_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpactualiza.tipo2" column
-#+
-#+ @param p_tipo2 - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpactualiza_tipo2_checkColumnConstraints(p_tipo2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo2 LIKE tmpactualiza.tipo2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpactualiza_tipo2_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmpactualiza.sec1" column
-#+
-#+ @param p_sec1 - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpactualiza_sec1_checkColumnConstraints(p_sec1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec1 LIKE tmpactualiza.sec1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmpactualiza_sec1_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmp_kit" table
-#+
-#+ @param p_data - a row data LIKE tmp_kit.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmp_kit_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE tmp_kit.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_tmp_kit_id_kit_checkColumnConstraints(p_data.id_kit) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmp_kit_cotizacion_no_checkColumnConstraints(p_data.cotizacion_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmp_kit_area_checkColumnConstraints(p_data.area) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmp_kit_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmp_kit_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmp_kit_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmp_kit_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmp_kit_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmp_kit_precio_checkColumnConstraints(p_data.precio) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmp_kit_porc_desc_checkColumnConstraints(p_data.porc_desc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmp_kit_checkTableConstraints
-
-{}
-#+ Check constraints on the "tmp_kit.id_kit" column
-#+
-#+ @param p_id_kit - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmp_kit_id_kit_checkColumnConstraints(p_id_kit)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_id_kit LIKE tmp_kit.id_kit
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmp_kit_id_kit_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmp_kit.cotizacion_no" column
-#+
-#+ @param p_cotizacion_no - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmp_kit_cotizacion_no_checkColumnConstraints(p_cotizacion_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cotizacion_no LIKE tmp_kit.cotizacion_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmp_kit_cotizacion_no_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmp_kit.area" column
-#+
-#+ @param p_area - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmp_kit_area_checkColumnConstraints(p_area)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_area LIKE tmp_kit.area
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmp_kit_area_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmp_kit.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmp_kit_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE tmp_kit.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmp_kit_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmp_kit.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmp_kit_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE tmp_kit.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmp_kit_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmp_kit.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmp_kit_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE tmp_kit.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmp_kit_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmp_kit.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmp_kit_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE tmp_kit.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmp_kit_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmp_kit.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmp_kit_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE tmp_kit.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmp_kit_cantidad_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmp_kit.precio" column
-#+
-#+ @param p_precio - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmp_kit_precio_checkColumnConstraints(p_precio)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_precio LIKE tmp_kit.precio
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmp_kit_precio_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmp_kit.porc_desc" column
-#+
-#+ @param p_porc_desc - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmp_kit_porc_desc_checkColumnConstraints(p_porc_desc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_porc_desc LIKE tmp_kit.porc_desc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmp_kit_porc_desc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmp3iptb00012" table
-#+
-#+ @param p_data - a row data LIKE tmp3iptb00012.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmp3iptb00012_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE tmp3iptb00012.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_tmp3iptb00012_idtrx_checkColumnConstraints(p_data.idtrx) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmp3iptb00012_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmp3iptb00012_bodega_checkColumnConstraints(p_data.bodega) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmp3iptb00012_cod_seccion_checkColumnConstraints(p_data.cod_seccion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmp3iptb00012_cod_tramo_checkColumnConstraints(p_data.cod_tramo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmp3iptb00012_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmp3iptb00012_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmp3iptb00012_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmp3iptb00012_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmp3iptb00012_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmp3iptb00012_balance_checkColumnConstraints(p_data.balance) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmp3iptb00012_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmp3iptb00012_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmp3iptb00012_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmp3iptb00012_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmp3iptb00012_lado_1_checkColumnConstraints(p_data.lado_1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmp3iptb00012_lado_2_checkColumnConstraints(p_data.lado_2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmp3iptb00012_lado_3_checkColumnConstraints(p_data.lado_3) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmp3iptb00012_checkTableConstraints
-
-{}
-#+ Check constraints on the "tmp3iptb00012.idtrx" column
-#+
-#+ @param p_idtrx - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmp3iptb00012_idtrx_checkColumnConstraints(p_idtrx)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_idtrx LIKE tmp3iptb00012.idtrx
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmp3iptb00012_idtrx_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmp3iptb00012.fecha" column
-#+
-#+ @param p_fecha - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmp3iptb00012_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE tmp3iptb00012.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmp3iptb00012_fecha_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmp3iptb00012.bodega" column
-#+
-#+ @param p_bodega - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmp3iptb00012_bodega_checkColumnConstraints(p_bodega)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_bodega LIKE tmp3iptb00012.bodega
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmp3iptb00012_bodega_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmp3iptb00012.cod_seccion" column
-#+
-#+ @param p_cod_seccion - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmp3iptb00012_cod_seccion_checkColumnConstraints(p_cod_seccion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_seccion LIKE tmp3iptb00012.cod_seccion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmp3iptb00012_cod_seccion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmp3iptb00012.cod_tramo" column
-#+
-#+ @param p_cod_tramo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmp3iptb00012_cod_tramo_checkColumnConstraints(p_cod_tramo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tramo LIKE tmp3iptb00012.cod_tramo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmp3iptb00012_cod_tramo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmp3iptb00012.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmp3iptb00012_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE tmp3iptb00012.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmp3iptb00012_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmp3iptb00012.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmp3iptb00012_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE tmp3iptb00012.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmp3iptb00012_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmp3iptb00012.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmp3iptb00012_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE tmp3iptb00012.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmp3iptb00012_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmp3iptb00012.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmp3iptb00012_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE tmp3iptb00012.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmp3iptb00012_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmp3iptb00012.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmp3iptb00012_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE tmp3iptb00012.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmp3iptb00012_cantidad_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmp3iptb00012.balance" column
-#+
-#+ @param p_balance - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmp3iptb00012_balance_checkColumnConstraints(p_balance)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_balance LIKE tmp3iptb00012.balance
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmp3iptb00012_balance_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmp3iptb00012.us_crea" column
-#+
-#+ @param p_us_crea - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmp3iptb00012_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE tmp3iptb00012.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmp3iptb00012_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmp3iptb00012.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmp3iptb00012_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE tmp3iptb00012.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmp3iptb00012_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmp3iptb00012.us_mod" column
-#+
-#+ @param p_us_mod - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmp3iptb00012_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE tmp3iptb00012.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmp3iptb00012_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmp3iptb00012.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmp3iptb00012_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE tmp3iptb00012.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmp3iptb00012_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmp3iptb00012.lado_1" column
-#+
-#+ @param p_lado_1 - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmp3iptb00012_lado_1_checkColumnConstraints(p_lado_1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_lado_1 LIKE tmp3iptb00012.lado_1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmp3iptb00012_lado_1_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmp3iptb00012.lado_2" column
-#+
-#+ @param p_lado_2 - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmp3iptb00012_lado_2_checkColumnConstraints(p_lado_2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_lado_2 LIKE tmp3iptb00012.lado_2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmp3iptb00012_lado_2_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmp3iptb00012.lado_3" column
-#+
-#+ @param p_lado_3 - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmp3iptb00012_lado_3_checkColumnConstraints(p_lado_3)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_lado_3 LIKE tmp3iptb00012.lado_3
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmp3iptb00012_lado_3_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmp2iptb00012" table
-#+
-#+ @param p_data - a row data LIKE tmp2iptb00012.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmp2iptb00012_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE tmp2iptb00012.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_tmp2iptb00012_idtrx_checkColumnConstraints(p_data.idtrx) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmp2iptb00012_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmp2iptb00012_bodega_checkColumnConstraints(p_data.bodega) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmp2iptb00012_cod_seccion_checkColumnConstraints(p_data.cod_seccion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmp2iptb00012_cod_tramo_checkColumnConstraints(p_data.cod_tramo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmp2iptb00012_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmp2iptb00012_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmp2iptb00012_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmp2iptb00012_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmp2iptb00012_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmp2iptb00012_balance_checkColumnConstraints(p_data.balance) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmp2iptb00012_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmp2iptb00012_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmp2iptb00012_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmp2iptb00012_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmp2iptb00012_lado_1_checkColumnConstraints(p_data.lado_1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmp2iptb00012_lado_2_checkColumnConstraints(p_data.lado_2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmp2iptb00012_lado_3_checkColumnConstraints(p_data.lado_3) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmp2iptb00012_checkTableConstraints
-
-{}
-#+ Check constraints on the "tmp2iptb00012.idtrx" column
-#+
-#+ @param p_idtrx - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmp2iptb00012_idtrx_checkColumnConstraints(p_idtrx)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_idtrx LIKE tmp2iptb00012.idtrx
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmp2iptb00012_idtrx_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmp2iptb00012.fecha" column
-#+
-#+ @param p_fecha - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmp2iptb00012_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE tmp2iptb00012.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmp2iptb00012_fecha_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmp2iptb00012.bodega" column
-#+
-#+ @param p_bodega - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmp2iptb00012_bodega_checkColumnConstraints(p_bodega)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_bodega LIKE tmp2iptb00012.bodega
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmp2iptb00012_bodega_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmp2iptb00012.cod_seccion" column
-#+
-#+ @param p_cod_seccion - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmp2iptb00012_cod_seccion_checkColumnConstraints(p_cod_seccion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_seccion LIKE tmp2iptb00012.cod_seccion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmp2iptb00012_cod_seccion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmp2iptb00012.cod_tramo" column
-#+
-#+ @param p_cod_tramo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmp2iptb00012_cod_tramo_checkColumnConstraints(p_cod_tramo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tramo LIKE tmp2iptb00012.cod_tramo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmp2iptb00012_cod_tramo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmp2iptb00012.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmp2iptb00012_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE tmp2iptb00012.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmp2iptb00012_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmp2iptb00012.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmp2iptb00012_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE tmp2iptb00012.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmp2iptb00012_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmp2iptb00012.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmp2iptb00012_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE tmp2iptb00012.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmp2iptb00012_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmp2iptb00012.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmp2iptb00012_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE tmp2iptb00012.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmp2iptb00012_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmp2iptb00012.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmp2iptb00012_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE tmp2iptb00012.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmp2iptb00012_cantidad_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmp2iptb00012.balance" column
-#+
-#+ @param p_balance - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmp2iptb00012_balance_checkColumnConstraints(p_balance)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_balance LIKE tmp2iptb00012.balance
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmp2iptb00012_balance_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmp2iptb00012.us_crea" column
-#+
-#+ @param p_us_crea - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmp2iptb00012_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE tmp2iptb00012.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmp2iptb00012_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmp2iptb00012.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmp2iptb00012_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE tmp2iptb00012.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmp2iptb00012_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmp2iptb00012.us_mod" column
-#+
-#+ @param p_us_mod - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmp2iptb00012_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE tmp2iptb00012.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmp2iptb00012_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmp2iptb00012.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmp2iptb00012_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE tmp2iptb00012.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmp2iptb00012_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmp2iptb00012.lado_1" column
-#+
-#+ @param p_lado_1 - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmp2iptb00012_lado_1_checkColumnConstraints(p_lado_1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_lado_1 LIKE tmp2iptb00012.lado_1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmp2iptb00012_lado_1_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmp2iptb00012.lado_2" column
-#+
-#+ @param p_lado_2 - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmp2iptb00012_lado_2_checkColumnConstraints(p_lado_2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_lado_2 LIKE tmp2iptb00012.lado_2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmp2iptb00012_lado_2_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tmp2iptb00012.lado_3" column
-#+
-#+ @param p_lado_3 - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmp2iptb00012_lado_3_checkColumnConstraints(p_lado_3)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_lado_3 LIKE tmp2iptb00012.lado_3
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tmp2iptb00012_lado_3_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tetb00006" table
-#+
-#+ @param p_data - a row data LIKE tetb00006.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_tetb00006_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE tetb00006.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_tetb00006_cheque_no_checkColumnConstraints(p_data.cheque_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tetb00006_banco_checkColumnConstraints(p_data.banco) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tetb00006_codigo_checkColumnConstraints(p_data.codigo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tetb00006_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tetb00006_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tetb00006_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tetb00006_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tetb00006_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tetb00006_checkTableConstraints
-
-{}
-#+ Check constraints on the "tetb00006.cheque_no" column
-#+
-#+ @param p_cheque_no - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tetb00006_cheque_no_checkColumnConstraints(p_cheque_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cheque_no LIKE tetb00006.cheque_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tetb00006_cheque_no_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tetb00006.banco" column
-#+
-#+ @param p_banco - CHAR(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tetb00006_banco_checkColumnConstraints(p_banco)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_banco LIKE tetb00006.banco
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tetb00006_banco_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tetb00006.codigo" column
-#+
-#+ @param p_codigo - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tetb00006_codigo_checkColumnConstraints(p_codigo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codigo LIKE tetb00006.codigo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tetb00006_codigo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tetb00006.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tetb00006_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE tetb00006.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tetb00006_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tetb00006.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tetb00006_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE tetb00006.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tetb00006_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tetb00006.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tetb00006_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE tetb00006.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tetb00006_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tetb00006.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tetb00006_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE tetb00006.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tetb00006_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tetb00006.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tetb00006_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE tetb00006.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tetb00006_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tetb00003" table
-#+
-#+ @param p_data - a row data LIKE tetb00003.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_tetb00003_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE tetb00003.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_tetb00003_codigo_checkColumnConstraints(p_data.codigo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tetb00003_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tetb00003_tipo_checkColumnConstraints(p_data.tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tetb00003_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tetb00003_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tetb00003_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tetb00003_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tetb00003_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tetb00003_checkTableConstraints
-
-{}
-#+ Check constraints on the "tetb00003.codigo" column
-#+
-#+ @param p_codigo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tetb00003_codigo_checkColumnConstraints(p_codigo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codigo LIKE tetb00003.codigo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tetb00003_codigo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tetb00003.descripcion" column
-#+
-#+ @param p_descripcion - VARCHAR2(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tetb00003_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE tetb00003.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tetb00003_descripcion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tetb00003.tipo" column
-#+
-#+ @param p_tipo - VARCHAR2(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tetb00003_tipo_checkColumnConstraints(p_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo LIKE tetb00003.tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tetb00003_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tetb00003.status_t" column
-#+
-#+ @param p_status_t - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tetb00003_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE tetb00003.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tetb00003_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tetb00003.us_crea" column
-#+
-#+ @param p_us_crea - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tetb00003_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE tetb00003.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tetb00003_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tetb00003.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tetb00003_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE tetb00003.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tetb00003_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tetb00003.us_mod" column
-#+
-#+ @param p_us_mod - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tetb00003_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE tetb00003.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tetb00003_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "tetb00003.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tetb00003_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE tetb00003.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.tetb00003_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "sysdiagrams" table
-#+
-#+ @param p_data - a row data LIKE sysdiagrams.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_sysdiagrams_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE sysdiagrams.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_sysdiagrams_name_checkColumnConstraints(p_data.name) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_sysdiagrams_principal_id_checkColumnConstraints(p_data.principal_id) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_sysdiagrams_diagram_id_checkColumnConstraints(p_data.diagram_id) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_sysdiagrams_version_checkColumnConstraints(p_data.version) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_sysdiagrams_definition_checkColumnConstraints(p_data.definition) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- CALL smarmotech_dbxconstraints_sysdiagrams_pk__sysdiagr__c2b05b6156e8e7ab_checkUniqueConstraint(p_forUpdate, p_data.diagram_id) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_sysdiagrams_uk_principal_name_checkUniqueConstraint(p_forUpdate, p_data.principal_id, p_data.name, p_data.diagram_id) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.sysdiagrams_checkTableConstraints
-
-{}
-#+ Check the primary key uniqueness constraint on the "sysdiagrams"
-#+
-#+ @param p_key - Primary Key
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_sysdiagrams_pk__sysdiagr__c2b05b6156e8e7ab_checkUniqueConstraint(p_forUpdate, p_key)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_key
- RECORD
- sysdiagrams_diagram_id LIKE sysdiagrams.diagram_id
- END RECORD
- DEFINE l_key
- RECORD
- sysdiagrams_diagram_id LIKE sysdiagrams.diagram_id
- END RECORD
- DEFINE l_where STRING
- DEFINE l_sqlQuery STRING
- DEFINE l_count INTEGER
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- LET l_where = "WHERE sysdiagrams.diagram_id = ? "
-
- let l_sqlQuery = "SELECT COUNT(*), diagram_id FROM sysdiagrams ", l_where, " GROUP BY diagram_id"
-
- PREPARE cur_sysdiagrams_pk__sysdiagr__c2b05b6156e8e7ab_checkUniqueConstraint FROM l_sqlQuery
- EXECUTE cur_sysdiagrams_pk__sysdiagr__c2b05b6156e8e7ab_checkUniqueConstraint INTO l_count, l_key.* USING p_key.*
- FREE cur_sysdiagrams_pk__sysdiagr__c2b05b6156e8e7ab_checkUniqueConstraint
- IF (NOT p_forUpdate AND l_count > 0) OR (p_forUpdate AND l_count > 0 AND p_key.* != l_key.*) THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- diagram_id: " || ERROR_BAM_00002) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.sysdiagrams_pk__sysdiagr__c2b05b6156e8e7ab_checkUniqueConstraint
-
-{}
-#+ Check the index uniqueness constraint on the "sysdiagrams"
-#+
-#+ @param p_data - Unique Index
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_sysdiagrams_uk_principal_name_checkUniqueConstraint(p_forUpdate, p_data, p_key)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data
- RECORD
- sysdiagrams_principal_id LIKE sysdiagrams.principal_id,
- sysdiagrams_name LIKE sysdiagrams.name
- END RECORD
- DEFINE l_key
- RECORD
- sysdiagrams_diagram_id LIKE sysdiagrams.diagram_id
- END RECORD
- DEFINE p_key
- RECORD
- sysdiagrams_diagram_id LIKE sysdiagrams.diagram_id
- END RECORD
- DEFINE l_where STRING
- DEFINE l_sqlQuery STRING
- DEFINE l_count INTEGER
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- LET l_where = "WHERE sysdiagrams.principal_id = ?
- AND sysdiagrams.name = ? "
-
- let l_sqlQuery = "SELECT COUNT(*), diagram_id FROM sysdiagrams ", l_where, " GROUP BY diagram_id"
-
- PREPARE cur_sysdiagrams_uk_principal_name_checkUniqueConstraint FROM l_sqlQuery
- EXECUTE cur_sysdiagrams_uk_principal_name_checkUniqueConstraint INTO l_count, l_key.* USING p_data.*
- FREE cur_sysdiagrams_uk_principal_name_checkUniqueConstraint
- IF (NOT p_forUpdate AND l_count > 0) OR (p_forUpdate AND l_count > 0 AND p_key.* != l_key.*) THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- principal_id + name: " || ERROR_BAM_00003) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.sysdiagrams_uk_principal_name_checkUniqueConstraint
-
-{}
-#+ Check constraints on the "sysdiagrams.name" column
-#+
-#+ @param p_name - VARCHAR2(128) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_sysdiagrams_name_checkColumnConstraints(p_name)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_name LIKE sysdiagrams.name
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_name IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- name: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.sysdiagrams_name_checkColumnConstraints
-
-{}
-#+ Check constraints on the "sysdiagrams.principal_id" column
-#+
-#+ @param p_principal_id - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_sysdiagrams_principal_id_checkColumnConstraints(p_principal_id)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_principal_id LIKE sysdiagrams.principal_id
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_principal_id IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- principal_id: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.sysdiagrams_principal_id_checkColumnConstraints
-
-{}
-#+ Check constraints on the "sysdiagrams.diagram_id" column
-#+
-#+ @param p_diagram_id - SERIAL -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_sysdiagrams_diagram_id_checkColumnConstraints(p_diagram_id)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_diagram_id LIKE sysdiagrams.diagram_id
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_diagram_id IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- diagram_id: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.sysdiagrams_diagram_id_checkColumnConstraints
-
-{}
-#+ Check constraints on the "sysdiagrams.version" column
-#+
-#+ @param p_version - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_sysdiagrams_version_checkColumnConstraints(p_version)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_version LIKE sysdiagrams.version
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.sysdiagrams_version_checkColumnConstraints
-
-{}
-#+ Check constraints on the "sysdiagrams.definition" column
-#+
-#+ @param p_definition - BYTE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_sysdiagrams_definition_checkColumnConstraints(p_definition)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_definition LIKE sysdiagrams.definition
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.sysdiagrams_definition_checkColumnConstraints
-
-{}
-#+ Check constraints on the "supplier" table
-#+
-#+ @param p_data - a row data LIKE supplier.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_supplier_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE supplier.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_supplier_suppid_checkColumnConstraints(p_data.suppid) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_supplier_name_checkColumnConstraints(p_data.name) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_supplier_status_checkColumnConstraints(p_data.status) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_supplier_addr1_checkColumnConstraints(p_data.addr1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_supplier_addr2_checkColumnConstraints(p_data.addr2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_supplier_city_checkColumnConstraints(p_data.city) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_supplier_state_checkColumnConstraints(p_data.state) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_supplier_zip_checkColumnConstraints(p_data.zip) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_supplier_phone_checkColumnConstraints(p_data.phone) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.supplier_checkTableConstraints
-
-{}
-#+ Check constraints on the "supplier.suppid" column
-#+
-#+ @param p_suppid - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_supplier_suppid_checkColumnConstraints(p_suppid)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_suppid LIKE supplier.suppid
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_suppid IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- suppid: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.supplier_suppid_checkColumnConstraints
-
-{}
-#+ Check constraints on the "supplier.name" column
-#+
-#+ @param p_name - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_supplier_name_checkColumnConstraints(p_name)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_name LIKE supplier.name
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.supplier_name_checkColumnConstraints
-
-{}
-#+ Check constraints on the "supplier.status" column
-#+
-#+ @param p_status - CHAR(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_supplier_status_checkColumnConstraints(p_status)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status LIKE supplier.status
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_status IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- status: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.supplier_status_checkColumnConstraints
-
-{}
-#+ Check constraints on the "supplier.addr1" column
-#+
-#+ @param p_addr1 - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_supplier_addr1_checkColumnConstraints(p_addr1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_addr1 LIKE supplier.addr1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.supplier_addr1_checkColumnConstraints
-
-{}
-#+ Check constraints on the "supplier.addr2" column
-#+
-#+ @param p_addr2 - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_supplier_addr2_checkColumnConstraints(p_addr2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_addr2 LIKE supplier.addr2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.supplier_addr2_checkColumnConstraints
-
-{}
-#+ Check constraints on the "supplier.city" column
-#+
-#+ @param p_city - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_supplier_city_checkColumnConstraints(p_city)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_city LIKE supplier.city
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.supplier_city_checkColumnConstraints
-
-{}
-#+ Check constraints on the "supplier.state" column
-#+
-#+ @param p_state - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_supplier_state_checkColumnConstraints(p_state)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_state LIKE supplier.state
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.supplier_state_checkColumnConstraints
-
-{}
-#+ Check constraints on the "supplier.zip" column
-#+
-#+ @param p_zip - CHAR(5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_supplier_zip_checkColumnConstraints(p_zip)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_zip LIKE supplier.zip
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.supplier_zip_checkColumnConstraints
-
-{}
-#+ Check constraints on the "supplier.phone" column
-#+
-#+ @param p_phone - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_supplier_phone_checkColumnConstraints(p_phone)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_phone LIKE supplier.phone
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.supplier_phone_checkColumnConstraints
-
-{}
-#+ Check constraints on the "sucursales" table
-#+
-#+ @param p_data - a row data LIKE sucursales.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_sucursales_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE sucursales.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_sucursales_sucid_checkColumnConstraints(p_data.sucid) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_sucursales_sucnombre_checkColumnConstraints(p_data.sucnombre) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_sucursales_localidad_checkColumnConstraints(p_data.localidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_sucursales_pais_checkColumnConstraints(p_data.pais) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_sucursales_zona_checkColumnConstraints(p_data.zona) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_sucursales_direccion_checkColumnConstraints(p_data.direccion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_sucursales_telefono_checkColumnConstraints(p_data.telefono) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_sucursales_url_checkColumnConstraints(p_data.url) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_sucursales_email_checkColumnConstraints(p_data.email) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.sucursales_checkTableConstraints
-
-{}
-#+ Check constraints on the "sucursales.sucid" column
-#+
-#+ @param p_sucid - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_sucursales_sucid_checkColumnConstraints(p_sucid)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sucid LIKE sucursales.sucid
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_sucid IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- sucid: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.sucursales_sucid_checkColumnConstraints
-
-{}
-#+ Check constraints on the "sucursales.sucnombre" column
-#+
-#+ @param p_sucnombre - VARCHAR2(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_sucursales_sucnombre_checkColumnConstraints(p_sucnombre)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sucnombre LIKE sucursales.sucnombre
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_sucnombre IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- sucnombre: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.sucursales_sucnombre_checkColumnConstraints
-
-{}
-#+ Check constraints on the "sucursales.localidad" column
-#+
-#+ @param p_localidad - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_sucursales_localidad_checkColumnConstraints(p_localidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_localidad LIKE sucursales.localidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.sucursales_localidad_checkColumnConstraints
-
-{}
-#+ Check constraints on the "sucursales.pais" column
-#+
-#+ @param p_pais - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_sucursales_pais_checkColumnConstraints(p_pais)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_pais LIKE sucursales.pais
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.sucursales_pais_checkColumnConstraints
-
-{}
-#+ Check constraints on the "sucursales.zona" column
-#+
-#+ @param p_zona - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_sucursales_zona_checkColumnConstraints(p_zona)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_zona LIKE sucursales.zona
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.sucursales_zona_checkColumnConstraints
-
-{}
-#+ Check constraints on the "sucursales.direccion" column
-#+
-#+ @param p_direccion - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_sucursales_direccion_checkColumnConstraints(p_direccion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_direccion LIKE sucursales.direccion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.sucursales_direccion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "sucursales.telefono" column
-#+
-#+ @param p_telefono - CHAR(15) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_sucursales_telefono_checkColumnConstraints(p_telefono)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_telefono LIKE sucursales.telefono
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.sucursales_telefono_checkColumnConstraints
-
-{}
-#+ Check constraints on the "sucursales.url" column
-#+
-#+ @param p_url - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_sucursales_url_checkColumnConstraints(p_url)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_url LIKE sucursales.url
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.sucursales_url_checkColumnConstraints
-
-{}
-#+ Check constraints on the "sucursales.email" column
-#+
-#+ @param p_email - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_sucursales_email_checkColumnConstraints(p_email)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_email LIKE sucursales.email
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.sucursales_email_checkColumnConstraints
-
-{}
-#+ Check constraints on the "signon" table
-#+
-#+ @param p_data - a row data LIKE signon.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_signon_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE signon.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_signon_userid_checkColumnConstraints(p_data.userid) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_signon_password_checkColumnConstraints(p_data.password) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.signon_checkTableConstraints
-
-{}
-#+ Check constraints on the "signon.userid" column
-#+
-#+ @param p_userid - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_signon_userid_checkColumnConstraints(p_userid)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_userid LIKE signon.userid
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_userid IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- userid: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.signon_userid_checkColumnConstraints
-
-{}
-#+ Check constraints on the "signon.password" column
-#+
-#+ @param p_password - CHAR(25) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_signon_password_checkColumnConstraints(p_password)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_password LIKE signon.password
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_password IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- password: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.signon_password_checkColumnConstraints
-
-{}
-#+ Check constraints on the "sheet1" table
-#+
-#+ @param p_data - a row data LIKE sheet1.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_sheet1_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE sheet1.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_sheet1_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_sheet1_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.sheet1_checkTableConstraints
-
-{}
-#+ Check constraints on the "sheet1.cod_sec" column
-#+
-#+ @param p_cod_sec - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_sheet1_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE sheet1.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.sheet1_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "sheet1.descripcion" column
-#+
-#+ @param p_descripcion - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_sheet1_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE sheet1.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.sheet1_descripcion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "seqreg" table
-#+
-#+ @param p_data - a row data LIKE seqreg.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_seqreg_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE seqreg.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_seqreg_sr_name_checkColumnConstraints(p_data.sr_name) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_seqreg_sr_last_checkColumnConstraints(p_data.sr_last) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.seqreg_checkTableConstraints
-
-{}
-#+ Check constraints on the "seqreg.sr_name" column
-#+
-#+ @param p_sr_name - VARCHAR2(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_seqreg_sr_name_checkColumnConstraints(p_sr_name)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sr_name LIKE seqreg.sr_name
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_sr_name IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- sr_name: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.seqreg_sr_name_checkColumnConstraints
-
-{}
-#+ Check constraints on the "seqreg.sr_last" column
-#+
-#+ @param p_sr_last - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_seqreg_sr_last_checkColumnConstraints(p_sr_last)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sr_last LIKE seqreg.sr_last
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_sr_last IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- sr_last: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.seqreg_sr_last_checkColumnConstraints
-
-{}
-#+ Check constraints on the "seg0007" table
-#+
-#+ @param p_data - a row data LIKE seg0007.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_seg0007_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE seg0007.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_seg0007_usuario_checkColumnConstraints(p_data.usuario) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_seg0007_nombre_checkColumnConstraints(p_data.nombre) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_seg0007_sec_vend_checkColumnConstraints(p_data.sec_vend) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_seg0007_tipo_usuario_checkColumnConstraints(p_data.tipo_usuario) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- CALL smarmotech_dbxconstraints_seg0007_pk_seg0007_checkUniqueConstraint(p_forUpdate, p_data.usuario, p_data.sec_vend) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.seg0007_checkTableConstraints
-
-{}
-#+ Check the primary key uniqueness constraint on the "seg0007"
-#+
-#+ @param p_key - Primary Key
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_seg0007_pk_seg0007_checkUniqueConstraint(p_forUpdate, p_key)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_key
- RECORD
- seg0007_usuario LIKE seg0007.usuario,
- seg0007_sec_vend LIKE seg0007.sec_vend
- END RECORD
- DEFINE l_key
- RECORD
- seg0007_usuario LIKE seg0007.usuario,
- seg0007_sec_vend LIKE seg0007.sec_vend
- END RECORD
- DEFINE l_where STRING
- DEFINE l_sqlQuery STRING
- DEFINE l_count INTEGER
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- LET l_where = "WHERE seg0007.usuario = ?
- AND seg0007.sec_vend = ? "
-
- let l_sqlQuery = "SELECT COUNT(*), usuario, sec_vend FROM seg0007 ", l_where, " GROUP BY usuario, sec_vend"
-
- PREPARE cur_seg0007_pk_seg0007_checkUniqueConstraint FROM l_sqlQuery
- EXECUTE cur_seg0007_pk_seg0007_checkUniqueConstraint INTO l_count, l_key.* USING p_key.*
- FREE cur_seg0007_pk_seg0007_checkUniqueConstraint
- IF (NOT p_forUpdate AND l_count > 0) OR (p_forUpdate AND l_count > 0 AND p_key.* != l_key.*) THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- usuario + sec_vend: " || ERROR_BAM_00002) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.seg0007_pk_seg0007_checkUniqueConstraint
-
-{}
-#+ Check constraints on the "seg0007.usuario" column
-#+
-#+ @param p_usuario - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_seg0007_usuario_checkColumnConstraints(p_usuario)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_usuario LIKE seg0007.usuario
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_usuario IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- usuario: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.seg0007_usuario_checkColumnConstraints
-
-{}
-#+ Check constraints on the "seg0007.nombre" column
-#+
-#+ @param p_nombre - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_seg0007_nombre_checkColumnConstraints(p_nombre)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombre LIKE seg0007.nombre
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.seg0007_nombre_checkColumnConstraints
-
-{}
-#+ Check constraints on the "seg0007.sec_vend" column
-#+
-#+ @param p_sec_vend - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_seg0007_sec_vend_checkColumnConstraints(p_sec_vend)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_vend LIKE seg0007.sec_vend
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_sec_vend IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- sec_vend: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.seg0007_sec_vend_checkColumnConstraints
-
-{}
-#+ Check constraints on the "seg0007.tipo_usuario" column
-#+
-#+ @param p_tipo_usuario - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_seg0007_tipo_usuario_checkColumnConstraints(p_tipo_usuario)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_usuario LIKE seg0007.tipo_usuario
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_tipo_usuario IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- tipo_usuario: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.seg0007_tipo_usuario_checkColumnConstraints
-
-{}
-#+ Check constraints on the "seg0006" table
-#+
-#+ @param p_data - a row data LIKE seg0006.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_seg0006_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE seg0006.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_seg0006_usuario_checkColumnConstraints(p_data.usuario) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_seg0006_session_checkColumnConstraints(p_data.session) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_seg0006_fecha_session_checkColumnConstraints(p_data.fecha_session) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.seg0006_checkTableConstraints
-
-{}
-#+ Check constraints on the "seg0006.usuario" column
-#+
-#+ @param p_usuario - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_seg0006_usuario_checkColumnConstraints(p_usuario)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_usuario LIKE seg0006.usuario
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.seg0006_usuario_checkColumnConstraints
-
-{}
-#+ Check constraints on the "seg0006.session" column
-#+
-#+ @param p_session - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_seg0006_session_checkColumnConstraints(p_session)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_session LIKE seg0006.session
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.seg0006_session_checkColumnConstraints
-
-{}
-#+ Check constraints on the "seg0006.fecha_session" column
-#+
-#+ @param p_fecha_session - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_seg0006_fecha_session_checkColumnConstraints(p_fecha_session)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_session LIKE seg0006.fecha_session
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.seg0006_fecha_session_checkColumnConstraints
-
-{}
-#+ Check constraints on the "seg0005" table
-#+
-#+ @param p_data - a row data LIKE seg0005.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_seg0005_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE seg0005.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_seg0005_cod_perfil_checkColumnConstraints(p_data.cod_perfil) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_seg0005_programa_checkColumnConstraints(p_data.programa) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_seg0005_sistema_checkColumnConstraints(p_data.sistema) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_seg0005_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.seg0005_checkTableConstraints
-
-{}
-#+ Check constraints on the "seg0005.cod_perfil" column
-#+
-#+ @param p_cod_perfil - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_seg0005_cod_perfil_checkColumnConstraints(p_cod_perfil)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_perfil LIKE seg0005.cod_perfil
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.seg0005_cod_perfil_checkColumnConstraints
-
-{}
-#+ Check constraints on the "seg0005.programa" column
-#+
-#+ @param p_programa - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_seg0005_programa_checkColumnConstraints(p_programa)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_programa LIKE seg0005.programa
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.seg0005_programa_checkColumnConstraints
-
-{}
-#+ Check constraints on the "seg0005.sistema" column
-#+
-#+ @param p_sistema - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_seg0005_sistema_checkColumnConstraints(p_sistema)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sistema LIKE seg0005.sistema
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.seg0005_sistema_checkColumnConstraints
-
-{}
-#+ Check constraints on the "seg0005.descripcion" column
-#+
-#+ @param p_descripcion - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_seg0005_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE seg0005.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.seg0005_descripcion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "seg0004" table
-#+
-#+ @param p_data - a row data LIKE seg0004.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_seg0004_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE seg0004.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_seg0004_programa_checkColumnConstraints(p_data.programa) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_seg0004_sistema_checkColumnConstraints(p_data.sistema) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_seg0004_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.seg0004_checkTableConstraints
-
-{}
-#+ Check constraints on the "seg0004.programa" column
-#+
-#+ @param p_programa - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_seg0004_programa_checkColumnConstraints(p_programa)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_programa LIKE seg0004.programa
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.seg0004_programa_checkColumnConstraints
-
-{}
-#+ Check constraints on the "seg0004.sistema" column
-#+
-#+ @param p_sistema - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_seg0004_sistema_checkColumnConstraints(p_sistema)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sistema LIKE seg0004.sistema
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.seg0004_sistema_checkColumnConstraints
-
-{}
-#+ Check constraints on the "seg0004.descripcion" column
-#+
-#+ @param p_descripcion - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_seg0004_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE seg0004.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.seg0004_descripcion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "seg0003" table
-#+
-#+ @param p_data - a row data LIKE seg0003.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_seg0003_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE seg0003.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_seg0003_usuario_checkColumnConstraints(p_data.usuario) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_seg0003_nom_puesto_checkColumnConstraints(p_data.nom_puesto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_seg0003_autorizaciondespacho_checkColumnConstraints(p_data.autorizaciondespacho) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_seg0003_controldespacho_checkColumnConstraints(p_data.controldespacho) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_seg0003_controldespiece_checkColumnConstraints(p_data.controldespiece) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_seg0003_controldibujo_checkColumnConstraints(p_data.controldibujo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_seg0003_controldescuento_checkColumnConstraints(p_data.controldescuento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_seg0003_correo_checkColumnConstraints(p_data.correo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.seg0003_checkTableConstraints
-
-{}
-#+ Check constraints on the "seg0003.usuario" column
-#+
-#+ @param p_usuario - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_seg0003_usuario_checkColumnConstraints(p_usuario)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_usuario LIKE seg0003.usuario
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.seg0003_usuario_checkColumnConstraints
-
-{}
-#+ Check constraints on the "seg0003.nom_puesto" column
-#+
-#+ @param p_nom_puesto - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_seg0003_nom_puesto_checkColumnConstraints(p_nom_puesto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nom_puesto LIKE seg0003.nom_puesto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.seg0003_nom_puesto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "seg0003.autorizaciondespacho" column
-#+
-#+ @param p_autorizaciondespacho - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_seg0003_autorizaciondespacho_checkColumnConstraints(p_autorizaciondespacho)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_autorizaciondespacho LIKE seg0003.autorizaciondespacho
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.seg0003_autorizaciondespacho_checkColumnConstraints
-
-{}
-#+ Check constraints on the "seg0003.controldespacho" column
-#+
-#+ @param p_controldespacho - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_seg0003_controldespacho_checkColumnConstraints(p_controldespacho)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_controldespacho LIKE seg0003.controldespacho
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.seg0003_controldespacho_checkColumnConstraints
-
-{}
-#+ Check constraints on the "seg0003.controldespiece" column
-#+
-#+ @param p_controldespiece - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_seg0003_controldespiece_checkColumnConstraints(p_controldespiece)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_controldespiece LIKE seg0003.controldespiece
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.seg0003_controldespiece_checkColumnConstraints
-
-{}
-#+ Check constraints on the "seg0003.controldibujo" column
-#+
-#+ @param p_controldibujo - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_seg0003_controldibujo_checkColumnConstraints(p_controldibujo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_controldibujo LIKE seg0003.controldibujo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.seg0003_controldibujo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "seg0003.controldescuento" column
-#+
-#+ @param p_controldescuento - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_seg0003_controldescuento_checkColumnConstraints(p_controldescuento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_controldescuento LIKE seg0003.controldescuento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.seg0003_controldescuento_checkColumnConstraints
-
-{}
-#+ Check constraints on the "seg0003.correo" column
-#+
-#+ @param p_correo - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_seg0003_correo_checkColumnConstraints(p_correo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_correo LIKE seg0003.correo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.seg0003_correo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "seg0001" table
-#+
-#+ @param p_data - a row data LIKE seg0001.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_seg0001_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE seg0001.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_seg0001_usuario_checkColumnConstraints(p_data.usuario) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_seg0001_cod_perfil_checkColumnConstraints(p_data.cod_perfil) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_seg0001_observacion_checkColumnConstraints(p_data.observacion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_seg0001_printerdefecto_checkColumnConstraints(p_data.printerdefecto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_seg0001_otro_printer_checkColumnConstraints(p_data.otro_printer) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_seg0001_printer_cheque_checkColumnConstraints(p_data.printer_cheque) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_seg0001_cambia_clave_checkColumnConstraints(p_data.cambia_clave) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_seg0001_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_seg0001_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_seg0001_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_seg0001_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_seg0001_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_seg0001_sucid_checkColumnConstraints(p_data.sucid) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_seg0001_bodega_checkColumnConstraints(p_data.bodega) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.seg0001_checkTableConstraints
-
-{}
-#+ Check constraints on the "seg0001.usuario" column
-#+
-#+ @param p_usuario - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_seg0001_usuario_checkColumnConstraints(p_usuario)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_usuario LIKE seg0001.usuario
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.seg0001_usuario_checkColumnConstraints
-
-{}
-#+ Check constraints on the "seg0001.cod_perfil" column
-#+
-#+ @param p_cod_perfil - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_seg0001_cod_perfil_checkColumnConstraints(p_cod_perfil)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_perfil LIKE seg0001.cod_perfil
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.seg0001_cod_perfil_checkColumnConstraints
-
-{}
-#+ Check constraints on the "seg0001.observacion" column
-#+
-#+ @param p_observacion - CHAR(70) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_seg0001_observacion_checkColumnConstraints(p_observacion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_observacion LIKE seg0001.observacion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.seg0001_observacion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "seg0001.printerdefecto" column
-#+
-#+ @param p_printerdefecto - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_seg0001_printerdefecto_checkColumnConstraints(p_printerdefecto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_printerdefecto LIKE seg0001.printerdefecto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.seg0001_printerdefecto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "seg0001.otro_printer" column
-#+
-#+ @param p_otro_printer - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_seg0001_otro_printer_checkColumnConstraints(p_otro_printer)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_otro_printer LIKE seg0001.otro_printer
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.seg0001_otro_printer_checkColumnConstraints
-
-{}
-#+ Check constraints on the "seg0001.printer_cheque" column
-#+
-#+ @param p_printer_cheque - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_seg0001_printer_cheque_checkColumnConstraints(p_printer_cheque)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_printer_cheque LIKE seg0001.printer_cheque
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.seg0001_printer_cheque_checkColumnConstraints
-
-{}
-#+ Check constraints on the "seg0001.cambia_clave" column
-#+
-#+ @param p_cambia_clave - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_seg0001_cambia_clave_checkColumnConstraints(p_cambia_clave)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cambia_clave LIKE seg0001.cambia_clave
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.seg0001_cambia_clave_checkColumnConstraints
-
-{}
-#+ Check constraints on the "seg0001.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_seg0001_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE seg0001.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.seg0001_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "seg0001.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_seg0001_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE seg0001.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.seg0001_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "seg0001.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_seg0001_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE seg0001.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.seg0001_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "seg0001.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_seg0001_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE seg0001.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.seg0001_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "seg0001.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_seg0001_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE seg0001.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.seg0001_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "seg0001.sucid" column
-#+
-#+ @param p_sucid - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_seg0001_sucid_checkColumnConstraints(p_sucid)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sucid LIKE seg0001.sucid
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.seg0001_sucid_checkColumnConstraints
-
-{}
-#+ Check constraints on the "seg0001.bodega" column
-#+
-#+ @param p_bodega - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_seg0001_bodega_checkColumnConstraints(p_bodega)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_bodega LIKE seg0001.bodega
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.seg0001_bodega_checkColumnConstraints
-
-{}
-#+ Check constraints on the "seg0000" table
-#+
-#+ @param p_data - a row data LIKE seg0000.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_seg0000_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE seg0000.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_seg0000_id_number_checkColumnConstraints(p_data.id_number) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_seg0000_usuario_checkColumnConstraints(p_data.usuario) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_seg0000_nombre_checkColumnConstraints(p_data.nombre) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_seg0000_sec_vend_checkColumnConstraints(p_data.sec_vend) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_seg0000_password_checkColumnConstraints(p_data.password) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_seg0000_ocupacion_checkColumnConstraints(p_data.ocupacion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_seg0000_email_checkColumnConstraints(p_data.email) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_seg0000_celular_checkColumnConstraints(p_data.celular) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_seg0000_celular2_checkColumnConstraints(p_data.celular2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_seg0000_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_seg0000_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_seg0000_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_seg0000_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_seg0000_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.seg0000_checkTableConstraints
-
-{}
-#+ Check constraints on the "seg0000.id_number" column
-#+
-#+ @param p_id_number - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_seg0000_id_number_checkColumnConstraints(p_id_number)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_id_number LIKE seg0000.id_number
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.seg0000_id_number_checkColumnConstraints
-
-{}
-#+ Check constraints on the "seg0000.usuario" column
-#+
-#+ @param p_usuario - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_seg0000_usuario_checkColumnConstraints(p_usuario)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_usuario LIKE seg0000.usuario
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.seg0000_usuario_checkColumnConstraints
-
-{}
-#+ Check constraints on the "seg0000.nombre" column
-#+
-#+ @param p_nombre - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_seg0000_nombre_checkColumnConstraints(p_nombre)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombre LIKE seg0000.nombre
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.seg0000_nombre_checkColumnConstraints
-
-{}
-#+ Check constraints on the "seg0000.sec_vend" column
-#+
-#+ @param p_sec_vend - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_seg0000_sec_vend_checkColumnConstraints(p_sec_vend)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_vend LIKE seg0000.sec_vend
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.seg0000_sec_vend_checkColumnConstraints
-
-{}
-#+ Check constraints on the "seg0000.password" column
-#+
-#+ @param p_password - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_seg0000_password_checkColumnConstraints(p_password)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_password LIKE seg0000.password
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.seg0000_password_checkColumnConstraints
-
-{}
-#+ Check constraints on the "seg0000.ocupacion" column
-#+
-#+ @param p_ocupacion - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_seg0000_ocupacion_checkColumnConstraints(p_ocupacion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ocupacion LIKE seg0000.ocupacion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.seg0000_ocupacion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "seg0000.email" column
-#+
-#+ @param p_email - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_seg0000_email_checkColumnConstraints(p_email)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_email LIKE seg0000.email
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.seg0000_email_checkColumnConstraints
-
-{}
-#+ Check constraints on the "seg0000.celular" column
-#+
-#+ @param p_celular - CHAR(15) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_seg0000_celular_checkColumnConstraints(p_celular)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_celular LIKE seg0000.celular
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.seg0000_celular_checkColumnConstraints
-
-{}
-#+ Check constraints on the "seg0000.celular2" column
-#+
-#+ @param p_celular2 - CHAR(15) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_seg0000_celular2_checkColumnConstraints(p_celular2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_celular2 LIKE seg0000.celular2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.seg0000_celular2_checkColumnConstraints
-
-{}
-#+ Check constraints on the "seg0000.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_seg0000_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE seg0000.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.seg0000_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "seg0000.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_seg0000_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE seg0000.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.seg0000_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "seg0000.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_seg0000_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE seg0000.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.seg0000_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "seg0000.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_seg0000_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE seg0000.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.seg0000_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "seg0000.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_seg0000_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE seg0000.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.seg0000_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "repitecodigotmp" table
-#+
-#+ @param p_data - a row data LIKE repitecodigotmp.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_repitecodigotmp_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE repitecodigotmp.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_repitecodigotmp_documento_checkColumnConstraints(p_data.documento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_repitecodigotmp_tipo_doc_checkColumnConstraints(p_data.tipo_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.repitecodigotmp_checkTableConstraints
-
-{}
-#+ Check constraints on the "repitecodigotmp.documento" column
-#+
-#+ @param p_documento - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_repitecodigotmp_documento_checkColumnConstraints(p_documento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_documento LIKE repitecodigotmp.documento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.repitecodigotmp_documento_checkColumnConstraints
-
-{}
-#+ Check constraints on the "repitecodigotmp.tipo_doc" column
-#+
-#+ @param p_tipo_doc - CHAR(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_repitecodigotmp_tipo_doc_checkColumnConstraints(p_tipo_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_doc LIKE repitecodigotmp.tipo_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.repitecodigotmp_tipo_doc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "repitecodigo" table
-#+
-#+ @param p_data - a row data LIKE repitecodigo.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_repitecodigo_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE repitecodigo.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_repitecodigo_documento_checkColumnConstraints(p_data.documento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_repitecodigo_tipo_doc_checkColumnConstraints(p_data.tipo_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_repitecodigo_codigo_checkColumnConstraints(p_data.codigo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_repitecodigo_codid_checkColumnConstraints(p_data.codid) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_repitecodigo_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_repitecodigo_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- CALL smarmotech_dbxconstraints_repitecodigo_pk_repitecodigo_checkUniqueConstraint(p_forUpdate, p_data.documento, p_data.tipo_doc, p_data.codigo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.repitecodigo_checkTableConstraints
-
-{}
-#+ Check the primary key uniqueness constraint on the "repitecodigo"
-#+
-#+ @param p_key - Primary Key
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_repitecodigo_pk_repitecodigo_checkUniqueConstraint(p_forUpdate, p_key)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_key
- RECORD
- repitecodigo_documento LIKE repitecodigo.documento,
- repitecodigo_tipo_doc LIKE repitecodigo.tipo_doc,
- repitecodigo_codigo LIKE repitecodigo.codigo
- END RECORD
- DEFINE l_key
- RECORD
- repitecodigo_documento LIKE repitecodigo.documento,
- repitecodigo_tipo_doc LIKE repitecodigo.tipo_doc,
- repitecodigo_codigo LIKE repitecodigo.codigo
- END RECORD
- DEFINE l_where STRING
- DEFINE l_sqlQuery STRING
- DEFINE l_count INTEGER
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- LET l_where = "WHERE repitecodigo.documento = ?
- AND repitecodigo.tipo_doc = ?
- AND repitecodigo.codigo = ? "
-
- let l_sqlQuery = "SELECT COUNT(*), documento, tipo_doc, codigo FROM repitecodigo ", l_where, " GROUP BY documento, tipo_doc, codigo"
-
- PREPARE cur_repitecodigo_pk_repitecodigo_checkUniqueConstraint FROM l_sqlQuery
- EXECUTE cur_repitecodigo_pk_repitecodigo_checkUniqueConstraint INTO l_count, l_key.* USING p_key.*
- FREE cur_repitecodigo_pk_repitecodigo_checkUniqueConstraint
- IF (NOT p_forUpdate AND l_count > 0) OR (p_forUpdate AND l_count > 0 AND p_key.* != l_key.*) THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- documento + tipo_doc + codigo: " || ERROR_BAM_00002) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.repitecodigo_pk_repitecodigo_checkUniqueConstraint
-
-{}
-#+ Check constraints on the "repitecodigo.documento" column
-#+
-#+ @param p_documento - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_repitecodigo_documento_checkColumnConstraints(p_documento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_documento LIKE repitecodigo.documento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_documento IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- documento: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.repitecodigo_documento_checkColumnConstraints
-
-{}
-#+ Check constraints on the "repitecodigo.tipo_doc" column
-#+
-#+ @param p_tipo_doc - CHAR(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_repitecodigo_tipo_doc_checkColumnConstraints(p_tipo_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_doc LIKE repitecodigo.tipo_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_tipo_doc IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- tipo_doc: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.repitecodigo_tipo_doc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "repitecodigo.codigo" column
-#+
-#+ @param p_codigo - CHAR(25) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_repitecodigo_codigo_checkColumnConstraints(p_codigo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codigo LIKE repitecodigo.codigo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_codigo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- codigo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.repitecodigo_codigo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "repitecodigo.codid" column
-#+
-#+ @param p_codid - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_repitecodigo_codid_checkColumnConstraints(p_codid)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codid LIKE repitecodigo.codid
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.repitecodigo_codid_checkColumnConstraints
-
-{}
-#+ Check constraints on the "repitecodigo.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_repitecodigo_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE repitecodigo.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.repitecodigo_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "repitecodigo.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_repitecodigo_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE repitecodigo.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.repitecodigo_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ranking" table
-#+
-#+ @param p_data - a row data LIKE ranking.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_ranking_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE ranking.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_ranking_rankingact_checkColumnConstraints(p_data.rankingact) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ranking_rankingant_checkColumnConstraints(p_data.rankingant) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ranking_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ranking_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ranking_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ranking_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ranking_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ranking_unidad_med_checkColumnConstraints(p_data.unidad_med) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ranking_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ranking_valor_checkColumnConstraints(p_data.valor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ranking_cantidad_ant_checkColumnConstraints(p_data.cantidad_ant) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ranking_valor_ant_checkColumnConstraints(p_data.valor_ant) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ranking_checkTableConstraints
-
-{}
-#+ Check constraints on the "ranking.rankingact" column
-#+
-#+ @param p_rankingact - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ranking_rankingact_checkColumnConstraints(p_rankingact)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_rankingact LIKE ranking.rankingact
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ranking_rankingact_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ranking.rankingant" column
-#+
-#+ @param p_rankingant - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ranking_rankingant_checkColumnConstraints(p_rankingant)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_rankingant LIKE ranking.rankingant
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ranking_rankingant_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ranking.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ranking_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE ranking.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ranking_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ranking.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ranking_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE ranking.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ranking_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ranking.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ranking_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE ranking.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ranking_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ranking.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ranking_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE ranking.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ranking_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ranking.descripcion" column
-#+
-#+ @param p_descripcion - CHAR(100) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ranking_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE ranking.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ranking_descripcion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ranking.unidad_med" column
-#+
-#+ @param p_unidad_med - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ranking_unidad_med_checkColumnConstraints(p_unidad_med)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_unidad_med LIKE ranking.unidad_med
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ranking_unidad_med_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ranking.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(15,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ranking_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE ranking.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ranking_cantidad_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ranking.valor" column
-#+
-#+ @param p_valor - DECIMAL(15,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ranking_valor_checkColumnConstraints(p_valor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valor LIKE ranking.valor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ranking_valor_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ranking.cantidad_ant" column
-#+
-#+ @param p_cantidad_ant - DECIMAL(15,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ranking_cantidad_ant_checkColumnConstraints(p_cantidad_ant)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad_ant LIKE ranking.cantidad_ant
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ranking_cantidad_ant_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ranking.valor_ant" column
-#+
-#+ @param p_valor_ant - DECIMAL(15,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ranking_valor_ant_checkColumnConstraints(p_valor_ant)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valor_ant LIKE ranking.valor_ant
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ranking_valor_ant_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptventasgralh" table
-#+
-#+ @param p_data - a row data LIKE ptventasgralh.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgralh_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE ptventasgralh.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_ptventasgralh_compania_checkColumnConstraints(p_data.compania) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgralh_localidad_checkColumnConstraints(p_data.localidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgralh_tipotransaccion_checkColumnConstraints(p_data.tipotransaccion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgralh_tipo_ventas_checkColumnConstraints(p_data.tipo_ventas) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgralh_origen_producto_checkColumnConstraints(p_data.origen_producto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgralh_producto_checkColumnConstraints(p_data.producto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgralh_tipoproducto_checkColumnConstraints(p_data.tipoproducto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgralh_valor_bruto_checkColumnConstraints(p_data.valor_bruto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgralh_porc_itbi_checkColumnConstraints(p_data.porc_itbi) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgralh_descuento_checkColumnConstraints(p_data.descuento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgralh_itbis_checkColumnConstraints(p_data.itbis) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgralh_factura_checkColumnConstraints(p_data.factura) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgralh_conduce_checkColumnConstraints(p_data.conduce) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgralh_documentodev_checkColumnConstraints(p_data.documentodev) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgralh_documentocxc_checkColumnConstraints(p_data.documentocxc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgralh_observaciones_checkColumnConstraints(p_data.observaciones) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgralh_cod_mov_checkColumnConstraints(p_data.cod_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgralh_cond_pago_checkColumnConstraints(p_data.cond_pago) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgralh_descrip_p_checkColumnConstraints(p_data.descrip_p) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgralh_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgralh_numero_mes_checkColumnConstraints(p_data.numero_mes) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgralh_ano_checkColumnConstraints(p_data.ano) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgralh_mes_checkColumnConstraints(p_data.mes) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgralh_tipo_cliente_checkColumnConstraints(p_data.tipo_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgralh_sec_cliente_checkColumnConstraints(p_data.sec_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgralh_nombre_cliente_checkColumnConstraints(p_data.nombre_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgralh_rnc_checkColumnConstraints(p_data.rnc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgralh_orden_checkColumnConstraints(p_data.orden) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgralh_sec_vend_checkColumnConstraints(p_data.sec_vend) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgralh_nombrev_checkColumnConstraints(p_data.nombrev) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgralh_apellidov_checkColumnConstraints(p_data.apellidov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgralh_area_checkColumnConstraints(p_data.area) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgralh_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgralh_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgralh_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgralh_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgralh_descripcionp_checkColumnConstraints(p_data.descripcionp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgralh_unidadmed_checkColumnConstraints(p_data.unidadmed) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgralh_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgralh_precio_checkColumnConstraints(p_data.precio) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgralh_material_checkColumnConstraints(p_data.material) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgralh_labor_checkColumnConstraints(p_data.labor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgralh_gasto_checkColumnConstraints(p_data.gasto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgralh_valormaterial_checkColumnConstraints(p_data.valormaterial) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgralh_valorlabor_checkColumnConstraints(p_data.valorlabor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgralh_valorgasto_checkColumnConstraints(p_data.valorgasto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgralh_tasa_checkColumnConstraints(p_data.tasa) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgralh_valorrd_checkColumnConstraints(p_data.valorrd) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgralh_descuentord_checkColumnConstraints(p_data.descuentord) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgralh_itbisrd_checkColumnConstraints(p_data.itbisrd) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgralh_netord_checkColumnConstraints(p_data.netord) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgralh_neto_checkColumnConstraints(p_data.neto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgralh_margen_checkColumnConstraints(p_data.margen) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgralh_transportista_checkColumnConstraints(p_data.transportista) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgralh_pventas_checkColumnConstraints(p_data.pventas) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgralh_grupo_checkColumnConstraints(p_data.grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptventasgralh_checkTableConstraints
-
-{}
-#+ Check constraints on the "ptventasgralh.compania" column
-#+
-#+ @param p_compania - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgralh_compania_checkColumnConstraints(p_compania)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_compania LIKE ptventasgralh.compania
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptventasgralh_compania_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptventasgralh.localidad" column
-#+
-#+ @param p_localidad - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgralh_localidad_checkColumnConstraints(p_localidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_localidad LIKE ptventasgralh.localidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptventasgralh_localidad_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptventasgralh.tipotransaccion" column
-#+
-#+ @param p_tipotransaccion - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgralh_tipotransaccion_checkColumnConstraints(p_tipotransaccion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipotransaccion LIKE ptventasgralh.tipotransaccion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptventasgralh_tipotransaccion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptventasgralh.tipo_ventas" column
-#+
-#+ @param p_tipo_ventas - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgralh_tipo_ventas_checkColumnConstraints(p_tipo_ventas)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_ventas LIKE ptventasgralh.tipo_ventas
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptventasgralh_tipo_ventas_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptventasgralh.origen_producto" column
-#+
-#+ @param p_origen_producto - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgralh_origen_producto_checkColumnConstraints(p_origen_producto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_origen_producto LIKE ptventasgralh.origen_producto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptventasgralh_origen_producto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptventasgralh.producto" column
-#+
-#+ @param p_producto - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgralh_producto_checkColumnConstraints(p_producto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_producto LIKE ptventasgralh.producto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptventasgralh_producto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptventasgralh.tipoproducto" column
-#+
-#+ @param p_tipoproducto - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgralh_tipoproducto_checkColumnConstraints(p_tipoproducto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipoproducto LIKE ptventasgralh.tipoproducto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptventasgralh_tipoproducto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptventasgralh.valor_bruto" column
-#+
-#+ @param p_valor_bruto - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgralh_valor_bruto_checkColumnConstraints(p_valor_bruto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valor_bruto LIKE ptventasgralh.valor_bruto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptventasgralh_valor_bruto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptventasgralh.porc_itbi" column
-#+
-#+ @param p_porc_itbi - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgralh_porc_itbi_checkColumnConstraints(p_porc_itbi)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_porc_itbi LIKE ptventasgralh.porc_itbi
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptventasgralh_porc_itbi_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptventasgralh.descuento" column
-#+
-#+ @param p_descuento - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgralh_descuento_checkColumnConstraints(p_descuento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descuento LIKE ptventasgralh.descuento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptventasgralh_descuento_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptventasgralh.itbis" column
-#+
-#+ @param p_itbis - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgralh_itbis_checkColumnConstraints(p_itbis)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_itbis LIKE ptventasgralh.itbis
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptventasgralh_itbis_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptventasgralh.factura" column
-#+
-#+ @param p_factura - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgralh_factura_checkColumnConstraints(p_factura)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_factura LIKE ptventasgralh.factura
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptventasgralh_factura_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptventasgralh.conduce" column
-#+
-#+ @param p_conduce - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgralh_conduce_checkColumnConstraints(p_conduce)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_conduce LIKE ptventasgralh.conduce
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptventasgralh_conduce_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptventasgralh.documentodev" column
-#+
-#+ @param p_documentodev - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgralh_documentodev_checkColumnConstraints(p_documentodev)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_documentodev LIKE ptventasgralh.documentodev
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptventasgralh_documentodev_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptventasgralh.documentocxc" column
-#+
-#+ @param p_documentocxc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgralh_documentocxc_checkColumnConstraints(p_documentocxc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_documentocxc LIKE ptventasgralh.documentocxc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptventasgralh_documentocxc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptventasgralh.observaciones" column
-#+
-#+ @param p_observaciones - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgralh_observaciones_checkColumnConstraints(p_observaciones)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_observaciones LIKE ptventasgralh.observaciones
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptventasgralh_observaciones_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptventasgralh.cod_mov" column
-#+
-#+ @param p_cod_mov - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgralh_cod_mov_checkColumnConstraints(p_cod_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mov LIKE ptventasgralh.cod_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptventasgralh_cod_mov_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptventasgralh.cond_pago" column
-#+
-#+ @param p_cond_pago - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgralh_cond_pago_checkColumnConstraints(p_cond_pago)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cond_pago LIKE ptventasgralh.cond_pago
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptventasgralh_cond_pago_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptventasgralh.descrip_p" column
-#+
-#+ @param p_descrip_p - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgralh_descrip_p_checkColumnConstraints(p_descrip_p)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descrip_p LIKE ptventasgralh.descrip_p
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptventasgralh_descrip_p_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptventasgralh.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgralh_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE ptventasgralh.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptventasgralh_fecha_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptventasgralh.numero_mes" column
-#+
-#+ @param p_numero_mes - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgralh_numero_mes_checkColumnConstraints(p_numero_mes)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_numero_mes LIKE ptventasgralh.numero_mes
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptventasgralh_numero_mes_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptventasgralh.ano" column
-#+
-#+ @param p_ano - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgralh_ano_checkColumnConstraints(p_ano)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ano LIKE ptventasgralh.ano
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptventasgralh_ano_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptventasgralh.mes" column
-#+
-#+ @param p_mes - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgralh_mes_checkColumnConstraints(p_mes)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mes LIKE ptventasgralh.mes
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptventasgralh_mes_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptventasgralh.tipo_cliente" column
-#+
-#+ @param p_tipo_cliente - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgralh_tipo_cliente_checkColumnConstraints(p_tipo_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_cliente LIKE ptventasgralh.tipo_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptventasgralh_tipo_cliente_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptventasgralh.sec_cliente" column
-#+
-#+ @param p_sec_cliente - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgralh_sec_cliente_checkColumnConstraints(p_sec_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_cliente LIKE ptventasgralh.sec_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptventasgralh_sec_cliente_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptventasgralh.nombre_cliente" column
-#+
-#+ @param p_nombre_cliente - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgralh_nombre_cliente_checkColumnConstraints(p_nombre_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombre_cliente LIKE ptventasgralh.nombre_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptventasgralh_nombre_cliente_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptventasgralh.rnc" column
-#+
-#+ @param p_rnc - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgralh_rnc_checkColumnConstraints(p_rnc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_rnc LIKE ptventasgralh.rnc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptventasgralh_rnc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptventasgralh.orden" column
-#+
-#+ @param p_orden - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgralh_orden_checkColumnConstraints(p_orden)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_orden LIKE ptventasgralh.orden
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptventasgralh_orden_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptventasgralh.sec_vend" column
-#+
-#+ @param p_sec_vend - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgralh_sec_vend_checkColumnConstraints(p_sec_vend)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_vend LIKE ptventasgralh.sec_vend
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptventasgralh_sec_vend_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptventasgralh.nombrev" column
-#+
-#+ @param p_nombrev - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgralh_nombrev_checkColumnConstraints(p_nombrev)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombrev LIKE ptventasgralh.nombrev
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptventasgralh_nombrev_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptventasgralh.apellidov" column
-#+
-#+ @param p_apellidov - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgralh_apellidov_checkColumnConstraints(p_apellidov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_apellidov LIKE ptventasgralh.apellidov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptventasgralh_apellidov_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptventasgralh.area" column
-#+
-#+ @param p_area - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgralh_area_checkColumnConstraints(p_area)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_area LIKE ptventasgralh.area
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptventasgralh_area_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptventasgralh.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgralh_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE ptventasgralh.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptventasgralh_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptventasgralh.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgralh_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE ptventasgralh.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptventasgralh_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptventasgralh.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgralh_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE ptventasgralh.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptventasgralh_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptventasgralh.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgralh_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE ptventasgralh.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptventasgralh_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptventasgralh.descripcionp" column
-#+
-#+ @param p_descripcionp - CHAR(100) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgralh_descripcionp_checkColumnConstraints(p_descripcionp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcionp LIKE ptventasgralh.descripcionp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptventasgralh_descripcionp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptventasgralh.unidadmed" column
-#+
-#+ @param p_unidadmed - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgralh_unidadmed_checkColumnConstraints(p_unidadmed)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_unidadmed LIKE ptventasgralh.unidadmed
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptventasgralh_unidadmed_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptventasgralh.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgralh_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE ptventasgralh.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptventasgralh_cantidad_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptventasgralh.precio" column
-#+
-#+ @param p_precio - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgralh_precio_checkColumnConstraints(p_precio)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_precio LIKE ptventasgralh.precio
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptventasgralh_precio_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptventasgralh.material" column
-#+
-#+ @param p_material - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgralh_material_checkColumnConstraints(p_material)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_material LIKE ptventasgralh.material
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptventasgralh_material_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptventasgralh.labor" column
-#+
-#+ @param p_labor - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgralh_labor_checkColumnConstraints(p_labor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_labor LIKE ptventasgralh.labor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptventasgralh_labor_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptventasgralh.gasto" column
-#+
-#+ @param p_gasto - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgralh_gasto_checkColumnConstraints(p_gasto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_gasto LIKE ptventasgralh.gasto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptventasgralh_gasto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptventasgralh.valormaterial" column
-#+
-#+ @param p_valormaterial - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgralh_valormaterial_checkColumnConstraints(p_valormaterial)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valormaterial LIKE ptventasgralh.valormaterial
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptventasgralh_valormaterial_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptventasgralh.valorlabor" column
-#+
-#+ @param p_valorlabor - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgralh_valorlabor_checkColumnConstraints(p_valorlabor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valorlabor LIKE ptventasgralh.valorlabor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptventasgralh_valorlabor_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptventasgralh.valorgasto" column
-#+
-#+ @param p_valorgasto - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgralh_valorgasto_checkColumnConstraints(p_valorgasto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valorgasto LIKE ptventasgralh.valorgasto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptventasgralh_valorgasto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptventasgralh.tasa" column
-#+
-#+ @param p_tasa - DECIMAL(8,3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgralh_tasa_checkColumnConstraints(p_tasa)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tasa LIKE ptventasgralh.tasa
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptventasgralh_tasa_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptventasgralh.valorrd" column
-#+
-#+ @param p_valorrd - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgralh_valorrd_checkColumnConstraints(p_valorrd)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valorrd LIKE ptventasgralh.valorrd
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptventasgralh_valorrd_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptventasgralh.descuentord" column
-#+
-#+ @param p_descuentord - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgralh_descuentord_checkColumnConstraints(p_descuentord)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descuentord LIKE ptventasgralh.descuentord
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptventasgralh_descuentord_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptventasgralh.itbisrd" column
-#+
-#+ @param p_itbisrd - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgralh_itbisrd_checkColumnConstraints(p_itbisrd)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_itbisrd LIKE ptventasgralh.itbisrd
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptventasgralh_itbisrd_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptventasgralh.netord" column
-#+
-#+ @param p_netord - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgralh_netord_checkColumnConstraints(p_netord)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_netord LIKE ptventasgralh.netord
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptventasgralh_netord_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptventasgralh.neto" column
-#+
-#+ @param p_neto - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgralh_neto_checkColumnConstraints(p_neto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_neto LIKE ptventasgralh.neto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptventasgralh_neto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptventasgralh.margen" column
-#+
-#+ @param p_margen - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgralh_margen_checkColumnConstraints(p_margen)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_margen LIKE ptventasgralh.margen
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptventasgralh_margen_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptventasgralh.transportista" column
-#+
-#+ @param p_transportista - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgralh_transportista_checkColumnConstraints(p_transportista)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_transportista LIKE ptventasgralh.transportista
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptventasgralh_transportista_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptventasgralh.pventas" column
-#+
-#+ @param p_pventas - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgralh_pventas_checkColumnConstraints(p_pventas)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_pventas LIKE ptventasgralh.pventas
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptventasgralh_pventas_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptventasgralh.grupo" column
-#+
-#+ @param p_grupo - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgralh_grupo_checkColumnConstraints(p_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_grupo LIKE ptventasgralh.grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptventasgralh_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptventasgral" table
-#+
-#+ @param p_data - a row data LIKE ptventasgral.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgral_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE ptventasgral.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_ptventasgral_compania_checkColumnConstraints(p_data.compania) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgral_localidad_checkColumnConstraints(p_data.localidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgral_tipotransaccion_checkColumnConstraints(p_data.tipotransaccion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgral_tipo_ventas_checkColumnConstraints(p_data.tipo_ventas) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgral_origen_producto_checkColumnConstraints(p_data.origen_producto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgral_producto_checkColumnConstraints(p_data.producto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgral_tipoproducto_checkColumnConstraints(p_data.tipoproducto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgral_valor_bruto_checkColumnConstraints(p_data.valor_bruto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgral_porc_itbi_checkColumnConstraints(p_data.porc_itbi) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgral_descuento_checkColumnConstraints(p_data.descuento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgral_itbis_checkColumnConstraints(p_data.itbis) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgral_factura_checkColumnConstraints(p_data.factura) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgral_conduce_checkColumnConstraints(p_data.conduce) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgral_documentodev_checkColumnConstraints(p_data.documentodev) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgral_documentocxc_checkColumnConstraints(p_data.documentocxc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgral_observaciones_checkColumnConstraints(p_data.observaciones) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgral_cod_mov_checkColumnConstraints(p_data.cod_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgral_cond_pago_checkColumnConstraints(p_data.cond_pago) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgral_descrip_p_checkColumnConstraints(p_data.descrip_p) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgral_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgral_numero_mes_checkColumnConstraints(p_data.numero_mes) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgral_ano_checkColumnConstraints(p_data.ano) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgral_mes_checkColumnConstraints(p_data.mes) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgral_tipo_cliente_checkColumnConstraints(p_data.tipo_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgral_sec_cliente_checkColumnConstraints(p_data.sec_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgral_nombre_cliente_checkColumnConstraints(p_data.nombre_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgral_rnc_checkColumnConstraints(p_data.rnc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgral_orden_checkColumnConstraints(p_data.orden) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgral_sec_vend_checkColumnConstraints(p_data.sec_vend) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgral_nombrev_checkColumnConstraints(p_data.nombrev) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgral_apellidov_checkColumnConstraints(p_data.apellidov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgral_area_checkColumnConstraints(p_data.area) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgral_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgral_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgral_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgral_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgral_descripcionp_checkColumnConstraints(p_data.descripcionp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgral_unidadmed_checkColumnConstraints(p_data.unidadmed) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgral_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgral_precio_checkColumnConstraints(p_data.precio) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgral_material_checkColumnConstraints(p_data.material) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgral_labor_checkColumnConstraints(p_data.labor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgral_gasto_checkColumnConstraints(p_data.gasto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgral_valormaterial_checkColumnConstraints(p_data.valormaterial) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgral_valorlabor_checkColumnConstraints(p_data.valorlabor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgral_valorgasto_checkColumnConstraints(p_data.valorgasto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgral_tasa_checkColumnConstraints(p_data.tasa) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgral_valorrd_checkColumnConstraints(p_data.valorrd) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgral_descuentord_checkColumnConstraints(p_data.descuentord) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgral_itbisrd_checkColumnConstraints(p_data.itbisrd) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgral_netord_checkColumnConstraints(p_data.netord) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgral_neto_checkColumnConstraints(p_data.neto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgral_margen_checkColumnConstraints(p_data.margen) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgral_transportista_checkColumnConstraints(p_data.transportista) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgral_pventas_checkColumnConstraints(p_data.pventas) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgral_grupo_checkColumnConstraints(p_data.grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptventasgral_checkTableConstraints
-
-{}
-#+ Check constraints on the "ptventasgral.compania" column
-#+
-#+ @param p_compania - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgral_compania_checkColumnConstraints(p_compania)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_compania LIKE ptventasgral.compania
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptventasgral_compania_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptventasgral.localidad" column
-#+
-#+ @param p_localidad - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgral_localidad_checkColumnConstraints(p_localidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_localidad LIKE ptventasgral.localidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptventasgral_localidad_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptventasgral.tipotransaccion" column
-#+
-#+ @param p_tipotransaccion - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgral_tipotransaccion_checkColumnConstraints(p_tipotransaccion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipotransaccion LIKE ptventasgral.tipotransaccion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptventasgral_tipotransaccion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptventasgral.tipo_ventas" column
-#+
-#+ @param p_tipo_ventas - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgral_tipo_ventas_checkColumnConstraints(p_tipo_ventas)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_ventas LIKE ptventasgral.tipo_ventas
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptventasgral_tipo_ventas_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptventasgral.origen_producto" column
-#+
-#+ @param p_origen_producto - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgral_origen_producto_checkColumnConstraints(p_origen_producto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_origen_producto LIKE ptventasgral.origen_producto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptventasgral_origen_producto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptventasgral.producto" column
-#+
-#+ @param p_producto - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgral_producto_checkColumnConstraints(p_producto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_producto LIKE ptventasgral.producto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptventasgral_producto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptventasgral.tipoproducto" column
-#+
-#+ @param p_tipoproducto - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgral_tipoproducto_checkColumnConstraints(p_tipoproducto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipoproducto LIKE ptventasgral.tipoproducto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptventasgral_tipoproducto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptventasgral.valor_bruto" column
-#+
-#+ @param p_valor_bruto - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgral_valor_bruto_checkColumnConstraints(p_valor_bruto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valor_bruto LIKE ptventasgral.valor_bruto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptventasgral_valor_bruto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptventasgral.porc_itbi" column
-#+
-#+ @param p_porc_itbi - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgral_porc_itbi_checkColumnConstraints(p_porc_itbi)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_porc_itbi LIKE ptventasgral.porc_itbi
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptventasgral_porc_itbi_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptventasgral.descuento" column
-#+
-#+ @param p_descuento - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgral_descuento_checkColumnConstraints(p_descuento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descuento LIKE ptventasgral.descuento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptventasgral_descuento_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptventasgral.itbis" column
-#+
-#+ @param p_itbis - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgral_itbis_checkColumnConstraints(p_itbis)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_itbis LIKE ptventasgral.itbis
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptventasgral_itbis_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptventasgral.factura" column
-#+
-#+ @param p_factura - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgral_factura_checkColumnConstraints(p_factura)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_factura LIKE ptventasgral.factura
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptventasgral_factura_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptventasgral.conduce" column
-#+
-#+ @param p_conduce - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgral_conduce_checkColumnConstraints(p_conduce)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_conduce LIKE ptventasgral.conduce
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptventasgral_conduce_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptventasgral.documentodev" column
-#+
-#+ @param p_documentodev - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgral_documentodev_checkColumnConstraints(p_documentodev)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_documentodev LIKE ptventasgral.documentodev
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptventasgral_documentodev_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptventasgral.documentocxc" column
-#+
-#+ @param p_documentocxc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgral_documentocxc_checkColumnConstraints(p_documentocxc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_documentocxc LIKE ptventasgral.documentocxc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptventasgral_documentocxc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptventasgral.observaciones" column
-#+
-#+ @param p_observaciones - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgral_observaciones_checkColumnConstraints(p_observaciones)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_observaciones LIKE ptventasgral.observaciones
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptventasgral_observaciones_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptventasgral.cod_mov" column
-#+
-#+ @param p_cod_mov - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgral_cod_mov_checkColumnConstraints(p_cod_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mov LIKE ptventasgral.cod_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptventasgral_cod_mov_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptventasgral.cond_pago" column
-#+
-#+ @param p_cond_pago - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgral_cond_pago_checkColumnConstraints(p_cond_pago)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cond_pago LIKE ptventasgral.cond_pago
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptventasgral_cond_pago_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptventasgral.descrip_p" column
-#+
-#+ @param p_descrip_p - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgral_descrip_p_checkColumnConstraints(p_descrip_p)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descrip_p LIKE ptventasgral.descrip_p
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptventasgral_descrip_p_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptventasgral.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgral_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE ptventasgral.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptventasgral_fecha_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptventasgral.numero_mes" column
-#+
-#+ @param p_numero_mes - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgral_numero_mes_checkColumnConstraints(p_numero_mes)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_numero_mes LIKE ptventasgral.numero_mes
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptventasgral_numero_mes_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptventasgral.ano" column
-#+
-#+ @param p_ano - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgral_ano_checkColumnConstraints(p_ano)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ano LIKE ptventasgral.ano
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptventasgral_ano_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptventasgral.mes" column
-#+
-#+ @param p_mes - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgral_mes_checkColumnConstraints(p_mes)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mes LIKE ptventasgral.mes
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptventasgral_mes_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptventasgral.tipo_cliente" column
-#+
-#+ @param p_tipo_cliente - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgral_tipo_cliente_checkColumnConstraints(p_tipo_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_cliente LIKE ptventasgral.tipo_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptventasgral_tipo_cliente_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptventasgral.sec_cliente" column
-#+
-#+ @param p_sec_cliente - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgral_sec_cliente_checkColumnConstraints(p_sec_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_cliente LIKE ptventasgral.sec_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptventasgral_sec_cliente_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptventasgral.nombre_cliente" column
-#+
-#+ @param p_nombre_cliente - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgral_nombre_cliente_checkColumnConstraints(p_nombre_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombre_cliente LIKE ptventasgral.nombre_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptventasgral_nombre_cliente_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptventasgral.rnc" column
-#+
-#+ @param p_rnc - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgral_rnc_checkColumnConstraints(p_rnc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_rnc LIKE ptventasgral.rnc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptventasgral_rnc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptventasgral.orden" column
-#+
-#+ @param p_orden - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgral_orden_checkColumnConstraints(p_orden)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_orden LIKE ptventasgral.orden
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptventasgral_orden_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptventasgral.sec_vend" column
-#+
-#+ @param p_sec_vend - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgral_sec_vend_checkColumnConstraints(p_sec_vend)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_vend LIKE ptventasgral.sec_vend
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptventasgral_sec_vend_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptventasgral.nombrev" column
-#+
-#+ @param p_nombrev - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgral_nombrev_checkColumnConstraints(p_nombrev)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombrev LIKE ptventasgral.nombrev
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptventasgral_nombrev_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptventasgral.apellidov" column
-#+
-#+ @param p_apellidov - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgral_apellidov_checkColumnConstraints(p_apellidov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_apellidov LIKE ptventasgral.apellidov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptventasgral_apellidov_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptventasgral.area" column
-#+
-#+ @param p_area - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgral_area_checkColumnConstraints(p_area)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_area LIKE ptventasgral.area
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptventasgral_area_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptventasgral.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgral_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE ptventasgral.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptventasgral_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptventasgral.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgral_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE ptventasgral.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptventasgral_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptventasgral.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgral_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE ptventasgral.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptventasgral_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptventasgral.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgral_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE ptventasgral.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptventasgral_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptventasgral.descripcionp" column
-#+
-#+ @param p_descripcionp - CHAR(100) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgral_descripcionp_checkColumnConstraints(p_descripcionp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcionp LIKE ptventasgral.descripcionp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptventasgral_descripcionp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptventasgral.unidadmed" column
-#+
-#+ @param p_unidadmed - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgral_unidadmed_checkColumnConstraints(p_unidadmed)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_unidadmed LIKE ptventasgral.unidadmed
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptventasgral_unidadmed_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptventasgral.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgral_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE ptventasgral.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptventasgral_cantidad_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptventasgral.precio" column
-#+
-#+ @param p_precio - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgral_precio_checkColumnConstraints(p_precio)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_precio LIKE ptventasgral.precio
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptventasgral_precio_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptventasgral.material" column
-#+
-#+ @param p_material - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgral_material_checkColumnConstraints(p_material)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_material LIKE ptventasgral.material
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptventasgral_material_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptventasgral.labor" column
-#+
-#+ @param p_labor - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgral_labor_checkColumnConstraints(p_labor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_labor LIKE ptventasgral.labor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptventasgral_labor_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptventasgral.gasto" column
-#+
-#+ @param p_gasto - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgral_gasto_checkColumnConstraints(p_gasto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_gasto LIKE ptventasgral.gasto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptventasgral_gasto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptventasgral.valormaterial" column
-#+
-#+ @param p_valormaterial - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgral_valormaterial_checkColumnConstraints(p_valormaterial)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valormaterial LIKE ptventasgral.valormaterial
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptventasgral_valormaterial_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptventasgral.valorlabor" column
-#+
-#+ @param p_valorlabor - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgral_valorlabor_checkColumnConstraints(p_valorlabor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valorlabor LIKE ptventasgral.valorlabor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptventasgral_valorlabor_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptventasgral.valorgasto" column
-#+
-#+ @param p_valorgasto - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgral_valorgasto_checkColumnConstraints(p_valorgasto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valorgasto LIKE ptventasgral.valorgasto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptventasgral_valorgasto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptventasgral.tasa" column
-#+
-#+ @param p_tasa - DECIMAL(8,3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgral_tasa_checkColumnConstraints(p_tasa)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tasa LIKE ptventasgral.tasa
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptventasgral_tasa_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptventasgral.valorrd" column
-#+
-#+ @param p_valorrd - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgral_valorrd_checkColumnConstraints(p_valorrd)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valorrd LIKE ptventasgral.valorrd
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptventasgral_valorrd_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptventasgral.descuentord" column
-#+
-#+ @param p_descuentord - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgral_descuentord_checkColumnConstraints(p_descuentord)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descuentord LIKE ptventasgral.descuentord
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptventasgral_descuentord_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptventasgral.itbisrd" column
-#+
-#+ @param p_itbisrd - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgral_itbisrd_checkColumnConstraints(p_itbisrd)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_itbisrd LIKE ptventasgral.itbisrd
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptventasgral_itbisrd_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptventasgral.netord" column
-#+
-#+ @param p_netord - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgral_netord_checkColumnConstraints(p_netord)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_netord LIKE ptventasgral.netord
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptventasgral_netord_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptventasgral.neto" column
-#+
-#+ @param p_neto - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgral_neto_checkColumnConstraints(p_neto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_neto LIKE ptventasgral.neto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptventasgral_neto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptventasgral.margen" column
-#+
-#+ @param p_margen - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgral_margen_checkColumnConstraints(p_margen)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_margen LIKE ptventasgral.margen
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptventasgral_margen_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptventasgral.transportista" column
-#+
-#+ @param p_transportista - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgral_transportista_checkColumnConstraints(p_transportista)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_transportista LIKE ptventasgral.transportista
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptventasgral_transportista_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptventasgral.pventas" column
-#+
-#+ @param p_pventas - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgral_pventas_checkColumnConstraints(p_pventas)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_pventas LIKE ptventasgral.pventas
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptventasgral_pventas_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptventasgral.grupo" column
-#+
-#+ @param p_grupo - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgral_grupo_checkColumnConstraints(p_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_grupo LIKE ptventasgral.grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptventasgral_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptordenesgral" table
-#+
-#+ @param p_data - a row data LIKE ptordenesgral.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptordenesgral_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE ptordenesgral.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_ptordenesgral_ano_checkColumnConstraints(p_data.ano) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptordenesgral_mes_checkColumnConstraints(p_data.mes) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptordenesgral_fechaorden_checkColumnConstraints(p_data.fechaorden) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptordenesgral_fechaentrega_checkColumnConstraints(p_data.fechaentrega) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptordenesgral_documento_checkColumnConstraints(p_data.documento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptordenesgral_orden_checkColumnConstraints(p_data.orden) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptordenesgral_fechaavance_checkColumnConstraints(p_data.fechaavance) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptordenesgral_monto_avance_checkColumnConstraints(p_data.monto_avance) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptordenesgral_fechafactura_checkColumnConstraints(p_data.fechafactura) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptordenesgral_clasificacion_checkColumnConstraints(p_data.clasificacion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptordenesgral_origen_checkColumnConstraints(p_data.origen) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptordenesgral_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptordenesgral_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptordenesgral_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptordenesgral_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptordenesgral_descripcionp_checkColumnConstraints(p_data.descripcionp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptordenesgral_unidadmedida_checkColumnConstraints(p_data.unidadmedida) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptordenesgral_existencia_checkColumnConstraints(p_data.existencia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptordenesgral_cantidadorden_checkColumnConstraints(p_data.cantidadorden) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptordenesgral_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptordenesgral_unidades_checkColumnConstraints(p_data.unidades) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptordenesgral_precio_checkColumnConstraints(p_data.precio) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptordenesgral_descuento_checkColumnConstraints(p_data.descuento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptordenesgral_valor_checkColumnConstraints(p_data.valor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptordenesgral_costo_std_checkColumnConstraints(p_data.costo_std) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptordenesgral_costo_lq_checkColumnConstraints(p_data.costo_lq) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptordenesgral_valorcostostd_checkColumnConstraints(p_data.valorcostostd) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptordenesgral_tipo_cliente_checkColumnConstraints(p_data.tipo_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptordenesgral_sec_cliente_checkColumnConstraints(p_data.sec_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptordenesgral_nombrecliente_checkColumnConstraints(p_data.nombrecliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptordenesgral_sec_vend_checkColumnConstraints(p_data.sec_vend) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptordenesgral_nombrevendedor_checkColumnConstraints(p_data.nombrevendedor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptordenesgral_apellidovend_checkColumnConstraints(p_data.apellidovend) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptordenesgral_fechatransac_checkColumnConstraints(p_data.fechatransac) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptordenesgral_tipotrransaccion_checkColumnConstraints(p_data.tipotrransaccion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptordenesgral_estado_checkColumnConstraints(p_data.estado) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptordenesgral_observacion_checkColumnConstraints(p_data.observacion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptordenesgral_detalle_checkColumnConstraints(p_data.detalle) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptordenesgral_fechaactualizacion_checkColumnConstraints(p_data.fechaactualizacion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptordenesgral_checkTableConstraints
-
-{}
-#+ Check constraints on the "ptordenesgral.ano" column
-#+
-#+ @param p_ano - CHAR(4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptordenesgral_ano_checkColumnConstraints(p_ano)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ano LIKE ptordenesgral.ano
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptordenesgral_ano_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptordenesgral.mes" column
-#+
-#+ @param p_mes - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptordenesgral_mes_checkColumnConstraints(p_mes)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mes LIKE ptordenesgral.mes
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptordenesgral_mes_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptordenesgral.fechaorden" column
-#+
-#+ @param p_fechaorden - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptordenesgral_fechaorden_checkColumnConstraints(p_fechaorden)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fechaorden LIKE ptordenesgral.fechaorden
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptordenesgral_fechaorden_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptordenesgral.fechaentrega" column
-#+
-#+ @param p_fechaentrega - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptordenesgral_fechaentrega_checkColumnConstraints(p_fechaentrega)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fechaentrega LIKE ptordenesgral.fechaentrega
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptordenesgral_fechaentrega_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptordenesgral.documento" column
-#+
-#+ @param p_documento - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptordenesgral_documento_checkColumnConstraints(p_documento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_documento LIKE ptordenesgral.documento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptordenesgral_documento_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptordenesgral.orden" column
-#+
-#+ @param p_orden - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptordenesgral_orden_checkColumnConstraints(p_orden)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_orden LIKE ptordenesgral.orden
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptordenesgral_orden_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptordenesgral.fechaavance" column
-#+
-#+ @param p_fechaavance - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptordenesgral_fechaavance_checkColumnConstraints(p_fechaavance)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fechaavance LIKE ptordenesgral.fechaavance
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptordenesgral_fechaavance_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptordenesgral.monto_avance" column
-#+
-#+ @param p_monto_avance - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptordenesgral_monto_avance_checkColumnConstraints(p_monto_avance)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_monto_avance LIKE ptordenesgral.monto_avance
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptordenesgral_monto_avance_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptordenesgral.fechafactura" column
-#+
-#+ @param p_fechafactura - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptordenesgral_fechafactura_checkColumnConstraints(p_fechafactura)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fechafactura LIKE ptordenesgral.fechafactura
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptordenesgral_fechafactura_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptordenesgral.clasificacion" column
-#+
-#+ @param p_clasificacion - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptordenesgral_clasificacion_checkColumnConstraints(p_clasificacion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_clasificacion LIKE ptordenesgral.clasificacion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptordenesgral_clasificacion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptordenesgral.origen" column
-#+
-#+ @param p_origen - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptordenesgral_origen_checkColumnConstraints(p_origen)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_origen LIKE ptordenesgral.origen
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptordenesgral_origen_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptordenesgral.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptordenesgral_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE ptordenesgral.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptordenesgral_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptordenesgral.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptordenesgral_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE ptordenesgral.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptordenesgral_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptordenesgral.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptordenesgral_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE ptordenesgral.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptordenesgral_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptordenesgral.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptordenesgral_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE ptordenesgral.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptordenesgral_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptordenesgral.descripcionp" column
-#+
-#+ @param p_descripcionp - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptordenesgral_descripcionp_checkColumnConstraints(p_descripcionp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcionp LIKE ptordenesgral.descripcionp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptordenesgral_descripcionp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptordenesgral.unidadmedida" column
-#+
-#+ @param p_unidadmedida - CHAR(4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptordenesgral_unidadmedida_checkColumnConstraints(p_unidadmedida)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_unidadmedida LIKE ptordenesgral.unidadmedida
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptordenesgral_unidadmedida_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptordenesgral.existencia" column
-#+
-#+ @param p_existencia - DECIMAL(12,3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptordenesgral_existencia_checkColumnConstraints(p_existencia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_existencia LIKE ptordenesgral.existencia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptordenesgral_existencia_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptordenesgral.cantidadorden" column
-#+
-#+ @param p_cantidadorden - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptordenesgral_cantidadorden_checkColumnConstraints(p_cantidadorden)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidadorden LIKE ptordenesgral.cantidadorden
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptordenesgral_cantidadorden_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptordenesgral.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptordenesgral_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE ptordenesgral.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptordenesgral_cantidad_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptordenesgral.unidades" column
-#+
-#+ @param p_unidades - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptordenesgral_unidades_checkColumnConstraints(p_unidades)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_unidades LIKE ptordenesgral.unidades
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptordenesgral_unidades_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptordenesgral.precio" column
-#+
-#+ @param p_precio - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptordenesgral_precio_checkColumnConstraints(p_precio)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_precio LIKE ptordenesgral.precio
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptordenesgral_precio_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptordenesgral.descuento" column
-#+
-#+ @param p_descuento - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptordenesgral_descuento_checkColumnConstraints(p_descuento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descuento LIKE ptordenesgral.descuento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptordenesgral_descuento_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptordenesgral.valor" column
-#+
-#+ @param p_valor - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptordenesgral_valor_checkColumnConstraints(p_valor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valor LIKE ptordenesgral.valor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptordenesgral_valor_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptordenesgral.costo_std" column
-#+
-#+ @param p_costo_std - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptordenesgral_costo_std_checkColumnConstraints(p_costo_std)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_costo_std LIKE ptordenesgral.costo_std
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptordenesgral_costo_std_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptordenesgral.costo_lq" column
-#+
-#+ @param p_costo_lq - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptordenesgral_costo_lq_checkColumnConstraints(p_costo_lq)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_costo_lq LIKE ptordenesgral.costo_lq
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptordenesgral_costo_lq_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptordenesgral.valorcostostd" column
-#+
-#+ @param p_valorcostostd - DECIMAL(16,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptordenesgral_valorcostostd_checkColumnConstraints(p_valorcostostd)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valorcostostd LIKE ptordenesgral.valorcostostd
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptordenesgral_valorcostostd_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptordenesgral.tipo_cliente" column
-#+
-#+ @param p_tipo_cliente - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptordenesgral_tipo_cliente_checkColumnConstraints(p_tipo_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_cliente LIKE ptordenesgral.tipo_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptordenesgral_tipo_cliente_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptordenesgral.sec_cliente" column
-#+
-#+ @param p_sec_cliente - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptordenesgral_sec_cliente_checkColumnConstraints(p_sec_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_cliente LIKE ptordenesgral.sec_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptordenesgral_sec_cliente_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptordenesgral.nombrecliente" column
-#+
-#+ @param p_nombrecliente - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptordenesgral_nombrecliente_checkColumnConstraints(p_nombrecliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombrecliente LIKE ptordenesgral.nombrecliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptordenesgral_nombrecliente_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptordenesgral.sec_vend" column
-#+
-#+ @param p_sec_vend - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptordenesgral_sec_vend_checkColumnConstraints(p_sec_vend)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_vend LIKE ptordenesgral.sec_vend
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptordenesgral_sec_vend_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptordenesgral.nombrevendedor" column
-#+
-#+ @param p_nombrevendedor - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptordenesgral_nombrevendedor_checkColumnConstraints(p_nombrevendedor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombrevendedor LIKE ptordenesgral.nombrevendedor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptordenesgral_nombrevendedor_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptordenesgral.apellidovend" column
-#+
-#+ @param p_apellidovend - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptordenesgral_apellidovend_checkColumnConstraints(p_apellidovend)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_apellidovend LIKE ptordenesgral.apellidovend
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptordenesgral_apellidovend_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptordenesgral.fechatransac" column
-#+
-#+ @param p_fechatransac - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptordenesgral_fechatransac_checkColumnConstraints(p_fechatransac)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fechatransac LIKE ptordenesgral.fechatransac
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptordenesgral_fechatransac_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptordenesgral.tipotrransaccion" column
-#+
-#+ @param p_tipotrransaccion - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptordenesgral_tipotrransaccion_checkColumnConstraints(p_tipotrransaccion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipotrransaccion LIKE ptordenesgral.tipotrransaccion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptordenesgral_tipotrransaccion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptordenesgral.estado" column
-#+
-#+ @param p_estado - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptordenesgral_estado_checkColumnConstraints(p_estado)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_estado LIKE ptordenesgral.estado
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptordenesgral_estado_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptordenesgral.observacion" column
-#+
-#+ @param p_observacion - CHAR(180) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptordenesgral_observacion_checkColumnConstraints(p_observacion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_observacion LIKE ptordenesgral.observacion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptordenesgral_observacion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptordenesgral.detalle" column
-#+
-#+ @param p_detalle - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptordenesgral_detalle_checkColumnConstraints(p_detalle)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_detalle LIKE ptordenesgral.detalle
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptordenesgral_detalle_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ptordenesgral.fechaactualizacion" column
-#+
-#+ @param p_fechaactualizacion - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptordenesgral_fechaactualizacion_checkColumnConstraints(p_fechaactualizacion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fechaactualizacion LIKE ptordenesgral.fechaactualizacion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ptordenesgral_fechaactualizacion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prttb00002" table
-#+
-#+ @param p_data - a row data LIKE prttb00002.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_prttb00002_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE prttb00002.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_prttb00002_ult_imp_checkColumnConstraints(p_data.ult_imp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prttb00002_usuario_checkColumnConstraints(p_data.usuario) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prttb00002_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prttb00002_checkTableConstraints
-
-{}
-#+ Check constraints on the "prttb00002.ult_imp" column
-#+
-#+ @param p_ult_imp - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prttb00002_ult_imp_checkColumnConstraints(p_ult_imp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ult_imp LIKE prttb00002.ult_imp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prttb00002_ult_imp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prttb00002.usuario" column
-#+
-#+ @param p_usuario - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prttb00002_usuario_checkColumnConstraints(p_usuario)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_usuario LIKE prttb00002.usuario
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prttb00002_usuario_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prttb00002.fecha" column
-#+
-#+ @param p_fecha - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prttb00002_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE prttb00002.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prttb00002_fecha_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prttb00001" table
-#+
-#+ @param p_data - a row data LIKE prttb00001.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_prttb00001_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE prttb00001.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_prttb00001_codigo_checkColumnConstraints(p_data.codigo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prttb00001_nombre_checkColumnConstraints(p_data.nombre) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prttb00001_lpprog_checkColumnConstraints(p_data.lpprog) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prttb00001_lppipe_checkColumnConstraints(p_data.lppipe) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prttb00001_puerto_checkColumnConstraints(p_data.puerto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prttb00001_prtcodigo_checkColumnConstraints(p_data.prtcodigo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prttb00001_checkTableConstraints
-
-{}
-#+ Check constraints on the "prttb00001.codigo" column
-#+
-#+ @param p_codigo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prttb00001_codigo_checkColumnConstraints(p_codigo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codigo LIKE prttb00001.codigo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prttb00001_codigo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prttb00001.nombre" column
-#+
-#+ @param p_nombre - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prttb00001_nombre_checkColumnConstraints(p_nombre)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombre LIKE prttb00001.nombre
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prttb00001_nombre_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prttb00001.lpprog" column
-#+
-#+ @param p_lpprog - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prttb00001_lpprog_checkColumnConstraints(p_lpprog)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_lpprog LIKE prttb00001.lpprog
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prttb00001_lpprog_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prttb00001.lppipe" column
-#+
-#+ @param p_lppipe - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prttb00001_lppipe_checkColumnConstraints(p_lppipe)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_lppipe LIKE prttb00001.lppipe
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prttb00001_lppipe_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prttb00001.puerto" column
-#+
-#+ @param p_puerto - CHAR(100) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prttb00001_puerto_checkColumnConstraints(p_puerto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_puerto LIKE prttb00001.puerto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prttb00001_puerto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prttb00001.prtcodigo" column
-#+
-#+ @param p_prtcodigo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prttb00001_prtcodigo_checkColumnConstraints(p_prtcodigo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_prtcodigo LIKE prttb00001.prtcodigo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prttb00001_prtcodigo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00030" table
-#+
-#+ @param p_data - a row data LIKE prtb00030.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00030_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE prtb00030.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_prtb00030_id_kit_checkColumnConstraints(p_data.id_kit) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00030_num_oc_checkColumnConstraints(p_data.num_oc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00030_area_checkColumnConstraints(p_data.area) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00030_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00030_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00030_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00030_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00030_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00030_precio_checkColumnConstraints(p_data.precio) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00030_checkTableConstraints
-
-{}
-#+ Check constraints on the "prtb00030.id_kit" column
-#+
-#+ @param p_id_kit - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00030_id_kit_checkColumnConstraints(p_id_kit)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_id_kit LIKE prtb00030.id_kit
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00030_id_kit_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00030.num_oc" column
-#+
-#+ @param p_num_oc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00030_num_oc_checkColumnConstraints(p_num_oc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_oc LIKE prtb00030.num_oc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00030_num_oc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00030.area" column
-#+
-#+ @param p_area - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00030_area_checkColumnConstraints(p_area)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_area LIKE prtb00030.area
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00030_area_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00030.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00030_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE prtb00030.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00030_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00030.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00030_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE prtb00030.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00030_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00030.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00030_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE prtb00030.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00030_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00030.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00030_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE prtb00030.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00030_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00030.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00030_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE prtb00030.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00030_cantidad_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00030.precio" column
-#+
-#+ @param p_precio - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00030_precio_checkColumnConstraints(p_precio)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_precio LIKE prtb00030.precio
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00030_precio_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00029" table
-#+
-#+ @param p_data - a row data LIKE prtb00029.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00029_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE prtb00029.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_prtb00029_num_oc_checkColumnConstraints(p_data.num_oc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00029_ruta_file_checkColumnConstraints(p_data.ruta_file) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00029_id_checkColumnConstraints(p_data.id) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00029_checkTableConstraints
-
-{}
-#+ Check constraints on the "prtb00029.num_oc" column
-#+
-#+ @param p_num_oc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00029_num_oc_checkColumnConstraints(p_num_oc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_oc LIKE prtb00029.num_oc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00029_num_oc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00029.ruta_file" column
-#+
-#+ @param p_ruta_file - CHAR(100) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00029_ruta_file_checkColumnConstraints(p_ruta_file)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ruta_file LIKE prtb00029.ruta_file
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00029_ruta_file_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00029.id" column
-#+
-#+ @param p_id - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00029_id_checkColumnConstraints(p_id)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_id LIKE prtb00029.id
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00029_id_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00028" table
-#+
-#+ @param p_data - a row data LIKE prtb00028.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00028_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE prtb00028.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_prtb00028_num_oc_checkColumnConstraints(p_data.num_oc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00028_fecha_compromiso_checkColumnConstraints(p_data.fecha_compromiso) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00028_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00028_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00028_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00028_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00028_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00028_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00028_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- CALL smarmotech_dbxconstraints_prtb00028_pk_prtb00028_checkUniqueConstraint(p_forUpdate, p_data.num_oc, p_data.fecha_compromiso, p_data.cod_n, p_data.cod_grupo, p_data.cod_tipo, p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00028_checkTableConstraints
-
-{}
-#+ Check the primary key uniqueness constraint on the "prtb00028"
-#+
-#+ @param p_key - Primary Key
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00028_pk_prtb00028_checkUniqueConstraint(p_forUpdate, p_key)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_key
- RECORD
- prtb00028_num_oc LIKE prtb00028.num_oc,
- prtb00028_fecha_compromiso LIKE prtb00028.fecha_compromiso,
- prtb00028_cod_n LIKE prtb00028.cod_n,
- prtb00028_cod_grupo LIKE prtb00028.cod_grupo,
- prtb00028_cod_tipo LIKE prtb00028.cod_tipo,
- prtb00028_cod_sec LIKE prtb00028.cod_sec
- END RECORD
- DEFINE l_key
- RECORD
- prtb00028_num_oc LIKE prtb00028.num_oc,
- prtb00028_fecha_compromiso LIKE prtb00028.fecha_compromiso,
- prtb00028_cod_n LIKE prtb00028.cod_n,
- prtb00028_cod_grupo LIKE prtb00028.cod_grupo,
- prtb00028_cod_tipo LIKE prtb00028.cod_tipo,
- prtb00028_cod_sec LIKE prtb00028.cod_sec
- END RECORD
- DEFINE l_where STRING
- DEFINE l_sqlQuery STRING
- DEFINE l_count INTEGER
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- LET l_where = "WHERE prtb00028.num_oc = ?
- AND prtb00028.fecha_compromiso = ?
- AND prtb00028.cod_n = ?
- AND prtb00028.cod_grupo = ?
- AND prtb00028.cod_tipo = ?
- AND prtb00028.cod_sec = ? "
-
- let l_sqlQuery = "SELECT COUNT(*), num_oc, fecha_compromiso, cod_n, cod_grupo, cod_tipo, cod_sec FROM prtb00028 ", l_where, " GROUP BY num_oc, fecha_compromiso, cod_n, cod_grupo, cod_tipo, cod_sec"
-
- PREPARE cur_prtb00028_pk_prtb00028_checkUniqueConstraint FROM l_sqlQuery
- EXECUTE cur_prtb00028_pk_prtb00028_checkUniqueConstraint INTO l_count, l_key.* USING p_key.*
- FREE cur_prtb00028_pk_prtb00028_checkUniqueConstraint
- IF (NOT p_forUpdate AND l_count > 0) OR (p_forUpdate AND l_count > 0 AND p_key.* != l_key.*) THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- num_oc + fecha_compromiso + cod_n + cod_grupo + cod_tipo + cod_sec: " || ERROR_BAM_00002) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00028_pk_prtb00028_checkUniqueConstraint
-
-{}
-#+ Check constraints on the "prtb00028.num_oc" column
-#+
-#+ @param p_num_oc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00028_num_oc_checkColumnConstraints(p_num_oc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_oc LIKE prtb00028.num_oc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_num_oc IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- num_oc: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00028_num_oc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00028.fecha_compromiso" column
-#+
-#+ @param p_fecha_compromiso - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00028_fecha_compromiso_checkColumnConstraints(p_fecha_compromiso)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_compromiso LIKE prtb00028.fecha_compromiso
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_fecha_compromiso IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- fecha_compromiso: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00028_fecha_compromiso_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00028.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00028_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE prtb00028.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_n IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_n: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00028_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00028.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00028_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE prtb00028.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_grupo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_grupo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00028_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00028.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00028_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE prtb00028.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_tipo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_tipo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00028_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00028.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00028_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE prtb00028.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_sec IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_sec: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00028_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00028.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00028_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE prtb00028.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00028_cantidad_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00028.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00028_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE prtb00028.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00028_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00028.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00028_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE prtb00028.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00028_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00027" table
-#+
-#+ @param p_data - a row data LIKE prtb00027.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00027_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE prtb00027.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_prtb00027_num_autoriza_checkColumnConstraints(p_data.num_autoriza) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00027_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00027_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00027_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00027_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00027_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00027_monto_checkColumnConstraints(p_data.monto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00027_checkTableConstraints
-
-{}
-#+ Check constraints on the "prtb00027.num_autoriza" column
-#+
-#+ @param p_num_autoriza - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00027_num_autoriza_checkColumnConstraints(p_num_autoriza)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_autoriza LIKE prtb00027.num_autoriza
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00027_num_autoriza_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00027.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00027_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE prtb00027.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00027_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00027.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00027_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE prtb00027.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00027_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00027.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00027_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE prtb00027.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00027_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00027.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00027_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE prtb00027.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00027_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00027.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(12,3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00027_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE prtb00027.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00027_cantidad_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00027.monto" column
-#+
-#+ @param p_monto - DECIMAL(12,3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00027_monto_checkColumnConstraints(p_monto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_monto LIKE prtb00027.monto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00027_monto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00026" table
-#+
-#+ @param p_data - a row data LIKE prtb00026.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00026_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE prtb00026.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_prtb00026_num_autoriza_checkColumnConstraints(p_data.num_autoriza) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00026_observacion_checkColumnConstraints(p_data.observacion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00026_num_oc_checkColumnConstraints(p_data.num_oc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00026_num_doc_checkColumnConstraints(p_data.num_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00026_cod_mov_checkColumnConstraints(p_data.cod_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00026_descrip_mov_checkColumnConstraints(p_data.descrip_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00026_fecha_oc_checkColumnConstraints(p_data.fecha_oc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00026_fecha_autoriza_checkColumnConstraints(p_data.fecha_autoriza) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00026_usuario_checkColumnConstraints(p_data.usuario) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00026_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00026_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00026_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00026_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00026_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00026_checkTableConstraints
-
-{}
-#+ Check constraints on the "prtb00026.num_autoriza" column
-#+
-#+ @param p_num_autoriza - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00026_num_autoriza_checkColumnConstraints(p_num_autoriza)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_autoriza LIKE prtb00026.num_autoriza
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00026_num_autoriza_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00026.observacion" column
-#+
-#+ @param p_observacion - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00026_observacion_checkColumnConstraints(p_observacion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_observacion LIKE prtb00026.observacion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00026_observacion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00026.num_oc" column
-#+
-#+ @param p_num_oc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00026_num_oc_checkColumnConstraints(p_num_oc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_oc LIKE prtb00026.num_oc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00026_num_oc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00026.num_doc" column
-#+
-#+ @param p_num_doc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00026_num_doc_checkColumnConstraints(p_num_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_doc LIKE prtb00026.num_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00026_num_doc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00026.cod_mov" column
-#+
-#+ @param p_cod_mov - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00026_cod_mov_checkColumnConstraints(p_cod_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mov LIKE prtb00026.cod_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00026_cod_mov_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00026.descrip_mov" column
-#+
-#+ @param p_descrip_mov - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00026_descrip_mov_checkColumnConstraints(p_descrip_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descrip_mov LIKE prtb00026.descrip_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00026_descrip_mov_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00026.fecha_oc" column
-#+
-#+ @param p_fecha_oc - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00026_fecha_oc_checkColumnConstraints(p_fecha_oc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_oc LIKE prtb00026.fecha_oc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00026_fecha_oc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00026.fecha_autoriza" column
-#+
-#+ @param p_fecha_autoriza - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00026_fecha_autoriza_checkColumnConstraints(p_fecha_autoriza)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_autoriza LIKE prtb00026.fecha_autoriza
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00026_fecha_autoriza_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00026.usuario" column
-#+
-#+ @param p_usuario - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00026_usuario_checkColumnConstraints(p_usuario)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_usuario LIKE prtb00026.usuario
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00026_usuario_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00026.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00026_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE prtb00026.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00026_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00026.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00026_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE prtb00026.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00026_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00026.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00026_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE prtb00026.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00026_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00026.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00026_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE prtb00026.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00026_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00026.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00026_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE prtb00026.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00026_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00025" table
-#+
-#+ @param p_data - a row data LIKE prtb00025.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00025_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE prtb00025.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_prtb00025_num_oc_checkColumnConstraints(p_data.num_oc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00025_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00025_tipo_cliente_checkColumnConstraints(p_data.tipo_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00025_sec_cliente_checkColumnConstraints(p_data.sec_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00025_nombre_checkColumnConstraints(p_data.nombre) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00025_valor_checkColumnConstraints(p_data.valor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00025_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00025_us_autoriza_checkColumnConstraints(p_data.us_autoriza) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00025_fecha_autorizacion_checkColumnConstraints(p_data.fecha_autorizacion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00025_estado_checkColumnConstraints(p_data.estado) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00025_checkTableConstraints
-
-{}
-#+ Check constraints on the "prtb00025.num_oc" column
-#+
-#+ @param p_num_oc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00025_num_oc_checkColumnConstraints(p_num_oc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_oc LIKE prtb00025.num_oc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00025_num_oc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00025.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00025_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE prtb00025.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00025_fecha_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00025.tipo_cliente" column
-#+
-#+ @param p_tipo_cliente - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00025_tipo_cliente_checkColumnConstraints(p_tipo_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_cliente LIKE prtb00025.tipo_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00025_tipo_cliente_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00025.sec_cliente" column
-#+
-#+ @param p_sec_cliente - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00025_sec_cliente_checkColumnConstraints(p_sec_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_cliente LIKE prtb00025.sec_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00025_sec_cliente_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00025.nombre" column
-#+
-#+ @param p_nombre - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00025_nombre_checkColumnConstraints(p_nombre)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombre LIKE prtb00025.nombre
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00025_nombre_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00025.valor" column
-#+
-#+ @param p_valor - DECIMAL(16,0) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00025_valor_checkColumnConstraints(p_valor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valor LIKE prtb00025.valor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00025_valor_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00025.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00025_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE prtb00025.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00025_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00025.us_autoriza" column
-#+
-#+ @param p_us_autoriza - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00025_us_autoriza_checkColumnConstraints(p_us_autoriza)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_autoriza LIKE prtb00025.us_autoriza
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00025_us_autoriza_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00025.fecha_autorizacion" column
-#+
-#+ @param p_fecha_autorizacion - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00025_fecha_autorizacion_checkColumnConstraints(p_fecha_autorizacion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_autorizacion LIKE prtb00025.fecha_autorizacion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00025_fecha_autorizacion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00025.estado" column
-#+
-#+ @param p_estado - CHAR(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00025_estado_checkColumnConstraints(p_estado)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_estado LIKE prtb00025.estado
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00025_estado_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00024" table
-#+
-#+ @param p_data - a row data LIKE prtb00024.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00024_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE prtb00024.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_prtb00024_num_oc_checkColumnConstraints(p_data.num_oc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00024_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00024_checkTableConstraints
-
-{}
-#+ Check constraints on the "prtb00024.num_oc" column
-#+
-#+ @param p_num_oc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00024_num_oc_checkColumnConstraints(p_num_oc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_oc LIKE prtb00024.num_oc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00024_num_oc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00024.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00024_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE prtb00024.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00024_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00023" table
-#+
-#+ @param p_data - a row data LIKE prtb00023.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00023_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE prtb00023.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_prtb00023_num_oc_checkColumnConstraints(p_data.num_oc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00023_secuencia_checkColumnConstraints(p_data.secuencia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00023_area_checkColumnConstraints(p_data.area) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00023_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00023_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00023_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00023_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00023_cantidad_1_checkColumnConstraints(p_data.cantidad_1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00023_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00023_id_kit_checkColumnConstraints(p_data.id_kit) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00023_checkTableConstraints
-
-{}
-#+ Check constraints on the "prtb00023.num_oc" column
-#+
-#+ @param p_num_oc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00023_num_oc_checkColumnConstraints(p_num_oc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_oc LIKE prtb00023.num_oc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00023_num_oc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00023.secuencia" column
-#+
-#+ @param p_secuencia - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00023_secuencia_checkColumnConstraints(p_secuencia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_secuencia LIKE prtb00023.secuencia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00023_secuencia_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00023.area" column
-#+
-#+ @param p_area - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00023_area_checkColumnConstraints(p_area)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_area LIKE prtb00023.area
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00023_area_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00023.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00023_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE prtb00023.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00023_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00023.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00023_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE prtb00023.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00023_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00023.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00023_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE prtb00023.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00023_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00023.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00023_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE prtb00023.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00023_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00023.cantidad_1" column
-#+
-#+ @param p_cantidad_1 - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00023_cantidad_1_checkColumnConstraints(p_cantidad_1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad_1 LIKE prtb00023.cantidad_1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00023_cantidad_1_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00023.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00023_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE prtb00023.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00023_cantidad_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00023.id_kit" column
-#+
-#+ @param p_id_kit - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00023_id_kit_checkColumnConstraints(p_id_kit)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_id_kit LIKE prtb00023.id_kit
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00023_id_kit_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00022" table
-#+
-#+ @param p_data - a row data LIKE prtb00022.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00022_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE prtb00022.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_prtb00022_etiqueta_checkColumnConstraints(p_data.etiqueta) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00022_num_oc_checkColumnConstraints(p_data.num_oc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00022_secuencia_checkColumnConstraints(p_data.secuencia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00022_area_checkColumnConstraints(p_data.area) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00022_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00022_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00022_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00022_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00022_lado_1_checkColumnConstraints(p_data.lado_1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00022_lado_2_checkColumnConstraints(p_data.lado_2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00022_lado_3_checkColumnConstraints(p_data.lado_3) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00022_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00022_medida_checkColumnConstraints(p_data.medida) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00022_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00022_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00022_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00022_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00022_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00022_checkTableConstraints
-
-{}
-#+ Check constraints on the "prtb00022.etiqueta" column
-#+
-#+ @param p_etiqueta - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00022_etiqueta_checkColumnConstraints(p_etiqueta)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_etiqueta LIKE prtb00022.etiqueta
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_etiqueta IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- etiqueta: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00022_etiqueta_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00022.num_oc" column
-#+
-#+ @param p_num_oc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00022_num_oc_checkColumnConstraints(p_num_oc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_oc LIKE prtb00022.num_oc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00022_num_oc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00022.secuencia" column
-#+
-#+ @param p_secuencia - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00022_secuencia_checkColumnConstraints(p_secuencia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_secuencia LIKE prtb00022.secuencia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00022_secuencia_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00022.area" column
-#+
-#+ @param p_area - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00022_area_checkColumnConstraints(p_area)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_area LIKE prtb00022.area
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00022_area_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00022.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00022_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE prtb00022.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00022_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00022.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00022_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE prtb00022.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00022_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00022.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00022_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE prtb00022.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00022_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00022.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00022_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE prtb00022.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00022_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00022.lado_1" column
-#+
-#+ @param p_lado_1 - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00022_lado_1_checkColumnConstraints(p_lado_1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_lado_1 LIKE prtb00022.lado_1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00022_lado_1_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00022.lado_2" column
-#+
-#+ @param p_lado_2 - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00022_lado_2_checkColumnConstraints(p_lado_2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_lado_2 LIKE prtb00022.lado_2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00022_lado_2_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00022.lado_3" column
-#+
-#+ @param p_lado_3 - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00022_lado_3_checkColumnConstraints(p_lado_3)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_lado_3 LIKE prtb00022.lado_3
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00022_lado_3_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00022.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00022_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE prtb00022.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00022_cantidad_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00022.medida" column
-#+
-#+ @param p_medida - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00022_medida_checkColumnConstraints(p_medida)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_medida LIKE prtb00022.medida
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00022_medida_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00022.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00022_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE prtb00022.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00022_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00022.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00022_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE prtb00022.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00022_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00022.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00022_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE prtb00022.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00022_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00022.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00022_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE prtb00022.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00022_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00022.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00022_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE prtb00022.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00022_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00021" table
-#+
-#+ @param p_data - a row data LIKE prtb00021.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00021_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE prtb00021.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_prtb00021_ano_checkColumnConstraints(p_data.ano) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00021_dia_checkColumnConstraints(p_data.dia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00021_mes_checkColumnConstraints(p_data.mes) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00021_semana_checkColumnConstraints(p_data.semana) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00021_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00021_documento_checkColumnConstraints(p_data.documento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00021_codigosemi_checkColumnConstraints(p_data.codigosemi) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00021_descripcionsemi_checkColumnConstraints(p_data.descripcionsemi) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00021_uniadmed_checkColumnConstraints(p_data.uniadmed) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00021_codigodepto_checkColumnConstraints(p_data.codigodepto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00021_nombredto_checkColumnConstraints(p_data.nombredto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00021_ficha_checkColumnConstraints(p_data.ficha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00021_nombre_checkColumnConstraints(p_data.nombre) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00021_apellido_checkColumnConstraints(p_data.apellido) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00021_normalesd_checkColumnConstraints(p_data.normalesd) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00021_normalesind_checkColumnConstraints(p_data.normalesind) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00021_extrasdirecta_checkColumnConstraints(p_data.extrasdirecta) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00021_extrasind_checkColumnConstraints(p_data.extrasind) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00021_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00021_bloque_checkColumnConstraints(p_data.bloque) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00021_cantidadprep_checkColumnConstraints(p_data.cantidadprep) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00021_grupodepto_checkColumnConstraints(p_data.grupodepto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00021_costo_checkColumnConstraints(p_data.costo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00021_checkTableConstraints
-
-{}
-#+ Check constraints on the "prtb00021.ano" column
-#+
-#+ @param p_ano - CHAR(4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00021_ano_checkColumnConstraints(p_ano)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ano LIKE prtb00021.ano
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00021_ano_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00021.dia" column
-#+
-#+ @param p_dia - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00021_dia_checkColumnConstraints(p_dia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_dia LIKE prtb00021.dia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00021_dia_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00021.mes" column
-#+
-#+ @param p_mes - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00021_mes_checkColumnConstraints(p_mes)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mes LIKE prtb00021.mes
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00021_mes_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00021.semana" column
-#+
-#+ @param p_semana - CHAR(25) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00021_semana_checkColumnConstraints(p_semana)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_semana LIKE prtb00021.semana
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00021_semana_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00021.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00021_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE prtb00021.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00021_fecha_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00021.documento" column
-#+
-#+ @param p_documento - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00021_documento_checkColumnConstraints(p_documento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_documento LIKE prtb00021.documento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00021_documento_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00021.codigosemi" column
-#+
-#+ @param p_codigosemi - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00021_codigosemi_checkColumnConstraints(p_codigosemi)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codigosemi LIKE prtb00021.codigosemi
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00021_codigosemi_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00021.descripcionsemi" column
-#+
-#+ @param p_descripcionsemi - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00021_descripcionsemi_checkColumnConstraints(p_descripcionsemi)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcionsemi LIKE prtb00021.descripcionsemi
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00021_descripcionsemi_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00021.uniadmed" column
-#+
-#+ @param p_uniadmed - CHAR(4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00021_uniadmed_checkColumnConstraints(p_uniadmed)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_uniadmed LIKE prtb00021.uniadmed
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00021_uniadmed_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00021.codigodepto" column
-#+
-#+ @param p_codigodepto - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00021_codigodepto_checkColumnConstraints(p_codigodepto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codigodepto LIKE prtb00021.codigodepto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00021_codigodepto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00021.nombredto" column
-#+
-#+ @param p_nombredto - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00021_nombredto_checkColumnConstraints(p_nombredto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombredto LIKE prtb00021.nombredto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00021_nombredto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00021.ficha" column
-#+
-#+ @param p_ficha - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00021_ficha_checkColumnConstraints(p_ficha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ficha LIKE prtb00021.ficha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00021_ficha_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00021.nombre" column
-#+
-#+ @param p_nombre - CHAR(25) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00021_nombre_checkColumnConstraints(p_nombre)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombre LIKE prtb00021.nombre
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00021_nombre_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00021.apellido" column
-#+
-#+ @param p_apellido - CHAR(25) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00021_apellido_checkColumnConstraints(p_apellido)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_apellido LIKE prtb00021.apellido
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00021_apellido_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00021.normalesd" column
-#+
-#+ @param p_normalesd - DECIMAL(8,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00021_normalesd_checkColumnConstraints(p_normalesd)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_normalesd LIKE prtb00021.normalesd
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00021_normalesd_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00021.normalesind" column
-#+
-#+ @param p_normalesind - DECIMAL(8,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00021_normalesind_checkColumnConstraints(p_normalesind)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_normalesind LIKE prtb00021.normalesind
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00021_normalesind_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00021.extrasdirecta" column
-#+
-#+ @param p_extrasdirecta - DECIMAL(8,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00021_extrasdirecta_checkColumnConstraints(p_extrasdirecta)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_extrasdirecta LIKE prtb00021.extrasdirecta
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00021_extrasdirecta_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00021.extrasind" column
-#+
-#+ @param p_extrasind - DECIMAL(8,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00021_extrasind_checkColumnConstraints(p_extrasind)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_extrasind LIKE prtb00021.extrasind
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00021_extrasind_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00021.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00021_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE prtb00021.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00021_cantidad_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00021.bloque" column
-#+
-#+ @param p_bloque - CHAR(25) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00021_bloque_checkColumnConstraints(p_bloque)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_bloque LIKE prtb00021.bloque
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00021_bloque_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00021.cantidadprep" column
-#+
-#+ @param p_cantidadprep - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00021_cantidadprep_checkColumnConstraints(p_cantidadprep)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidadprep LIKE prtb00021.cantidadprep
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00021_cantidadprep_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00021.grupodepto" column
-#+
-#+ @param p_grupodepto - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00021_grupodepto_checkColumnConstraints(p_grupodepto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_grupodepto LIKE prtb00021.grupodepto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00021_grupodepto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00021.costo" column
-#+
-#+ @param p_costo - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00021_costo_checkColumnConstraints(p_costo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_costo LIKE prtb00021.costo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00021_costo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00020" table
-#+
-#+ @param p_data - a row data LIKE prtb00020.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00020_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE prtb00020.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_prtb00020_num_oc_checkColumnConstraints(p_data.num_oc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00020_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00020_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00020_checkTableConstraints
-
-{}
-#+ Check constraints on the "prtb00020.num_oc" column
-#+
-#+ @param p_num_oc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00020_num_oc_checkColumnConstraints(p_num_oc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_oc LIKE prtb00020.num_oc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00020_num_oc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00020.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00020_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE prtb00020.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00020_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00020.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00020_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE prtb00020.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00020_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00019" table
-#+
-#+ @param p_data - a row data LIKE prtb00019.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00019_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE prtb00019.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_prtb00019_ano_checkColumnConstraints(p_data.ano) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00019_mes_checkColumnConstraints(p_data.mes) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00019_departamento_checkColumnConstraints(p_data.departamento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00019_num_emp_checkColumnConstraints(p_data.num_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00019_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00019_checkTableConstraints
-
-{}
-#+ Check constraints on the "prtb00019.ano" column
-#+
-#+ @param p_ano - CHAR(4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00019_ano_checkColumnConstraints(p_ano)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ano LIKE prtb00019.ano
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00019_ano_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00019.mes" column
-#+
-#+ @param p_mes - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00019_mes_checkColumnConstraints(p_mes)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mes LIKE prtb00019.mes
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00019_mes_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00019.departamento" column
-#+
-#+ @param p_departamento - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00019_departamento_checkColumnConstraints(p_departamento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_departamento LIKE prtb00019.departamento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00019_departamento_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00019.num_emp" column
-#+
-#+ @param p_num_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00019_num_emp_checkColumnConstraints(p_num_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_emp LIKE prtb00019.num_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00019_num_emp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00019.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00019_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE prtb00019.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00019_cantidad_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00018" table
-#+
-#+ @param p_data - a row data LIKE prtb00018.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00018_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE prtb00018.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_prtb00018_num_oc_checkColumnConstraints(p_data.num_oc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00018_detalle_checkColumnConstraints(p_data.detalle) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00018_fecha_entrada_checkColumnConstraints(p_data.fecha_entrada) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00018_fecha_realizacion_checkColumnConstraints(p_data.fecha_realizacion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00018_fecha_inicial_checkColumnConstraints(p_data.fecha_inicial) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00018_fecha_final_checkColumnConstraints(p_data.fecha_final) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00018_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00018_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00018_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00018_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00018_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00018_checkTableConstraints
-
-{}
-#+ Check constraints on the "prtb00018.num_oc" column
-#+
-#+ @param p_num_oc - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00018_num_oc_checkColumnConstraints(p_num_oc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_oc LIKE prtb00018.num_oc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00018_num_oc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00018.detalle" column
-#+
-#+ @param p_detalle - CHAR(100) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00018_detalle_checkColumnConstraints(p_detalle)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_detalle LIKE prtb00018.detalle
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00018_detalle_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00018.fecha_entrada" column
-#+
-#+ @param p_fecha_entrada - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00018_fecha_entrada_checkColumnConstraints(p_fecha_entrada)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_entrada LIKE prtb00018.fecha_entrada
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00018_fecha_entrada_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00018.fecha_realizacion" column
-#+
-#+ @param p_fecha_realizacion - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00018_fecha_realizacion_checkColumnConstraints(p_fecha_realizacion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_realizacion LIKE prtb00018.fecha_realizacion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00018_fecha_realizacion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00018.fecha_inicial" column
-#+
-#+ @param p_fecha_inicial - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00018_fecha_inicial_checkColumnConstraints(p_fecha_inicial)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_inicial LIKE prtb00018.fecha_inicial
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00018_fecha_inicial_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00018.fecha_final" column
-#+
-#+ @param p_fecha_final - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00018_fecha_final_checkColumnConstraints(p_fecha_final)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_final LIKE prtb00018.fecha_final
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00018_fecha_final_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00018.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00018_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE prtb00018.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00018_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00018.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00018_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE prtb00018.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00018_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00018.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00018_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE prtb00018.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00018_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00018.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00018_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE prtb00018.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00018_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00018.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00018_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE prtb00018.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00018_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00017" table
-#+
-#+ @param p_data - a row data LIKE prtb00017.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00017_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE prtb00017.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_prtb00017_num_oc_checkColumnConstraints(p_data.num_oc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00017_fecha_mensaje_checkColumnConstraints(p_data.fecha_mensaje) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00017_usuario_checkColumnConstraints(p_data.usuario) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00017_usuario_lee_checkColumnConstraints(p_data.usuario_lee) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00017_fecha_leido_checkColumnConstraints(p_data.fecha_leido) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00017_tema_checkColumnConstraints(p_data.tema) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00017_mensaje_checkColumnConstraints(p_data.mensaje) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00017_leido_checkColumnConstraints(p_data.leido) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00017_checkTableConstraints
-
-{}
-#+ Check constraints on the "prtb00017.num_oc" column
-#+
-#+ @param p_num_oc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00017_num_oc_checkColumnConstraints(p_num_oc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_oc LIKE prtb00017.num_oc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_num_oc IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- num_oc: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00017_num_oc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00017.fecha_mensaje" column
-#+
-#+ @param p_fecha_mensaje - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00017_fecha_mensaje_checkColumnConstraints(p_fecha_mensaje)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_mensaje LIKE prtb00017.fecha_mensaje
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_fecha_mensaje IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- fecha_mensaje: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00017_fecha_mensaje_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00017.usuario" column
-#+
-#+ @param p_usuario - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00017_usuario_checkColumnConstraints(p_usuario)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_usuario LIKE prtb00017.usuario
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00017_usuario_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00017.usuario_lee" column
-#+
-#+ @param p_usuario_lee - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00017_usuario_lee_checkColumnConstraints(p_usuario_lee)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_usuario_lee LIKE prtb00017.usuario_lee
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00017_usuario_lee_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00017.fecha_leido" column
-#+
-#+ @param p_fecha_leido - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00017_fecha_leido_checkColumnConstraints(p_fecha_leido)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_leido LIKE prtb00017.fecha_leido
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00017_fecha_leido_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00017.tema" column
-#+
-#+ @param p_tema - CHAR(255) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00017_tema_checkColumnConstraints(p_tema)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tema LIKE prtb00017.tema
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_tema IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- tema: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00017_tema_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00017.mensaje" column
-#+
-#+ @param p_mensaje - CHAR(255) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00017_mensaje_checkColumnConstraints(p_mensaje)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mensaje LIKE prtb00017.mensaje
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_mensaje IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- mensaje: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00017_mensaje_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00017.leido" column
-#+
-#+ @param p_leido - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00017_leido_checkColumnConstraints(p_leido)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_leido LIKE prtb00017.leido
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00017_leido_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00016" table
-#+
-#+ @param p_data - a row data LIKE prtb00016.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00016_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE prtb00016.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_prtb00016_area_num_checkColumnConstraints(p_data.area_num) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00016_nombre_area_checkColumnConstraints(p_data.nombre_area) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00016_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00016_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00016_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00016_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00016_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00016_checkTableConstraints
-
-{}
-#+ Check constraints on the "prtb00016.area_num" column
-#+
-#+ @param p_area_num - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00016_area_num_checkColumnConstraints(p_area_num)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_area_num LIKE prtb00016.area_num
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_area_num IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- area_num: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00016_area_num_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00016.nombre_area" column
-#+
-#+ @param p_nombre_area - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00016_nombre_area_checkColumnConstraints(p_nombre_area)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombre_area LIKE prtb00016.nombre_area
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00016_nombre_area_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00016.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00016_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE prtb00016.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00016_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00016.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00016_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE prtb00016.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00016_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00016.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00016_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE prtb00016.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00016_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00016.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00016_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE prtb00016.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00016_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00016.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00016_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE prtb00016.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00016_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00015" table
-#+
-#+ @param p_data - a row data LIKE prtb00015.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00015_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE prtb00015.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_prtb00015_num_oc_checkColumnConstraints(p_data.num_oc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00015_area_checkColumnConstraints(p_data.area) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00015_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00015_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00015_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00015_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00015_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00015_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00015_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00015_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00015_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00015_checkTableConstraints
-
-{}
-#+ Check constraints on the "prtb00015.num_oc" column
-#+
-#+ @param p_num_oc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00015_num_oc_checkColumnConstraints(p_num_oc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_oc LIKE prtb00015.num_oc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00015_num_oc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00015.area" column
-#+
-#+ @param p_area - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00015_area_checkColumnConstraints(p_area)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_area LIKE prtb00015.area
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00015_area_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00015.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00015_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE prtb00015.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00015_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00015.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00015_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE prtb00015.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00015_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00015.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00015_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE prtb00015.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00015_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00015.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00015_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE prtb00015.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00015_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00015.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00015_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE prtb00015.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00015_cantidad_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00015.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00015_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE prtb00015.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00015_fecha_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00015.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00015_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE prtb00015.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00015_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00015.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00015_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE prtb00015.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00015_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00015.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00015_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE prtb00015.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00015_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00014" table
-#+
-#+ @param p_data - a row data LIKE prtb00014.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00014_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE prtb00014.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_prtb00014_num_oc_checkColumnConstraints(p_data.num_oc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00014_observacion_checkColumnConstraints(p_data.observacion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00014_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00014_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00014_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00014_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00014_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00014_checkTableConstraints
-
-{}
-#+ Check constraints on the "prtb00014.num_oc" column
-#+
-#+ @param p_num_oc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00014_num_oc_checkColumnConstraints(p_num_oc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_oc LIKE prtb00014.num_oc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00014_num_oc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00014.observacion" column
-#+
-#+ @param p_observacion - CHAR(180) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00014_observacion_checkColumnConstraints(p_observacion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_observacion LIKE prtb00014.observacion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00014_observacion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00014.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00014_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE prtb00014.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00014_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00014.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00014_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE prtb00014.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00014_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00014.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00014_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE prtb00014.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00014_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00014.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00014_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE prtb00014.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00014_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00014.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00014_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE prtb00014.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00014_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00013" table
-#+
-#+ @param p_data - a row data LIKE prtb00013.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00013_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE prtb00013.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_prtb00013_num_oc_checkColumnConstraints(p_data.num_oc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00013_secuencia_checkColumnConstraints(p_data.secuencia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00013_area_checkColumnConstraints(p_data.area) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00013_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00013_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00013_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00013_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00013_altura_zocalo_checkColumnConstraints(p_data.altura_zocalo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00013_terminacion_checkColumnConstraints(p_data.terminacion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00013_bisel_checkColumnConstraints(p_data.bisel) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00013_precio_checkColumnConstraints(p_data.precio) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00013_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00013_descuento_checkColumnConstraints(p_data.descuento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00013_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00013_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00013_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00013_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00013_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00013_fecha_compromiso_checkColumnConstraints(p_data.fecha_compromiso) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00013_estado_produccion_checkColumnConstraints(p_data.estado_produccion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00013_observacion_checkColumnConstraints(p_data.observacion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00013_id_kit_checkColumnConstraints(p_data.id_kit) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00013_checkTableConstraints
-
-{}
-#+ Check constraints on the "prtb00013.num_oc" column
-#+
-#+ @param p_num_oc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00013_num_oc_checkColumnConstraints(p_num_oc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_oc LIKE prtb00013.num_oc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00013_num_oc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00013.secuencia" column
-#+
-#+ @param p_secuencia - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00013_secuencia_checkColumnConstraints(p_secuencia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_secuencia LIKE prtb00013.secuencia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00013_secuencia_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00013.area" column
-#+
-#+ @param p_area - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00013_area_checkColumnConstraints(p_area)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_area LIKE prtb00013.area
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00013_area_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00013.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00013_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE prtb00013.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00013_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00013.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00013_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE prtb00013.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00013_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00013.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00013_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE prtb00013.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00013_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00013.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00013_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE prtb00013.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00013_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00013.altura_zocalo" column
-#+
-#+ @param p_altura_zocalo - DECIMAL(8,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00013_altura_zocalo_checkColumnConstraints(p_altura_zocalo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_altura_zocalo LIKE prtb00013.altura_zocalo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00013_altura_zocalo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00013.terminacion" column
-#+
-#+ @param p_terminacion - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00013_terminacion_checkColumnConstraints(p_terminacion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_terminacion LIKE prtb00013.terminacion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00013_terminacion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00013.bisel" column
-#+
-#+ @param p_bisel - CHAR(4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00013_bisel_checkColumnConstraints(p_bisel)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_bisel LIKE prtb00013.bisel
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00013_bisel_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00013.precio" column
-#+
-#+ @param p_precio - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00013_precio_checkColumnConstraints(p_precio)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_precio LIKE prtb00013.precio
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00013_precio_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00013.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00013_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE prtb00013.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00013_cantidad_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00013.descuento" column
-#+
-#+ @param p_descuento - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00013_descuento_checkColumnConstraints(p_descuento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descuento LIKE prtb00013.descuento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00013_descuento_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00013.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00013_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE prtb00013.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00013_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00013.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00013_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE prtb00013.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00013_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00013.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00013_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE prtb00013.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00013_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00013.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00013_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE prtb00013.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00013_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00013.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00013_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE prtb00013.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00013_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00013.fecha_compromiso" column
-#+
-#+ @param p_fecha_compromiso - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00013_fecha_compromiso_checkColumnConstraints(p_fecha_compromiso)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_compromiso LIKE prtb00013.fecha_compromiso
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00013_fecha_compromiso_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00013.estado_produccion" column
-#+
-#+ @param p_estado_produccion - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00013_estado_produccion_checkColumnConstraints(p_estado_produccion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_estado_produccion LIKE prtb00013.estado_produccion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00013_estado_produccion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00013.observacion" column
-#+
-#+ @param p_observacion - CHAR(100) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00013_observacion_checkColumnConstraints(p_observacion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_observacion LIKE prtb00013.observacion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00013_observacion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00013.id_kit" column
-#+
-#+ @param p_id_kit - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00013_id_kit_checkColumnConstraints(p_id_kit)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_id_kit LIKE prtb00013.id_kit
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00013_id_kit_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00012" table
-#+
-#+ @param p_data - a row data LIKE prtb00012.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00012_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE prtb00012.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_prtb00012_ventas_checkColumnConstraints(p_data.ventas) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00012_cotizacion_no_checkColumnConstraints(p_data.cotizacion_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00012_num_oc_checkColumnConstraints(p_data.num_oc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00012_fecha_oc_checkColumnConstraints(p_data.fecha_oc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00012_nombre_file_checkColumnConstraints(p_data.nombre_file) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00012_sec_vend_checkColumnConstraints(p_data.sec_vend) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00012_tipo_cliente_checkColumnConstraints(p_data.tipo_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00012_sec_cliente_checkColumnConstraints(p_data.sec_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00012_direccion_checkColumnConstraints(p_data.direccion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00012_telefono_checkColumnConstraints(p_data.telefono) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00012_fax_checkColumnConstraints(p_data.fax) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00012_fecha_entrega_checkColumnConstraints(p_data.fecha_entrega) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00012_cond_pago_checkColumnConstraints(p_data.cond_pago) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00012_cantidad_i_checkColumnConstraints(p_data.cantidad_i) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00012_precio_i_checkColumnConstraints(p_data.precio_i) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00012_cantidad_mo_checkColumnConstraints(p_data.cantidad_mo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00012_precio_mo_checkColumnConstraints(p_data.precio_mo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00012_transporte_checkColumnConstraints(p_data.transporte) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00012_itbis_checkColumnConstraints(p_data.itbis) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00012_ubicacion_checkColumnConstraints(p_data.ubicacion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00012_cerrada_checkColumnConstraints(p_data.cerrada) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00012_fecha_cierre_checkColumnConstraints(p_data.fecha_cierre) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00012_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00012_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00012_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00012_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00012_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00012_observacion_checkColumnConstraints(p_data.observacion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00012_nombre_file2_checkColumnConstraints(p_data.nombre_file2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- CALL smarmotech_dbxconstraints_prtb00012_pk_prtb00012_checkUniqueConstraint(p_forUpdate, p_data.num_oc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00012_checkTableConstraints
-
-{}
-#+ Check the primary key uniqueness constraint on the "prtb00012"
-#+
-#+ @param p_key - Primary Key
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00012_pk_prtb00012_checkUniqueConstraint(p_forUpdate, p_key)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_key
- RECORD
- prtb00012_num_oc LIKE prtb00012.num_oc
- END RECORD
- DEFINE l_key
- RECORD
- prtb00012_num_oc LIKE prtb00012.num_oc
- END RECORD
- DEFINE l_where STRING
- DEFINE l_sqlQuery STRING
- DEFINE l_count INTEGER
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- LET l_where = "WHERE prtb00012.num_oc = ? "
-
- let l_sqlQuery = "SELECT COUNT(*), num_oc FROM prtb00012 ", l_where, " GROUP BY num_oc"
-
- PREPARE cur_prtb00012_pk_prtb00012_checkUniqueConstraint FROM l_sqlQuery
- EXECUTE cur_prtb00012_pk_prtb00012_checkUniqueConstraint INTO l_count, l_key.* USING p_key.*
- FREE cur_prtb00012_pk_prtb00012_checkUniqueConstraint
- IF (NOT p_forUpdate AND l_count > 0) OR (p_forUpdate AND l_count > 0 AND p_key.* != l_key.*) THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- num_oc: " || ERROR_BAM_00002) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00012_pk_prtb00012_checkUniqueConstraint
-
-{}
-#+ Check constraints on the "prtb00012.ventas" column
-#+
-#+ @param p_ventas - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00012_ventas_checkColumnConstraints(p_ventas)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ventas LIKE prtb00012.ventas
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00012_ventas_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00012.cotizacion_no" column
-#+
-#+ @param p_cotizacion_no - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00012_cotizacion_no_checkColumnConstraints(p_cotizacion_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cotizacion_no LIKE prtb00012.cotizacion_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00012_cotizacion_no_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00012.num_oc" column
-#+
-#+ @param p_num_oc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00012_num_oc_checkColumnConstraints(p_num_oc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_oc LIKE prtb00012.num_oc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_num_oc IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- num_oc: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00012_num_oc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00012.fecha_oc" column
-#+
-#+ @param p_fecha_oc - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00012_fecha_oc_checkColumnConstraints(p_fecha_oc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_oc LIKE prtb00012.fecha_oc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_fecha_oc IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- fecha_oc: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00012_fecha_oc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00012.nombre_file" column
-#+
-#+ @param p_nombre_file - CHAR(15) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00012_nombre_file_checkColumnConstraints(p_nombre_file)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombre_file LIKE prtb00012.nombre_file
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_nombre_file IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- nombre_file: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00012_nombre_file_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00012.sec_vend" column
-#+
-#+ @param p_sec_vend - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00012_sec_vend_checkColumnConstraints(p_sec_vend)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_vend LIKE prtb00012.sec_vend
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00012_sec_vend_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00012.tipo_cliente" column
-#+
-#+ @param p_tipo_cliente - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00012_tipo_cliente_checkColumnConstraints(p_tipo_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_cliente LIKE prtb00012.tipo_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_tipo_cliente IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- tipo_cliente: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00012_tipo_cliente_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00012.sec_cliente" column
-#+
-#+ @param p_sec_cliente - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00012_sec_cliente_checkColumnConstraints(p_sec_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_cliente LIKE prtb00012.sec_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_sec_cliente IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- sec_cliente: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00012_sec_cliente_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00012.direccion" column
-#+
-#+ @param p_direccion - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00012_direccion_checkColumnConstraints(p_direccion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_direccion LIKE prtb00012.direccion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00012_direccion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00012.telefono" column
-#+
-#+ @param p_telefono - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00012_telefono_checkColumnConstraints(p_telefono)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_telefono LIKE prtb00012.telefono
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00012_telefono_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00012.fax" column
-#+
-#+ @param p_fax - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00012_fax_checkColumnConstraints(p_fax)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fax LIKE prtb00012.fax
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00012_fax_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00012.fecha_entrega" column
-#+
-#+ @param p_fecha_entrega - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00012_fecha_entrega_checkColumnConstraints(p_fecha_entrega)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_entrega LIKE prtb00012.fecha_entrega
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00012_fecha_entrega_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00012.cond_pago" column
-#+
-#+ @param p_cond_pago - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00012_cond_pago_checkColumnConstraints(p_cond_pago)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cond_pago LIKE prtb00012.cond_pago
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00012_cond_pago_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00012.cantidad_i" column
-#+
-#+ @param p_cantidad_i - DECIMAL(8,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00012_cantidad_i_checkColumnConstraints(p_cantidad_i)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad_i LIKE prtb00012.cantidad_i
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00012_cantidad_i_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00012.precio_i" column
-#+
-#+ @param p_precio_i - DECIMAL(8,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00012_precio_i_checkColumnConstraints(p_precio_i)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_precio_i LIKE prtb00012.precio_i
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00012_precio_i_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00012.cantidad_mo" column
-#+
-#+ @param p_cantidad_mo - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00012_cantidad_mo_checkColumnConstraints(p_cantidad_mo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad_mo LIKE prtb00012.cantidad_mo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00012_cantidad_mo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00012.precio_mo" column
-#+
-#+ @param p_precio_mo - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00012_precio_mo_checkColumnConstraints(p_precio_mo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_precio_mo LIKE prtb00012.precio_mo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00012_precio_mo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00012.transporte" column
-#+
-#+ @param p_transporte - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00012_transporte_checkColumnConstraints(p_transporte)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_transporte LIKE prtb00012.transporte
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00012_transporte_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00012.itbis" column
-#+
-#+ @param p_itbis - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00012_itbis_checkColumnConstraints(p_itbis)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_itbis LIKE prtb00012.itbis
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00012_itbis_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00012.ubicacion" column
-#+
-#+ @param p_ubicacion - VARCHAR2(170) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00012_ubicacion_checkColumnConstraints(p_ubicacion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ubicacion LIKE prtb00012.ubicacion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00012_ubicacion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00012.cerrada" column
-#+
-#+ @param p_cerrada - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00012_cerrada_checkColumnConstraints(p_cerrada)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cerrada LIKE prtb00012.cerrada
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00012_cerrada_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00012.fecha_cierre" column
-#+
-#+ @param p_fecha_cierre - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00012_fecha_cierre_checkColumnConstraints(p_fecha_cierre)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_cierre LIKE prtb00012.fecha_cierre
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00012_fecha_cierre_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00012.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00012_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE prtb00012.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00012_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00012.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00012_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE prtb00012.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00012_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00012.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00012_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE prtb00012.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00012_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00012.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00012_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE prtb00012.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00012_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00012.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00012_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE prtb00012.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00012_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00012.observacion" column
-#+
-#+ @param p_observacion - CHAR(100) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00012_observacion_checkColumnConstraints(p_observacion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_observacion LIKE prtb00012.observacion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00012_observacion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00012.nombre_file2" column
-#+
-#+ @param p_nombre_file2 - CHAR(100) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00012_nombre_file2_checkColumnConstraints(p_nombre_file2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombre_file2 LIKE prtb00012.nombre_file2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00012_nombre_file2_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00011" table
-#+
-#+ @param p_data - a row data LIKE prtb00011.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00011_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE prtb00011.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_prtb00011_cotiza_no_checkColumnConstraints(p_data.cotiza_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00011_cot_n_checkColumnConstraints(p_data.cot_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00011_cot_grupo_checkColumnConstraints(p_data.cot_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00011_cot_tipo_checkColumnConstraints(p_data.cot_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00011_cot_sec_checkColumnConstraints(p_data.cot_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00011_precio_checkColumnConstraints(p_data.precio) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00011_porc_desc_checkColumnConstraints(p_data.porc_desc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00011_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00011_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00011_us_month_checkColumnConstraints(p_data.us_month) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00011_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00011_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00011_checkTableConstraints
-
-{}
-#+ Check constraints on the "prtb00011.cotiza_no" column
-#+
-#+ @param p_cotiza_no - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00011_cotiza_no_checkColumnConstraints(p_cotiza_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cotiza_no LIKE prtb00011.cotiza_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00011_cotiza_no_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00011.cot_n" column
-#+
-#+ @param p_cot_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00011_cot_n_checkColumnConstraints(p_cot_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cot_n LIKE prtb00011.cot_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00011_cot_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00011.cot_grupo" column
-#+
-#+ @param p_cot_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00011_cot_grupo_checkColumnConstraints(p_cot_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cot_grupo LIKE prtb00011.cot_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00011_cot_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00011.cot_tipo" column
-#+
-#+ @param p_cot_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00011_cot_tipo_checkColumnConstraints(p_cot_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cot_tipo LIKE prtb00011.cot_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00011_cot_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00011.cot_sec" column
-#+
-#+ @param p_cot_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00011_cot_sec_checkColumnConstraints(p_cot_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cot_sec LIKE prtb00011.cot_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00011_cot_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00011.precio" column
-#+
-#+ @param p_precio - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00011_precio_checkColumnConstraints(p_precio)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_precio LIKE prtb00011.precio
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00011_precio_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00011.porc_desc" column
-#+
-#+ @param p_porc_desc - DECIMAL(8,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00011_porc_desc_checkColumnConstraints(p_porc_desc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_porc_desc LIKE prtb00011.porc_desc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00011_porc_desc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00011.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00011_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE prtb00011.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00011_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00011.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00011_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE prtb00011.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00011_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00011.us_month" column
-#+
-#+ @param p_us_month - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00011_us_month_checkColumnConstraints(p_us_month)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_month LIKE prtb00011.us_month
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00011_us_month_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00011.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00011_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE prtb00011.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00011_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00011.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00011_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE prtb00011.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00011_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00010" table
-#+
-#+ @param p_data - a row data LIKE prtb00010.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00010_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE prtb00010.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_prtb00010_cotiza_no_checkColumnConstraints(p_data.cotiza_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00010_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00010_tipo_cliente_checkColumnConstraints(p_data.tipo_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00010_sec_cliente_checkColumnConstraints(p_data.sec_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00010_obra_checkColumnConstraints(p_data.obra) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00010_atencion_checkColumnConstraints(p_data.atencion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00010_cond_pago_checkColumnConstraints(p_data.cond_pago) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00010_sec_vent_checkColumnConstraints(p_data.sec_vent) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00010_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00010_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00010_us_month_checkColumnConstraints(p_data.us_month) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00010_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00010_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00010_checkTableConstraints
-
-{}
-#+ Check constraints on the "prtb00010.cotiza_no" column
-#+
-#+ @param p_cotiza_no - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00010_cotiza_no_checkColumnConstraints(p_cotiza_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cotiza_no LIKE prtb00010.cotiza_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00010_cotiza_no_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00010.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00010_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE prtb00010.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00010_fecha_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00010.tipo_cliente" column
-#+
-#+ @param p_tipo_cliente - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00010_tipo_cliente_checkColumnConstraints(p_tipo_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_cliente LIKE prtb00010.tipo_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00010_tipo_cliente_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00010.sec_cliente" column
-#+
-#+ @param p_sec_cliente - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00010_sec_cliente_checkColumnConstraints(p_sec_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_cliente LIKE prtb00010.sec_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00010_sec_cliente_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00010.obra" column
-#+
-#+ @param p_obra - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00010_obra_checkColumnConstraints(p_obra)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_obra LIKE prtb00010.obra
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00010_obra_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00010.atencion" column
-#+
-#+ @param p_atencion - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00010_atencion_checkColumnConstraints(p_atencion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_atencion LIKE prtb00010.atencion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00010_atencion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00010.cond_pago" column
-#+
-#+ @param p_cond_pago - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00010_cond_pago_checkColumnConstraints(p_cond_pago)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cond_pago LIKE prtb00010.cond_pago
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00010_cond_pago_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00010.sec_vent" column
-#+
-#+ @param p_sec_vent - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00010_sec_vent_checkColumnConstraints(p_sec_vent)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_vent LIKE prtb00010.sec_vent
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00010_sec_vent_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00010.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00010_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE prtb00010.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00010_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00010.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00010_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE prtb00010.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00010_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00010.us_month" column
-#+
-#+ @param p_us_month - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00010_us_month_checkColumnConstraints(p_us_month)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_month LIKE prtb00010.us_month
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00010_us_month_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00010.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00010_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE prtb00010.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00010_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00010.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00010_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE prtb00010.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00010_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00009" table
-#+
-#+ @param p_data - a row data LIKE prtb00009.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00009_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE prtb00009.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_prtb00009_num_oc_checkColumnConstraints(p_data.num_oc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00009_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00009_fecha_fabricacion_checkColumnConstraints(p_data.fecha_fabricacion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00009_pendiente_checkColumnConstraints(p_data.pendiente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00009_detalle_checkColumnConstraints(p_data.detalle) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00009_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00009_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00009_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00009_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00009_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00009_checkTableConstraints
-
-{}
-#+ Check constraints on the "prtb00009.num_oc" column
-#+
-#+ @param p_num_oc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00009_num_oc_checkColumnConstraints(p_num_oc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_oc LIKE prtb00009.num_oc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00009_num_oc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00009.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00009_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE prtb00009.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00009_fecha_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00009.fecha_fabricacion" column
-#+
-#+ @param p_fecha_fabricacion - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00009_fecha_fabricacion_checkColumnConstraints(p_fecha_fabricacion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_fabricacion LIKE prtb00009.fecha_fabricacion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00009_fecha_fabricacion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00009.pendiente" column
-#+
-#+ @param p_pendiente - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00009_pendiente_checkColumnConstraints(p_pendiente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_pendiente LIKE prtb00009.pendiente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00009_pendiente_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00009.detalle" column
-#+
-#+ @param p_detalle - CHAR(300) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00009_detalle_checkColumnConstraints(p_detalle)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_detalle LIKE prtb00009.detalle
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00009_detalle_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00009.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00009_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE prtb00009.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00009_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00009.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00009_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE prtb00009.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00009_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00009.fech_crea" column
-#+
-#+ @param p_fech_crea - VARCHAR2(27) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00009_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE prtb00009.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00009_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00009.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00009_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE prtb00009.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00009_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00009.fech_mod" column
-#+
-#+ @param p_fech_mod - VARCHAR2(27) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00009_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE prtb00009.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00009_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00008" table
-#+
-#+ @param p_data - a row data LIKE prtb00008.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00008_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE prtb00008.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_prtb00008_num_oc_checkColumnConstraints(p_data.num_oc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00008_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00008_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00008_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00008_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00008_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00008_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00008_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00008_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00008_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00008_checkTableConstraints
-
-{}
-#+ Check constraints on the "prtb00008.num_oc" column
-#+
-#+ @param p_num_oc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00008_num_oc_checkColumnConstraints(p_num_oc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_oc LIKE prtb00008.num_oc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_num_oc IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- num_oc: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00008_num_oc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00008.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00008_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE prtb00008.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_n IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_n: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00008_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00008.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00008_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE prtb00008.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_grupo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_grupo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00008_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00008.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00008_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE prtb00008.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_tipo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_tipo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00008_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00008.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00008_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE prtb00008.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_sec IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_sec: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00008_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00008.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(12,3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00008_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE prtb00008.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00008_cantidad_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00008.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00008_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE prtb00008.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00008_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00008.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00008_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE prtb00008.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00008_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00008.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00008_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE prtb00008.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00008_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00008.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00008_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE prtb00008.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00008_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00007" table
-#+
-#+ @param p_data - a row data LIKE prtb00007.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00007_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE prtb00007.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_prtb00007_num_oc_checkColumnConstraints(p_data.num_oc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00007_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00007_fecha_termina_checkColumnConstraints(p_data.fecha_termina) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00007_tipo_cliente_checkColumnConstraints(p_data.tipo_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00007_sec_cliente_checkColumnConstraints(p_data.sec_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00007_sec_vend_checkColumnConstraints(p_data.sec_vend) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00007_orden_pedido_checkColumnConstraints(p_data.orden_pedido) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00007_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00007_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00007_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00007_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00007_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00007_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00007_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00007_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00007_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00007_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00007_checkTableConstraints
-
-{}
-#+ Check constraints on the "prtb00007.num_oc" column
-#+
-#+ @param p_num_oc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00007_num_oc_checkColumnConstraints(p_num_oc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_oc LIKE prtb00007.num_oc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_num_oc IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- num_oc: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00007_num_oc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00007.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00007_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE prtb00007.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_fecha IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- fecha: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00007_fecha_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00007.fecha_termina" column
-#+
-#+ @param p_fecha_termina - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00007_fecha_termina_checkColumnConstraints(p_fecha_termina)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_termina LIKE prtb00007.fecha_termina
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00007_fecha_termina_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00007.tipo_cliente" column
-#+
-#+ @param p_tipo_cliente - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00007_tipo_cliente_checkColumnConstraints(p_tipo_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_cliente LIKE prtb00007.tipo_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_tipo_cliente IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- tipo_cliente: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00007_tipo_cliente_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00007.sec_cliente" column
-#+
-#+ @param p_sec_cliente - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00007_sec_cliente_checkColumnConstraints(p_sec_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_cliente LIKE prtb00007.sec_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_sec_cliente IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- sec_cliente: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00007_sec_cliente_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00007.sec_vend" column
-#+
-#+ @param p_sec_vend - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00007_sec_vend_checkColumnConstraints(p_sec_vend)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_vend LIKE prtb00007.sec_vend
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00007_sec_vend_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00007.orden_pedido" column
-#+
-#+ @param p_orden_pedido - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00007_orden_pedido_checkColumnConstraints(p_orden_pedido)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_orden_pedido LIKE prtb00007.orden_pedido
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00007_orden_pedido_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00007.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00007_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE prtb00007.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00007_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00007.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00007_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE prtb00007.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00007_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00007.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00007_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE prtb00007.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00007_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00007.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00007_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE prtb00007.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00007_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00007.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(12,3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00007_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE prtb00007.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00007_cantidad_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00007.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00007_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE prtb00007.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00007_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00007.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00007_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE prtb00007.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00007_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00007.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00007_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE prtb00007.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00007_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00007.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00007_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE prtb00007.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00007_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00007.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00007_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE prtb00007.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00007_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00006" table
-#+
-#+ @param p_data - a row data LIKE prtb00006.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00006_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE prtb00006.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_prtb00006_cod_prod_checkColumnConstraints(p_data.cod_prod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00006_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00006_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00006_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00006_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00006_fact_conv_checkColumnConstraints(p_data.fact_conv) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00006_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00006_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00006_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00006_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00006_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00006_checkTableConstraints
-
-{}
-#+ Check constraints on the "prtb00006.cod_prod" column
-#+
-#+ @param p_cod_prod - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00006_cod_prod_checkColumnConstraints(p_cod_prod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_prod LIKE prtb00006.cod_prod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00006_cod_prod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00006.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00006_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE prtb00006.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00006_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00006.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00006_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE prtb00006.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00006_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00006.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00006_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE prtb00006.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00006_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00006.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00006_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE prtb00006.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00006_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00006.fact_conv" column
-#+
-#+ @param p_fact_conv - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00006_fact_conv_checkColumnConstraints(p_fact_conv)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fact_conv LIKE prtb00006.fact_conv
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00006_fact_conv_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00006.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00006_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE prtb00006.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00006_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00006.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00006_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE prtb00006.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00006_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00006.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00006_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE prtb00006.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00006_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00006.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00006_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE prtb00006.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00006_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00006.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00006_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE prtb00006.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00006_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00005" table
-#+
-#+ @param p_data - a row data LIKE prtb00005.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00005_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE prtb00005.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_prtb00005_codigo_checkColumnConstraints(p_data.codigo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00005_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00005_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00005_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00005_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00005_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00005_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00005_checkTableConstraints
-
-{}
-#+ Check constraints on the "prtb00005.codigo" column
-#+
-#+ @param p_codigo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00005_codigo_checkColumnConstraints(p_codigo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codigo LIKE prtb00005.codigo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00005_codigo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00005.descripcion" column
-#+
-#+ @param p_descripcion - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00005_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE prtb00005.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00005_descripcion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00005.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00005_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE prtb00005.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00005_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00005.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00005_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE prtb00005.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00005_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00005.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00005_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE prtb00005.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00005_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00005.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00005_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE prtb00005.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00005_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00005.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00005_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE prtb00005.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00005_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00004" table
-#+
-#+ @param p_data - a row data LIKE prtb00004.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00004_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE prtb00004.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_prtb00004_tipo_checkColumnConstraints(p_data.tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00004_departamento_checkColumnConstraints(p_data.departamento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00004_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00004_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00004_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00004_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00004_checkTableConstraints
-
-{}
-#+ Check constraints on the "prtb00004.tipo" column
-#+
-#+ @param p_tipo - CHAR(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00004_tipo_checkColumnConstraints(p_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo LIKE prtb00004.tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00004_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00004.departamento" column
-#+
-#+ @param p_departamento - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00004_departamento_checkColumnConstraints(p_departamento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_departamento LIKE prtb00004.departamento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00004_departamento_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00004.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00004_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE prtb00004.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00004_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00004.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00004_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE prtb00004.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00004_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00004.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00004_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE prtb00004.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00004_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00004.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00004_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE prtb00004.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00004_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00003" table
-#+
-#+ @param p_data - a row data LIKE prtb00003.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00003_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE prtb00003.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_prtb00003_num_semana_checkColumnConstraints(p_data.num_semana) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00003_departamento_checkColumnConstraints(p_data.departamento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00003_num_emp_checkColumnConstraints(p_data.num_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00003_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00003_hn_ind_checkColumnConstraints(p_data.hn_ind) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00003_he_ind_checkColumnConstraints(p_data.he_ind) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00003_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00003_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00003_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00003_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00003_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00003_checkTableConstraints
-
-{}
-#+ Check constraints on the "prtb00003.num_semana" column
-#+
-#+ @param p_num_semana - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00003_num_semana_checkColumnConstraints(p_num_semana)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_semana LIKE prtb00003.num_semana
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00003_num_semana_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00003.departamento" column
-#+
-#+ @param p_departamento - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00003_departamento_checkColumnConstraints(p_departamento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_departamento LIKE prtb00003.departamento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00003_departamento_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00003.num_emp" column
-#+
-#+ @param p_num_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00003_num_emp_checkColumnConstraints(p_num_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_emp LIKE prtb00003.num_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00003_num_emp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00003.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00003_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE prtb00003.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00003_fecha_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00003.hn_ind" column
-#+
-#+ @param p_hn_ind - DECIMAL(5,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00003_hn_ind_checkColumnConstraints(p_hn_ind)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_hn_ind LIKE prtb00003.hn_ind
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00003_hn_ind_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00003.he_ind" column
-#+
-#+ @param p_he_ind - DECIMAL(5,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00003_he_ind_checkColumnConstraints(p_he_ind)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_he_ind LIKE prtb00003.he_ind
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00003_he_ind_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00003.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00003_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE prtb00003.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00003_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00003.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00003_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE prtb00003.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00003_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00003.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00003_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE prtb00003.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00003_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00003.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00003_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE prtb00003.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00003_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00003.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00003_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE prtb00003.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00003_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00002" table
-#+
-#+ @param p_data - a row data LIKE prtb00002.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00002_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE prtb00002.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_prtb00002_num_semana_checkColumnConstraints(p_data.num_semana) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00002_ano_checkColumnConstraints(p_data.ano) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00002_mes_checkColumnConstraints(p_data.mes) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00002_semana_del_checkColumnConstraints(p_data.semana_del) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00002_semana_al_checkColumnConstraints(p_data.semana_al) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00002_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00002_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00002_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00002_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00002_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00002_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00002_checkTableConstraints
-
-{}
-#+ Check constraints on the "prtb00002.num_semana" column
-#+
-#+ @param p_num_semana - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00002_num_semana_checkColumnConstraints(p_num_semana)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_semana LIKE prtb00002.num_semana
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00002_num_semana_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00002.ano" column
-#+
-#+ @param p_ano - CHAR(4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00002_ano_checkColumnConstraints(p_ano)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ano LIKE prtb00002.ano
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00002_ano_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00002.mes" column
-#+
-#+ @param p_mes - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00002_mes_checkColumnConstraints(p_mes)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mes LIKE prtb00002.mes
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00002_mes_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00002.semana_del" column
-#+
-#+ @param p_semana_del - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00002_semana_del_checkColumnConstraints(p_semana_del)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_semana_del LIKE prtb00002.semana_del
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00002_semana_del_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00002.semana_al" column
-#+
-#+ @param p_semana_al - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00002_semana_al_checkColumnConstraints(p_semana_al)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_semana_al LIKE prtb00002.semana_al
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00002_semana_al_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00002.descripcion" column
-#+
-#+ @param p_descripcion - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00002_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE prtb00002.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00002_descripcion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00002.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00002_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE prtb00002.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00002_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00002.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00002_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE prtb00002.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00002_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00002.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00002_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE prtb00002.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00002_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00002.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00002_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE prtb00002.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00002_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00002.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00002_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE prtb00002.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00002_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00001" table
-#+
-#+ @param p_data - a row data LIKE prtb00001.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00001_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE prtb00001.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_prtb00001_ano_checkColumnConstraints(p_data.ano) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00001_mes_checkColumnConstraints(p_data.mes) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00001_tasa_checkColumnConstraints(p_data.tasa) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00001_concepto_checkColumnConstraints(p_data.concepto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00001_checkTableConstraints
-
-{}
-#+ Check constraints on the "prtb00001.ano" column
-#+
-#+ @param p_ano - CHAR(4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00001_ano_checkColumnConstraints(p_ano)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ano LIKE prtb00001.ano
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00001_ano_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00001.mes" column
-#+
-#+ @param p_mes - CHAR(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00001_mes_checkColumnConstraints(p_mes)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mes LIKE prtb00001.mes
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00001_mes_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00001.tasa" column
-#+
-#+ @param p_tasa - DECIMAL(8,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00001_tasa_checkColumnConstraints(p_tasa)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tasa LIKE prtb00001.tasa
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00001_tasa_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prtb00001.concepto" column
-#+
-#+ @param p_concepto - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00001_concepto_checkColumnConstraints(p_concepto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_concepto LIKE prtb00001.concepto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prtb00001_concepto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prordenstatus" table
-#+
-#+ @param p_data - a row data LIKE prordenstatus.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_prordenstatus_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE prordenstatus.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_prordenstatus_fecha_trx_checkColumnConstraints(p_data.fecha_trx) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prordenstatus_num_oc_checkColumnConstraints(p_data.num_oc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prordenstatus_cerrada_checkColumnConstraints(p_data.cerrada) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prordenstatus_fecha_compromiso_checkColumnConstraints(p_data.fecha_compromiso) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prordenstatus_observacion_checkColumnConstraints(p_data.observacion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prordenstatus_usuario_checkColumnConstraints(p_data.usuario) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prordenstatus_checkTableConstraints
-
-{}
-#+ Check constraints on the "prordenstatus.fecha_trx" column
-#+
-#+ @param p_fecha_trx - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prordenstatus_fecha_trx_checkColumnConstraints(p_fecha_trx)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_trx LIKE prordenstatus.fecha_trx
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prordenstatus_fecha_trx_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prordenstatus.num_oc" column
-#+
-#+ @param p_num_oc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prordenstatus_num_oc_checkColumnConstraints(p_num_oc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_oc LIKE prordenstatus.num_oc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prordenstatus_num_oc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prordenstatus.cerrada" column
-#+
-#+ @param p_cerrada - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prordenstatus_cerrada_checkColumnConstraints(p_cerrada)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cerrada LIKE prordenstatus.cerrada
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prordenstatus_cerrada_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prordenstatus.fecha_compromiso" column
-#+
-#+ @param p_fecha_compromiso - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prordenstatus_fecha_compromiso_checkColumnConstraints(p_fecha_compromiso)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_compromiso LIKE prordenstatus.fecha_compromiso
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prordenstatus_fecha_compromiso_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prordenstatus.observacion" column
-#+
-#+ @param p_observacion - VARCHAR2(100) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prordenstatus_observacion_checkColumnConstraints(p_observacion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_observacion LIKE prordenstatus.observacion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prordenstatus_observacion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prordenstatus.usuario" column
-#+
-#+ @param p_usuario - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prordenstatus_usuario_checkColumnConstraints(p_usuario)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_usuario LIKE prordenstatus.usuario
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prordenstatus_usuario_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prordenlog" table
-#+
-#+ @param p_data - a row data LIKE prordenlog.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_prordenlog_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE prordenlog.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_prordenlog_num_oc_checkColumnConstraints(p_data.num_oc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prordenlog_documento_checkColumnConstraints(p_data.documento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prordenlog_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prordenlog_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prordenlog_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prordenlog_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prordenlog_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prordenlog_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prordenlog_cod_mov_checkColumnConstraints(p_data.cod_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prordenlog_cantidad_p_checkColumnConstraints(p_data.cantidad_p) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prordenlog_diferencia_checkColumnConstraints(p_data.diferencia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prordenlog_checkTableConstraints
-
-{}
-#+ Check constraints on the "prordenlog.num_oc" column
-#+
-#+ @param p_num_oc - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prordenlog_num_oc_checkColumnConstraints(p_num_oc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_oc LIKE prordenlog.num_oc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prordenlog_num_oc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prordenlog.documento" column
-#+
-#+ @param p_documento - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prordenlog_documento_checkColumnConstraints(p_documento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_documento LIKE prordenlog.documento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prordenlog_documento_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prordenlog.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prordenlog_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE prordenlog.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prordenlog_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prordenlog.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prordenlog_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE prordenlog.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prordenlog_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prordenlog.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prordenlog_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE prordenlog.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prordenlog_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prordenlog.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prordenlog_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE prordenlog.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prordenlog_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prordenlog.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prordenlog_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE prordenlog.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prordenlog_cantidad_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prordenlog.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prordenlog_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE prordenlog.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prordenlog_fecha_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prordenlog.cod_mov" column
-#+
-#+ @param p_cod_mov - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prordenlog_cod_mov_checkColumnConstraints(p_cod_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mov LIKE prordenlog.cod_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prordenlog_cod_mov_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prordenlog.cantidad_p" column
-#+
-#+ @param p_cantidad_p - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prordenlog_cantidad_p_checkColumnConstraints(p_cantidad_p)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad_p LIKE prordenlog.cantidad_p
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prordenlog_cantidad_p_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prordenlog.diferencia" column
-#+
-#+ @param p_diferencia - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prordenlog_diferencia_checkColumnConstraints(p_diferencia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_diferencia LIKE prordenlog.diferencia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prordenlog_diferencia_checkColumnConstraints
-
-{}
-#+ Check constraints on the "product" table
-#+
-#+ @param p_data - a row data LIKE product.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_product_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE product.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_product_productid_checkColumnConstraints(p_data.productid) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_product_catid_checkColumnConstraints(p_data.catid) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_product_prodname_checkColumnConstraints(p_data.prodname) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_product_proddesc_checkColumnConstraints(p_data.proddesc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_product_prodpic_checkColumnConstraints(p_data.prodpic) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.product_checkTableConstraints
-
-{}
-#+ Check constraints on the "product.productid" column
-#+
-#+ @param p_productid - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_product_productid_checkColumnConstraints(p_productid)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_productid LIKE product.productid
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_productid IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- productid: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.product_productid_checkColumnConstraints
-
-{}
-#+ Check constraints on the "product.catid" column
-#+
-#+ @param p_catid - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_product_catid_checkColumnConstraints(p_catid)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_catid LIKE product.catid
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_catid IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- catid: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.product_catid_checkColumnConstraints
-
-{}
-#+ Check constraints on the "product.prodname" column
-#+
-#+ @param p_prodname - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_product_prodname_checkColumnConstraints(p_prodname)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_prodname LIKE product.prodname
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.product_prodname_checkColumnConstraints
-
-{}
-#+ Check constraints on the "product.proddesc" column
-#+
-#+ @param p_proddesc - CHAR(255) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_product_proddesc_checkColumnConstraints(p_proddesc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_proddesc LIKE product.proddesc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.product_proddesc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "product.prodpic" column
-#+
-#+ @param p_prodpic - CHAR(255) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_product_prodpic_checkColumnConstraints(p_prodpic)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_prodpic LIKE product.prodpic
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.product_prodpic_checkColumnConstraints
-
-{}
-#+ Check constraints on the "preciosc" table
-#+
-#+ @param p_data - a row data LIKE preciosc.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_preciosc_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE preciosc.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_preciosc_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_preciosc_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_preciosc_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_preciosc_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_preciosc_precio_checkColumnConstraints(p_data.precio) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.preciosc_checkTableConstraints
-
-{}
-#+ Check constraints on the "preciosc.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_preciosc_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE preciosc.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.preciosc_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "preciosc.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_preciosc_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE preciosc.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.preciosc_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "preciosc.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_preciosc_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE preciosc.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.preciosc_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "preciosc.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_preciosc_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE preciosc.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.preciosc_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "preciosc.precio" column
-#+
-#+ @param p_precio - DECIMAL(18,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_preciosc_precio_checkColumnConstraints(p_precio)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_precio LIKE preciosc.precio
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.preciosc_precio_checkColumnConstraints
-
-{}
-#+ Check constraints on the "precios" table
-#+
-#+ @param p_data - a row data LIKE precios.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_precios_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE precios.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_precios_ventas_checkColumnConstraints(p_data.ventas) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_precios_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_precios_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_precios_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_precios_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_precios_precios_checkColumnConstraints(p_data.precios) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_precios_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_precios_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.precios_checkTableConstraints
-
-{}
-#+ Check constraints on the "precios.ventas" column
-#+
-#+ @param p_ventas - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_precios_ventas_checkColumnConstraints(p_ventas)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ventas LIKE precios.ventas
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.precios_ventas_checkColumnConstraints
-
-{}
-#+ Check constraints on the "precios.cod_n" column
-#+
-#+ @param p_cod_n - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_precios_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE precios.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.precios_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "precios.cod_grupo" column
-#+
-#+ @param p_cod_grupo - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_precios_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE precios.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.precios_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "precios.cod_tipo" column
-#+
-#+ @param p_cod_tipo - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_precios_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE precios.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.precios_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "precios.cod_sec" column
-#+
-#+ @param p_cod_sec - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_precios_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE precios.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.precios_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "precios.precios" column
-#+
-#+ @param p_precios - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_precios_precios_checkColumnConstraints(p_precios)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_precios LIKE precios.precios
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.precios_precios_checkColumnConstraints
-
-{}
-#+ Check constraints on the "precios.us_crea" column
-#+
-#+ @param p_us_crea - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_precios_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE precios.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.precios_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "precios.descripcion" column
-#+
-#+ @param p_descripcion - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_precios_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE precios.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.precios_descripcion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prdtable" table
-#+
-#+ @param p_data - a row data LIKE prdtable.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_prdtable_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE prdtable.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_prdtable_ano_checkColumnConstraints(p_data.ano) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prdtable_mes_checkColumnConstraints(p_data.mes) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prdtable_fecha_inicio_checkColumnConstraints(p_data.fecha_inicio) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prdtable_fecha_corte_checkColumnConstraints(p_data.fecha_corte) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prdtable_dias_habiles_checkColumnConstraints(p_data.dias_habiles) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prdtable_dias_gracia_checkColumnConstraints(p_data.dias_gracia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prdtable_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prdtable_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prdtable_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prdtable_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prdtable_checkTableConstraints
-
-{}
-#+ Check constraints on the "prdtable.ano" column
-#+
-#+ @param p_ano - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prdtable_ano_checkColumnConstraints(p_ano)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ano LIKE prdtable.ano
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prdtable_ano_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prdtable.mes" column
-#+
-#+ @param p_mes - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prdtable_mes_checkColumnConstraints(p_mes)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mes LIKE prdtable.mes
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prdtable_mes_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prdtable.fecha_inicio" column
-#+
-#+ @param p_fecha_inicio - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prdtable_fecha_inicio_checkColumnConstraints(p_fecha_inicio)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_inicio LIKE prdtable.fecha_inicio
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prdtable_fecha_inicio_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prdtable.fecha_corte" column
-#+
-#+ @param p_fecha_corte - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prdtable_fecha_corte_checkColumnConstraints(p_fecha_corte)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_corte LIKE prdtable.fecha_corte
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prdtable_fecha_corte_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prdtable.dias_habiles" column
-#+
-#+ @param p_dias_habiles - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prdtable_dias_habiles_checkColumnConstraints(p_dias_habiles)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_dias_habiles LIKE prdtable.dias_habiles
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prdtable_dias_habiles_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prdtable.dias_gracia" column
-#+
-#+ @param p_dias_gracia - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prdtable_dias_gracia_checkColumnConstraints(p_dias_gracia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_dias_gracia LIKE prdtable.dias_gracia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prdtable_dias_gracia_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prdtable.us_crea" column
-#+
-#+ @param p_us_crea - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prdtable_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE prdtable.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prdtable_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prdtable.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prdtable_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE prdtable.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prdtable_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prdtable.us_mod" column
-#+
-#+ @param p_us_mod - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prdtable_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE prdtable.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prdtable_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "prdtable.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prdtable_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE prdtable.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.prdtable_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "permisos" table
-#+
-#+ @param p_data - a row data LIKE permisos.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_permisos_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE permisos.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_permisos_cod_perfil_checkColumnConstraints(p_data.cod_perfil) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_permisos_column_1_checkColumnConstraints(p_data.column_1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_permisos_column_2_checkColumnConstraints(p_data.column_2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_permisos_column_3_checkColumnConstraints(p_data.column_3) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.permisos_checkTableConstraints
-
-{}
-#+ Check constraints on the "permisos.cod_perfil" column
-#+
-#+ @param p_cod_perfil - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_permisos_cod_perfil_checkColumnConstraints(p_cod_perfil)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_perfil LIKE permisos.cod_perfil
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.permisos_cod_perfil_checkColumnConstraints
-
-{}
-#+ Check constraints on the "permisos.column_1" column
-#+
-#+ @param p_column_1 - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_permisos_column_1_checkColumnConstraints(p_column_1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_column_1 LIKE permisos.column_1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.permisos_column_1_checkColumnConstraints
-
-{}
-#+ Check constraints on the "permisos.column_2" column
-#+
-#+ @param p_column_2 - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_permisos_column_2_checkColumnConstraints(p_column_2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_column_2 LIKE permisos.column_2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.permisos_column_2_checkColumnConstraints
-
-{}
-#+ Check constraints on the "permisos.column_3" column
-#+
-#+ @param p_column_3 - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_permisos_column_3_checkColumnConstraints(p_column_3)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_column_3 LIKE permisos.column_3
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.permisos_column_3_checkColumnConstraints
-
-{}
-#+ Check constraints on the "pda5" table
-#+
-#+ @param p_data - a row data LIKE pda5.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_pda5_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE pda5.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_pda5_idtrx_checkColumnConstraints(p_data.idtrx) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_pda5_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_pda5_bodega_checkColumnConstraints(p_data.bodega) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_pda5_cod_seccion_checkColumnConstraints(p_data.cod_seccion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_pda5_cod_tramo_checkColumnConstraints(p_data.cod_tramo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_pda5_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_pda5_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_pda5_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_pda5_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_pda5_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_pda5_balance_checkColumnConstraints(p_data.balance) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_pda5_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_pda5_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_pda5_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_pda5_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_pda5_lado_1_checkColumnConstraints(p_data.lado_1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_pda5_lado_2_checkColumnConstraints(p_data.lado_2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_pda5_lado_3_checkColumnConstraints(p_data.lado_3) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.pda5_checkTableConstraints
-
-{}
-#+ Check constraints on the "pda5.idtrx" column
-#+
-#+ @param p_idtrx - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_pda5_idtrx_checkColumnConstraints(p_idtrx)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_idtrx LIKE pda5.idtrx
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.pda5_idtrx_checkColumnConstraints
-
-{}
-#+ Check constraints on the "pda5.fecha" column
-#+
-#+ @param p_fecha - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_pda5_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE pda5.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.pda5_fecha_checkColumnConstraints
-
-{}
-#+ Check constraints on the "pda5.bodega" column
-#+
-#+ @param p_bodega - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_pda5_bodega_checkColumnConstraints(p_bodega)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_bodega LIKE pda5.bodega
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.pda5_bodega_checkColumnConstraints
-
-{}
-#+ Check constraints on the "pda5.cod_seccion" column
-#+
-#+ @param p_cod_seccion - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_pda5_cod_seccion_checkColumnConstraints(p_cod_seccion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_seccion LIKE pda5.cod_seccion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.pda5_cod_seccion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "pda5.cod_tramo" column
-#+
-#+ @param p_cod_tramo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_pda5_cod_tramo_checkColumnConstraints(p_cod_tramo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tramo LIKE pda5.cod_tramo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.pda5_cod_tramo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "pda5.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_pda5_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE pda5.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.pda5_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "pda5.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_pda5_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE pda5.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.pda5_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "pda5.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_pda5_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE pda5.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.pda5_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "pda5.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_pda5_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE pda5.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.pda5_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "pda5.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_pda5_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE pda5.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.pda5_cantidad_checkColumnConstraints
-
-{}
-#+ Check constraints on the "pda5.balance" column
-#+
-#+ @param p_balance - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_pda5_balance_checkColumnConstraints(p_balance)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_balance LIKE pda5.balance
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.pda5_balance_checkColumnConstraints
-
-{}
-#+ Check constraints on the "pda5.us_crea" column
-#+
-#+ @param p_us_crea - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_pda5_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE pda5.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.pda5_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "pda5.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_pda5_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE pda5.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.pda5_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "pda5.us_mod" column
-#+
-#+ @param p_us_mod - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_pda5_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE pda5.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.pda5_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "pda5.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_pda5_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE pda5.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.pda5_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "pda5.lado_1" column
-#+
-#+ @param p_lado_1 - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_pda5_lado_1_checkColumnConstraints(p_lado_1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_lado_1 LIKE pda5.lado_1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.pda5_lado_1_checkColumnConstraints
-
-{}
-#+ Check constraints on the "pda5.lado_2" column
-#+
-#+ @param p_lado_2 - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_pda5_lado_2_checkColumnConstraints(p_lado_2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_lado_2 LIKE pda5.lado_2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.pda5_lado_2_checkColumnConstraints
-
-{}
-#+ Check constraints on the "pda5.lado_3" column
-#+
-#+ @param p_lado_3 - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_pda5_lado_3_checkColumnConstraints(p_lado_3)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_lado_3 LIKE pda5.lado_3
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.pda5_lado_3_checkColumnConstraints
-
-{}
-#+ Check constraints on the "orderstatus" table
-#+
-#+ @param p_data - a row data LIKE orderstatus.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_orderstatus_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE orderstatus.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_orderstatus_orderid_checkColumnConstraints(p_data.orderid) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_orderstatus_linenum_checkColumnConstraints(p_data.linenum) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_orderstatus_mdate_checkColumnConstraints(p_data.mdate) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_orderstatus_status_checkColumnConstraints(p_data.status) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.orderstatus_checkTableConstraints
-
-{}
-#+ Check constraints on the "orderstatus.orderid" column
-#+
-#+ @param p_orderid - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_orderstatus_orderid_checkColumnConstraints(p_orderid)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_orderid LIKE orderstatus.orderid
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_orderid IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- orderid: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.orderstatus_orderid_checkColumnConstraints
-
-{}
-#+ Check constraints on the "orderstatus.linenum" column
-#+
-#+ @param p_linenum - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_orderstatus_linenum_checkColumnConstraints(p_linenum)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_linenum LIKE orderstatus.linenum
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_linenum IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- linenum: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.orderstatus_linenum_checkColumnConstraints
-
-{}
-#+ Check constraints on the "orderstatus.mdate" column
-#+
-#+ @param p_mdate - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_orderstatus_mdate_checkColumnConstraints(p_mdate)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mdate LIKE orderstatus.mdate
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_mdate IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- mdate: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.orderstatus_mdate_checkColumnConstraints
-
-{}
-#+ Check constraints on the "orderstatus.status" column
-#+
-#+ @param p_status - CHAR(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_orderstatus_status_checkColumnConstraints(p_status)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status LIKE orderstatus.status
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_status IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- status: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.orderstatus_status_checkColumnConstraints
-
-{}
-#+ Check constraints on the "orders" table
-#+
-#+ @param p_data - a row data LIKE orders.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_orders_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE orders.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_orders_orderid_checkColumnConstraints(p_data.orderid) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_orders_userid_checkColumnConstraints(p_data.userid) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_orders_orderdate_checkColumnConstraints(p_data.orderdate) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_orders_shipfirstname_checkColumnConstraints(p_data.shipfirstname) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_orders_shiplastname_checkColumnConstraints(p_data.shiplastname) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_orders_shipaddr1_checkColumnConstraints(p_data.shipaddr1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_orders_shipaddr2_checkColumnConstraints(p_data.shipaddr2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_orders_shipcity_checkColumnConstraints(p_data.shipcity) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_orders_shipstate_checkColumnConstraints(p_data.shipstate) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_orders_shipzip_checkColumnConstraints(p_data.shipzip) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_orders_shipcountry_checkColumnConstraints(p_data.shipcountry) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_orders_billfirstname_checkColumnConstraints(p_data.billfirstname) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_orders_billlastname_checkColumnConstraints(p_data.billlastname) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_orders_billaddr1_checkColumnConstraints(p_data.billaddr1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_orders_billaddr2_checkColumnConstraints(p_data.billaddr2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_orders_billcity_checkColumnConstraints(p_data.billcity) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_orders_billstate_checkColumnConstraints(p_data.billstate) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_orders_billzip_checkColumnConstraints(p_data.billzip) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_orders_billcountry_checkColumnConstraints(p_data.billcountry) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_orders_totalprice_checkColumnConstraints(p_data.totalprice) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_orders_creditcard_checkColumnConstraints(p_data.creditcard) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_orders_exprdate_checkColumnConstraints(p_data.exprdate) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_orders_cardtype_checkColumnConstraints(p_data.cardtype) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_orders_sourceapp_checkColumnConstraints(p_data.sourceapp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.orders_checkTableConstraints
-
-{}
-#+ Check constraints on the "orders.orderid" column
-#+
-#+ @param p_orderid - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_orders_orderid_checkColumnConstraints(p_orderid)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_orderid LIKE orders.orderid
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_orderid IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- orderid: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.orders_orderid_checkColumnConstraints
-
-{}
-#+ Check constraints on the "orders.userid" column
-#+
-#+ @param p_userid - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_orders_userid_checkColumnConstraints(p_userid)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_userid LIKE orders.userid
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_userid IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- userid: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.orders_userid_checkColumnConstraints
-
-{}
-#+ Check constraints on the "orders.orderdate" column
-#+
-#+ @param p_orderdate - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_orders_orderdate_checkColumnConstraints(p_orderdate)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_orderdate LIKE orders.orderdate
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_orderdate IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- orderdate: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.orders_orderdate_checkColumnConstraints
-
-{}
-#+ Check constraints on the "orders.shipfirstname" column
-#+
-#+ @param p_shipfirstname - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_orders_shipfirstname_checkColumnConstraints(p_shipfirstname)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_shipfirstname LIKE orders.shipfirstname
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_shipfirstname IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- shipfirstname: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.orders_shipfirstname_checkColumnConstraints
-
-{}
-#+ Check constraints on the "orders.shiplastname" column
-#+
-#+ @param p_shiplastname - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_orders_shiplastname_checkColumnConstraints(p_shiplastname)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_shiplastname LIKE orders.shiplastname
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_shiplastname IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- shiplastname: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.orders_shiplastname_checkColumnConstraints
-
-{}
-#+ Check constraints on the "orders.shipaddr1" column
-#+
-#+ @param p_shipaddr1 - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_orders_shipaddr1_checkColumnConstraints(p_shipaddr1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_shipaddr1 LIKE orders.shipaddr1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_shipaddr1 IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- shipaddr1: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.orders_shipaddr1_checkColumnConstraints
-
-{}
-#+ Check constraints on the "orders.shipaddr2" column
-#+
-#+ @param p_shipaddr2 - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_orders_shipaddr2_checkColumnConstraints(p_shipaddr2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_shipaddr2 LIKE orders.shipaddr2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.orders_shipaddr2_checkColumnConstraints
-
-{}
-#+ Check constraints on the "orders.shipcity" column
-#+
-#+ @param p_shipcity - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_orders_shipcity_checkColumnConstraints(p_shipcity)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_shipcity LIKE orders.shipcity
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_shipcity IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- shipcity: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.orders_shipcity_checkColumnConstraints
-
-{}
-#+ Check constraints on the "orders.shipstate" column
-#+
-#+ @param p_shipstate - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_orders_shipstate_checkColumnConstraints(p_shipstate)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_shipstate LIKE orders.shipstate
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.orders_shipstate_checkColumnConstraints
-
-{}
-#+ Check constraints on the "orders.shipzip" column
-#+
-#+ @param p_shipzip - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_orders_shipzip_checkColumnConstraints(p_shipzip)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_shipzip LIKE orders.shipzip
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_shipzip IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- shipzip: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.orders_shipzip_checkColumnConstraints
-
-{}
-#+ Check constraints on the "orders.shipcountry" column
-#+
-#+ @param p_shipcountry - CHAR(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_orders_shipcountry_checkColumnConstraints(p_shipcountry)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_shipcountry LIKE orders.shipcountry
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_shipcountry IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- shipcountry: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.orders_shipcountry_checkColumnConstraints
-
-{}
-#+ Check constraints on the "orders.billfirstname" column
-#+
-#+ @param p_billfirstname - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_orders_billfirstname_checkColumnConstraints(p_billfirstname)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_billfirstname LIKE orders.billfirstname
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_billfirstname IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- billfirstname: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.orders_billfirstname_checkColumnConstraints
-
-{}
-#+ Check constraints on the "orders.billlastname" column
-#+
-#+ @param p_billlastname - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_orders_billlastname_checkColumnConstraints(p_billlastname)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_billlastname LIKE orders.billlastname
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_billlastname IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- billlastname: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.orders_billlastname_checkColumnConstraints
-
-{}
-#+ Check constraints on the "orders.billaddr1" column
-#+
-#+ @param p_billaddr1 - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_orders_billaddr1_checkColumnConstraints(p_billaddr1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_billaddr1 LIKE orders.billaddr1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_billaddr1 IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- billaddr1: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.orders_billaddr1_checkColumnConstraints
-
-{}
-#+ Check constraints on the "orders.billaddr2" column
-#+
-#+ @param p_billaddr2 - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_orders_billaddr2_checkColumnConstraints(p_billaddr2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_billaddr2 LIKE orders.billaddr2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.orders_billaddr2_checkColumnConstraints
-
-{}
-#+ Check constraints on the "orders.billcity" column
-#+
-#+ @param p_billcity - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_orders_billcity_checkColumnConstraints(p_billcity)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_billcity LIKE orders.billcity
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_billcity IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- billcity: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.orders_billcity_checkColumnConstraints
-
-{}
-#+ Check constraints on the "orders.billstate" column
-#+
-#+ @param p_billstate - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_orders_billstate_checkColumnConstraints(p_billstate)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_billstate LIKE orders.billstate
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.orders_billstate_checkColumnConstraints
-
-{}
-#+ Check constraints on the "orders.billzip" column
-#+
-#+ @param p_billzip - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_orders_billzip_checkColumnConstraints(p_billzip)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_billzip LIKE orders.billzip
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_billzip IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- billzip: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.orders_billzip_checkColumnConstraints
-
-{}
-#+ Check constraints on the "orders.billcountry" column
-#+
-#+ @param p_billcountry - CHAR(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_orders_billcountry_checkColumnConstraints(p_billcountry)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_billcountry LIKE orders.billcountry
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_billcountry IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- billcountry: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.orders_billcountry_checkColumnConstraints
-
-{}
-#+ Check constraints on the "orders.totalprice" column
-#+
-#+ @param p_totalprice - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_orders_totalprice_checkColumnConstraints(p_totalprice)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_totalprice LIKE orders.totalprice
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_totalprice IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- totalprice: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.orders_totalprice_checkColumnConstraints
-
-{}
-#+ Check constraints on the "orders.creditcard" column
-#+
-#+ @param p_creditcard - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_orders_creditcard_checkColumnConstraints(p_creditcard)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_creditcard LIKE orders.creditcard
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.orders_creditcard_checkColumnConstraints
-
-{}
-#+ Check constraints on the "orders.exprdate" column
-#+
-#+ @param p_exprdate - CHAR(7) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_orders_exprdate_checkColumnConstraints(p_exprdate)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_exprdate LIKE orders.exprdate
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.orders_exprdate_checkColumnConstraints
-
-{}
-#+ Check constraints on the "orders.cardtype" column
-#+
-#+ @param p_cardtype - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_orders_cardtype_checkColumnConstraints(p_cardtype)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cardtype LIKE orders.cardtype
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.orders_cardtype_checkColumnConstraints
-
-{}
-#+ Check constraints on the "orders.sourceapp" column
-#+
-#+ @param p_sourceapp - CHAR(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_orders_sourceapp_checkColumnConstraints(p_sourceapp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sourceapp LIKE orders.sourceapp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_sourceapp IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- sourceapp: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.orders_sourceapp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ntb00005" table
-#+
-#+ @param p_data - a row data LIKE ntb00005.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_ntb00005_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE ntb00005.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_ntb00005_cod_mov_checkColumnConstraints(p_data.cod_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ntb00005_descrip_mov_checkColumnConstraints(p_data.descrip_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ntb00005_status_mov_checkColumnConstraints(p_data.status_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ntb00005_cuenta_1_checkColumnConstraints(p_data.cuenta_1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ntb00005_cuenta_2_checkColumnConstraints(p_data.cuenta_2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ntb00005_cuenta_3_checkColumnConstraints(p_data.cuenta_3) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ntb00005_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ntb00005_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ntb00005_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ntb00005_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ntb00005_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ntb00005_checkTableConstraints
-
-{}
-#+ Check constraints on the "ntb00005.cod_mov" column
-#+
-#+ @param p_cod_mov - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ntb00005_cod_mov_checkColumnConstraints(p_cod_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mov LIKE ntb00005.cod_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_mov IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_mov: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ntb00005_cod_mov_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ntb00005.descrip_mov" column
-#+
-#+ @param p_descrip_mov - VARCHAR2(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ntb00005_descrip_mov_checkColumnConstraints(p_descrip_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descrip_mov LIKE ntb00005.descrip_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ntb00005_descrip_mov_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ntb00005.status_mov" column
-#+
-#+ @param p_status_mov - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ntb00005_status_mov_checkColumnConstraints(p_status_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_mov LIKE ntb00005.status_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ntb00005_status_mov_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ntb00005.cuenta_1" column
-#+
-#+ @param p_cuenta_1 - VARCHAR2(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ntb00005_cuenta_1_checkColumnConstraints(p_cuenta_1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cuenta_1 LIKE ntb00005.cuenta_1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ntb00005_cuenta_1_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ntb00005.cuenta_2" column
-#+
-#+ @param p_cuenta_2 - VARCHAR2(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ntb00005_cuenta_2_checkColumnConstraints(p_cuenta_2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cuenta_2 LIKE ntb00005.cuenta_2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ntb00005_cuenta_2_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ntb00005.cuenta_3" column
-#+
-#+ @param p_cuenta_3 - VARCHAR2(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ntb00005_cuenta_3_checkColumnConstraints(p_cuenta_3)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cuenta_3 LIKE ntb00005.cuenta_3
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ntb00005_cuenta_3_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ntb00005.status_t" column
-#+
-#+ @param p_status_t - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ntb00005_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE ntb00005.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ntb00005_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ntb00005.us_crea" column
-#+
-#+ @param p_us_crea - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ntb00005_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE ntb00005.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ntb00005_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ntb00005.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ntb00005_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE ntb00005.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ntb00005_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ntb00005.us_mod" column
-#+
-#+ @param p_us_mod - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ntb00005_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE ntb00005.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ntb00005_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ntb00005.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ntb00005_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE ntb00005.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ntb00005_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notbingresos" table
-#+
-#+ @param p_data - a row data LIKE notbingresos.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_notbingresos_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE notbingresos.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_notbingresos_num_emp_checkColumnConstraints(p_data.num_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notbingresos_monto_checkColumnConstraints(p_data.monto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notbingresos_checkTableConstraints
-
-{}
-#+ Check constraints on the "notbingresos.num_emp" column
-#+
-#+ @param p_num_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notbingresos_num_emp_checkColumnConstraints(p_num_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_emp LIKE notbingresos.num_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notbingresos_num_emp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notbingresos.monto" column
-#+
-#+ @param p_monto - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notbingresos_monto_checkColumnConstraints(p_monto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_monto LIKE notbingresos.monto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notbingresos_monto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notbcuenta" table
-#+
-#+ @param p_data - a row data LIKE notbcuenta.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_notbcuenta_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE notbcuenta.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_notbcuenta_num_emp_checkColumnConstraints(p_data.num_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notbcuenta_cuenta_no_checkColumnConstraints(p_data.cuenta_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notbcuenta_valor_checkColumnConstraints(p_data.valor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notbcuenta_checkTableConstraints
-
-{}
-#+ Check constraints on the "notbcuenta.num_emp" column
-#+
-#+ @param p_num_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notbcuenta_num_emp_checkColumnConstraints(p_num_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_emp LIKE notbcuenta.num_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notbcuenta_num_emp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notbcuenta.cuenta_no" column
-#+
-#+ @param p_cuenta_no - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notbcuenta_cuenta_no_checkColumnConstraints(p_cuenta_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cuenta_no LIKE notbcuenta.cuenta_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notbcuenta_cuenta_no_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notbcuenta.valor" column
-#+
-#+ @param p_valor - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notbcuenta_valor_checkColumnConstraints(p_valor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valor LIKE notbcuenta.valor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notbcuenta_valor_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb03" table
-#+
-#+ @param p_data - a row data LIKE notb03.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb03_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE notb03.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_notb03_num_emp_checkColumnConstraints(p_data.num_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb03_departamento_checkColumnConstraints(p_data.departamento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb03_nivel_emp_checkColumnConstraints(p_data.nivel_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb03_cod_puesto_checkColumnConstraints(p_data.cod_puesto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb03_cod_mov_checkColumnConstraints(p_data.cod_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb03_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb03_valor_checkColumnConstraints(p_data.valor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb03_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb03_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb03_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb03_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb03_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- CALL smarmotech_dbxconstraints_notb03_pk_notb003_checkUniqueConstraint(p_forUpdate, p_data.num_emp, p_data.cod_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb03_checkTableConstraints
-
-{}
-#+ Check the primary key uniqueness constraint on the "notb03"
-#+
-#+ @param p_key - Primary Key
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb03_pk_notb003_checkUniqueConstraint(p_forUpdate, p_key)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_key
- RECORD
- notb03_num_emp LIKE notb03.num_emp,
- notb03_cod_mov LIKE notb03.cod_mov
- END RECORD
- DEFINE l_key
- RECORD
- notb03_num_emp LIKE notb03.num_emp,
- notb03_cod_mov LIKE notb03.cod_mov
- END RECORD
- DEFINE l_where STRING
- DEFINE l_sqlQuery STRING
- DEFINE l_count INTEGER
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- LET l_where = "WHERE notb03.num_emp = ?
- AND notb03.cod_mov = ? "
-
- let l_sqlQuery = "SELECT COUNT(*), num_emp, cod_mov FROM notb03 ", l_where, " GROUP BY num_emp, cod_mov"
-
- PREPARE cur_notb03_pk_notb003_checkUniqueConstraint FROM l_sqlQuery
- EXECUTE cur_notb03_pk_notb003_checkUniqueConstraint INTO l_count, l_key.* USING p_key.*
- FREE cur_notb03_pk_notb003_checkUniqueConstraint
- IF (NOT p_forUpdate AND l_count > 0) OR (p_forUpdate AND l_count > 0 AND p_key.* != l_key.*) THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- num_emp + cod_mov: " || ERROR_BAM_00002) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb03_pk_notb003_checkUniqueConstraint
-
-{}
-#+ Check constraints on the "notb03.num_emp" column
-#+
-#+ @param p_num_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb03_num_emp_checkColumnConstraints(p_num_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_emp LIKE notb03.num_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_num_emp IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- num_emp: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb03_num_emp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb03.departamento" column
-#+
-#+ @param p_departamento - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb03_departamento_checkColumnConstraints(p_departamento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_departamento LIKE notb03.departamento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb03_departamento_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb03.nivel_emp" column
-#+
-#+ @param p_nivel_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb03_nivel_emp_checkColumnConstraints(p_nivel_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nivel_emp LIKE notb03.nivel_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb03_nivel_emp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb03.cod_puesto" column
-#+
-#+ @param p_cod_puesto - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb03_cod_puesto_checkColumnConstraints(p_cod_puesto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_puesto LIKE notb03.cod_puesto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb03_cod_puesto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb03.cod_mov" column
-#+
-#+ @param p_cod_mov - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb03_cod_mov_checkColumnConstraints(p_cod_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mov LIKE notb03.cod_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_mov IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_mov: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb03_cod_mov_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb03.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb03_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE notb03.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb03_cantidad_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb03.valor" column
-#+
-#+ @param p_valor - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb03_valor_checkColumnConstraints(p_valor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valor LIKE notb03.valor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb03_valor_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb03.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb03_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE notb03.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb03_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb03.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb03_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE notb03.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb03_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb03.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb03_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE notb03.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb03_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb03.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb03_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE notb03.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb03_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb03.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb03_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE notb03.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb03_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb0019" table
-#+
-#+ @param p_data - a row data LIKE notb0019.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb0019_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE notb0019.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_notb0019_num_nomi_checkColumnConstraints(p_data.num_nomi) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb0019_tipo_emp_checkColumnConstraints(p_data.tipo_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb0019_cheque_no_ini_checkColumnConstraints(p_data.cheque_no_ini) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb0019_cheque_no_fin_checkColumnConstraints(p_data.cheque_no_fin) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb0019_cuenta_no_checkColumnConstraints(p_data.cuenta_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb0019_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb0019_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb0019_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb0019_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb0019_checkTableConstraints
-
-{}
-#+ Check constraints on the "notb0019.num_nomi" column
-#+
-#+ @param p_num_nomi - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb0019_num_nomi_checkColumnConstraints(p_num_nomi)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_nomi LIKE notb0019.num_nomi
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb0019_num_nomi_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb0019.tipo_emp" column
-#+
-#+ @param p_tipo_emp - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb0019_tipo_emp_checkColumnConstraints(p_tipo_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_emp LIKE notb0019.tipo_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb0019_tipo_emp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb0019.cheque_no_ini" column
-#+
-#+ @param p_cheque_no_ini - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb0019_cheque_no_ini_checkColumnConstraints(p_cheque_no_ini)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cheque_no_ini LIKE notb0019.cheque_no_ini
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb0019_cheque_no_ini_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb0019.cheque_no_fin" column
-#+
-#+ @param p_cheque_no_fin - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb0019_cheque_no_fin_checkColumnConstraints(p_cheque_no_fin)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cheque_no_fin LIKE notb0019.cheque_no_fin
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb0019_cheque_no_fin_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb0019.cuenta_no" column
-#+
-#+ @param p_cuenta_no - CHAR(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb0019_cuenta_no_checkColumnConstraints(p_cuenta_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cuenta_no LIKE notb0019.cuenta_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb0019_cuenta_no_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb0019.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb0019_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE notb0019.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb0019_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb0019.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb0019_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE notb0019.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb0019_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb0019.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb0019_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE notb0019.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb0019_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb0019.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb0019_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE notb0019.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb0019_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00033" table
-#+
-#+ @param p_data - a row data LIKE notb00033.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00033_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE notb00033.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_notb00033_num_nomi_checkColumnConstraints(p_data.num_nomi) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00033_departamento_checkColumnConstraints(p_data.departamento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00033_cod_puesto_checkColumnConstraints(p_data.cod_puesto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00033_fecha_liquidacion_checkColumnConstraints(p_data.fecha_liquidacion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00033_num_emp_checkColumnConstraints(p_data.num_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00033_sueldo_actual_checkColumnConstraints(p_data.sueldo_actual) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00033_sueldo_promedio_checkColumnConstraints(p_data.sueldo_promedio) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00033_salario_dia_checkColumnConstraints(p_data.salario_dia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00033_anos_empresa_checkColumnConstraints(p_data.anos_empresa) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00033_meses_empresa_checkColumnConstraints(p_data.meses_empresa) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00033_dias_empresa_checkColumnConstraints(p_data.dias_empresa) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00033_dias_cesantia_checkColumnConstraints(p_data.dias_cesantia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00033_dias_preaviso_checkColumnConstraints(p_data.dias_preaviso) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00033_dias_vacaciones_checkColumnConstraints(p_data.dias_vacaciones) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00033_ultimas_vacaciones_checkColumnConstraints(p_data.ultimas_vacaciones) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00033_tiempo_empresa_checkColumnConstraints(p_data.tiempo_empresa) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00033_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00033_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00033_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00033_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00033_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00033_checkTableConstraints
-
-{}
-#+ Check constraints on the "notb00033.num_nomi" column
-#+
-#+ @param p_num_nomi - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00033_num_nomi_checkColumnConstraints(p_num_nomi)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_nomi LIKE notb00033.num_nomi
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00033_num_nomi_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00033.departamento" column
-#+
-#+ @param p_departamento - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00033_departamento_checkColumnConstraints(p_departamento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_departamento LIKE notb00033.departamento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00033_departamento_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00033.cod_puesto" column
-#+
-#+ @param p_cod_puesto - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00033_cod_puesto_checkColumnConstraints(p_cod_puesto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_puesto LIKE notb00033.cod_puesto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00033_cod_puesto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00033.fecha_liquidacion" column
-#+
-#+ @param p_fecha_liquidacion - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00033_fecha_liquidacion_checkColumnConstraints(p_fecha_liquidacion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_liquidacion LIKE notb00033.fecha_liquidacion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00033_fecha_liquidacion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00033.num_emp" column
-#+
-#+ @param p_num_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00033_num_emp_checkColumnConstraints(p_num_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_emp LIKE notb00033.num_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00033_num_emp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00033.sueldo_actual" column
-#+
-#+ @param p_sueldo_actual - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00033_sueldo_actual_checkColumnConstraints(p_sueldo_actual)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sueldo_actual LIKE notb00033.sueldo_actual
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00033_sueldo_actual_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00033.sueldo_promedio" column
-#+
-#+ @param p_sueldo_promedio - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00033_sueldo_promedio_checkColumnConstraints(p_sueldo_promedio)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sueldo_promedio LIKE notb00033.sueldo_promedio
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00033_sueldo_promedio_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00033.salario_dia" column
-#+
-#+ @param p_salario_dia - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00033_salario_dia_checkColumnConstraints(p_salario_dia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_salario_dia LIKE notb00033.salario_dia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00033_salario_dia_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00033.anos_empresa" column
-#+
-#+ @param p_anos_empresa - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00033_anos_empresa_checkColumnConstraints(p_anos_empresa)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_anos_empresa LIKE notb00033.anos_empresa
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00033_anos_empresa_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00033.meses_empresa" column
-#+
-#+ @param p_meses_empresa - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00033_meses_empresa_checkColumnConstraints(p_meses_empresa)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_meses_empresa LIKE notb00033.meses_empresa
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00033_meses_empresa_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00033.dias_empresa" column
-#+
-#+ @param p_dias_empresa - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00033_dias_empresa_checkColumnConstraints(p_dias_empresa)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_dias_empresa LIKE notb00033.dias_empresa
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00033_dias_empresa_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00033.dias_cesantia" column
-#+
-#+ @param p_dias_cesantia - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00033_dias_cesantia_checkColumnConstraints(p_dias_cesantia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_dias_cesantia LIKE notb00033.dias_cesantia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00033_dias_cesantia_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00033.dias_preaviso" column
-#+
-#+ @param p_dias_preaviso - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00033_dias_preaviso_checkColumnConstraints(p_dias_preaviso)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_dias_preaviso LIKE notb00033.dias_preaviso
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00033_dias_preaviso_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00033.dias_vacaciones" column
-#+
-#+ @param p_dias_vacaciones - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00033_dias_vacaciones_checkColumnConstraints(p_dias_vacaciones)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_dias_vacaciones LIKE notb00033.dias_vacaciones
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00033_dias_vacaciones_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00033.ultimas_vacaciones" column
-#+
-#+ @param p_ultimas_vacaciones - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00033_ultimas_vacaciones_checkColumnConstraints(p_ultimas_vacaciones)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ultimas_vacaciones LIKE notb00033.ultimas_vacaciones
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00033_ultimas_vacaciones_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00033.tiempo_empresa" column
-#+
-#+ @param p_tiempo_empresa - DECIMAL(6,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00033_tiempo_empresa_checkColumnConstraints(p_tiempo_empresa)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tiempo_empresa LIKE notb00033.tiempo_empresa
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00033_tiempo_empresa_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00033.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00033_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE notb00033.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00033_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00033.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00033_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE notb00033.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00033_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00033.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00033_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE notb00033.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00033_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00033.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00033_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE notb00033.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00033_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00033.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00033_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE notb00033.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00033_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00023" table
-#+
-#+ @param p_data - a row data LIKE notb00023.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00023_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE notb00023.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_notb00023_numero_nomina_checkColumnConstraints(p_data.numero_nomina) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00023_tipo_emp_checkColumnConstraints(p_data.tipo_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00023_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00023_monto_excento_checkColumnConstraints(p_data.monto_excento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00023_porc_15_checkColumnConstraints(p_data.porc_15) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00023_porc_20_checkColumnConstraints(p_data.porc_20) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00023_porc_25_checkColumnConstraints(p_data.porc_25) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00023_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00023_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00023_fecha_crea_checkColumnConstraints(p_data.fecha_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00023_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00023_fecha_mod_checkColumnConstraints(p_data.fecha_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00023_checkTableConstraints
-
-{}
-#+ Check constraints on the "notb00023.numero_nomina" column
-#+
-#+ @param p_numero_nomina - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00023_numero_nomina_checkColumnConstraints(p_numero_nomina)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_numero_nomina LIKE notb00023.numero_nomina
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00023_numero_nomina_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00023.tipo_emp" column
-#+
-#+ @param p_tipo_emp - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00023_tipo_emp_checkColumnConstraints(p_tipo_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_emp LIKE notb00023.tipo_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00023_tipo_emp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00023.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00023_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE notb00023.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00023_fecha_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00023.monto_excento" column
-#+
-#+ @param p_monto_excento - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00023_monto_excento_checkColumnConstraints(p_monto_excento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_monto_excento LIKE notb00023.monto_excento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00023_monto_excento_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00023.porc_15" column
-#+
-#+ @param p_porc_15 - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00023_porc_15_checkColumnConstraints(p_porc_15)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_porc_15 LIKE notb00023.porc_15
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00023_porc_15_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00023.porc_20" column
-#+
-#+ @param p_porc_20 - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00023_porc_20_checkColumnConstraints(p_porc_20)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_porc_20 LIKE notb00023.porc_20
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00023_porc_20_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00023.porc_25" column
-#+
-#+ @param p_porc_25 - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00023_porc_25_checkColumnConstraints(p_porc_25)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_porc_25 LIKE notb00023.porc_25
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00023_porc_25_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00023.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00023_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE notb00023.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00023_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00023.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00023_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE notb00023.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00023_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00023.fecha_crea" column
-#+
-#+ @param p_fecha_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00023_fecha_crea_checkColumnConstraints(p_fecha_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_crea LIKE notb00023.fecha_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00023_fecha_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00023.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00023_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE notb00023.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00023_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00023.fecha_mod" column
-#+
-#+ @param p_fecha_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00023_fecha_mod_checkColumnConstraints(p_fecha_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_mod LIKE notb00023.fecha_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00023_fecha_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00021" table
-#+
-#+ @param p_data - a row data LIKE notb00021.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00021_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE notb00021.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_notb00021_num_nomi_checkColumnConstraints(p_data.num_nomi) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00021_tipo_emp_checkColumnConstraints(p_data.tipo_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00021_cheque_no_ini_checkColumnConstraints(p_data.cheque_no_ini) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00021_cheque_no_fin_checkColumnConstraints(p_data.cheque_no_fin) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00021_cuenta_no_checkColumnConstraints(p_data.cuenta_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00021_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00021_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00021_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00021_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00021_checkTableConstraints
-
-{}
-#+ Check constraints on the "notb00021.num_nomi" column
-#+
-#+ @param p_num_nomi - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00021_num_nomi_checkColumnConstraints(p_num_nomi)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_nomi LIKE notb00021.num_nomi
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00021_num_nomi_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00021.tipo_emp" column
-#+
-#+ @param p_tipo_emp - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00021_tipo_emp_checkColumnConstraints(p_tipo_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_emp LIKE notb00021.tipo_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00021_tipo_emp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00021.cheque_no_ini" column
-#+
-#+ @param p_cheque_no_ini - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00021_cheque_no_ini_checkColumnConstraints(p_cheque_no_ini)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cheque_no_ini LIKE notb00021.cheque_no_ini
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00021_cheque_no_ini_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00021.cheque_no_fin" column
-#+
-#+ @param p_cheque_no_fin - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00021_cheque_no_fin_checkColumnConstraints(p_cheque_no_fin)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cheque_no_fin LIKE notb00021.cheque_no_fin
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00021_cheque_no_fin_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00021.cuenta_no" column
-#+
-#+ @param p_cuenta_no - CHAR(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00021_cuenta_no_checkColumnConstraints(p_cuenta_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cuenta_no LIKE notb00021.cuenta_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00021_cuenta_no_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00021.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00021_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE notb00021.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00021_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00021.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00021_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE notb00021.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00021_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00021.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00021_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE notb00021.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00021_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00021.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00021_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE notb00021.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00021_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00020" table
-#+
-#+ @param p_data - a row data LIKE notb00020.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00020_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE notb00020.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_notb00020_cuenta_no_checkColumnConstraints(p_data.cuenta_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00020_cheque_no_checkColumnConstraints(p_data.cheque_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00020_num_emp_checkColumnConstraints(p_data.num_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00020_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00020_portador_checkColumnConstraints(p_data.portador) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00020_tasa_checkColumnConstraints(p_data.tasa) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00020_monto_checkColumnConstraints(p_data.monto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00020_status_impresion_checkColumnConstraints(p_data.status_impresion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00020_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00020_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00020_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00020_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00020_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00020_checkTableConstraints
-
-{}
-#+ Check constraints on the "notb00020.cuenta_no" column
-#+
-#+ @param p_cuenta_no - CHAR(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00020_cuenta_no_checkColumnConstraints(p_cuenta_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cuenta_no LIKE notb00020.cuenta_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00020_cuenta_no_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00020.cheque_no" column
-#+
-#+ @param p_cheque_no - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00020_cheque_no_checkColumnConstraints(p_cheque_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cheque_no LIKE notb00020.cheque_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00020_cheque_no_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00020.num_emp" column
-#+
-#+ @param p_num_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00020_num_emp_checkColumnConstraints(p_num_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_emp LIKE notb00020.num_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00020_num_emp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00020.fecha" column
-#+
-#+ @param p_fecha - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00020_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE notb00020.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00020_fecha_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00020.portador" column
-#+
-#+ @param p_portador - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00020_portador_checkColumnConstraints(p_portador)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_portador LIKE notb00020.portador
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00020_portador_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00020.tasa" column
-#+
-#+ @param p_tasa - DECIMAL(8,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00020_tasa_checkColumnConstraints(p_tasa)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tasa LIKE notb00020.tasa
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00020_tasa_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00020.monto" column
-#+
-#+ @param p_monto - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00020_monto_checkColumnConstraints(p_monto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_monto LIKE notb00020.monto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00020_monto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00020.status_impresion" column
-#+
-#+ @param p_status_impresion - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00020_status_impresion_checkColumnConstraints(p_status_impresion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_impresion LIKE notb00020.status_impresion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00020_status_impresion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00020.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00020_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE notb00020.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00020_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00020.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00020_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE notb00020.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00020_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00020.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00020_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE notb00020.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00020_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00020.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00020_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE notb00020.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00020_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00020.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00020_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE notb00020.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00020_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00019" table
-#+
-#+ @param p_data - a row data LIKE notb00019.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00019_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE notb00019.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_notb00019_num_nomi_checkColumnConstraints(p_data.num_nomi) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00019_tipo_emp_checkColumnConstraints(p_data.tipo_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00019_cheque_no_ini_checkColumnConstraints(p_data.cheque_no_ini) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00019_cheque_no_fin_checkColumnConstraints(p_data.cheque_no_fin) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00019_cuenta_no_checkColumnConstraints(p_data.cuenta_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00019_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00019_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00019_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00019_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00019_checkTableConstraints
-
-{}
-#+ Check constraints on the "notb00019.num_nomi" column
-#+
-#+ @param p_num_nomi - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00019_num_nomi_checkColumnConstraints(p_num_nomi)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_nomi LIKE notb00019.num_nomi
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00019_num_nomi_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00019.tipo_emp" column
-#+
-#+ @param p_tipo_emp - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00019_tipo_emp_checkColumnConstraints(p_tipo_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_emp LIKE notb00019.tipo_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00019_tipo_emp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00019.cheque_no_ini" column
-#+
-#+ @param p_cheque_no_ini - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00019_cheque_no_ini_checkColumnConstraints(p_cheque_no_ini)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cheque_no_ini LIKE notb00019.cheque_no_ini
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00019_cheque_no_ini_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00019.cheque_no_fin" column
-#+
-#+ @param p_cheque_no_fin - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00019_cheque_no_fin_checkColumnConstraints(p_cheque_no_fin)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cheque_no_fin LIKE notb00019.cheque_no_fin
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00019_cheque_no_fin_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00019.cuenta_no" column
-#+
-#+ @param p_cuenta_no - CHAR(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00019_cuenta_no_checkColumnConstraints(p_cuenta_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cuenta_no LIKE notb00019.cuenta_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00019_cuenta_no_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00019.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00019_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE notb00019.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00019_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00019.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00019_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE notb00019.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00019_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00019.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00019_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE notb00019.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00019_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00019.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00019_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE notb00019.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00019_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00018" table
-#+
-#+ @param p_data - a row data LIKE notb00018.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00018_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE notb00018.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_notb00018_num_emp_checkColumnConstraints(p_data.num_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00018_porc_accidente_checkColumnConstraints(p_data.porc_accidente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00018_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00018_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00018_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00018_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00018_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00018_checkTableConstraints
-
-{}
-#+ Check constraints on the "notb00018.num_emp" column
-#+
-#+ @param p_num_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00018_num_emp_checkColumnConstraints(p_num_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_emp LIKE notb00018.num_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00018_num_emp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00018.porc_accidente" column
-#+
-#+ @param p_porc_accidente - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00018_porc_accidente_checkColumnConstraints(p_porc_accidente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_porc_accidente LIKE notb00018.porc_accidente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00018_porc_accidente_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00018.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00018_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE notb00018.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00018_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00018.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00018_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE notb00018.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00018_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00018.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00018_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE notb00018.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00018_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00018.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00018_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE notb00018.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00018_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00018.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00018_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE notb00018.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00018_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00017" table
-#+
-#+ @param p_data - a row data LIKE notb00017.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00017_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE notb00017.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_notb00017_num_emp_checkColumnConstraints(p_data.num_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00017_departamento_checkColumnConstraints(p_data.departamento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00017_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00017_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00017_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00017_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00017_checkTableConstraints
-
-{}
-#+ Check constraints on the "notb00017.num_emp" column
-#+
-#+ @param p_num_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00017_num_emp_checkColumnConstraints(p_num_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_emp LIKE notb00017.num_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00017_num_emp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00017.departamento" column
-#+
-#+ @param p_departamento - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00017_departamento_checkColumnConstraints(p_departamento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_departamento LIKE notb00017.departamento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00017_departamento_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00017.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00017_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE notb00017.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00017_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00017.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00017_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE notb00017.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00017_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00017.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00017_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE notb00017.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00017_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00017.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00017_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE notb00017.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00017_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00016" table
-#+
-#+ @param p_data - a row data LIKE notb00016.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00016_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE notb00016.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_notb00016_num_nomi_checkColumnConstraints(p_data.num_nomi) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00016_tipo_emp_checkColumnConstraints(p_data.tipo_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00016_num_emp_checkColumnConstraints(p_data.num_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00016_departamento_checkColumnConstraints(p_data.departamento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00016_nivel_emp_checkColumnConstraints(p_data.nivel_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00016_cod_puesto_checkColumnConstraints(p_data.cod_puesto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00016_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00016_cod_mov_checkColumnConstraints(p_data.cod_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00016_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00016_valor_checkColumnConstraints(p_data.valor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00016_clase_mov_checkColumnConstraints(p_data.clase_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00016_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00016_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00016_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00016_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00016_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00016_checkTableConstraints
-
-{}
-#+ Check constraints on the "notb00016.num_nomi" column
-#+
-#+ @param p_num_nomi - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00016_num_nomi_checkColumnConstraints(p_num_nomi)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_nomi LIKE notb00016.num_nomi
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00016_num_nomi_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00016.tipo_emp" column
-#+
-#+ @param p_tipo_emp - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00016_tipo_emp_checkColumnConstraints(p_tipo_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_emp LIKE notb00016.tipo_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00016_tipo_emp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00016.num_emp" column
-#+
-#+ @param p_num_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00016_num_emp_checkColumnConstraints(p_num_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_emp LIKE notb00016.num_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00016_num_emp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00016.departamento" column
-#+
-#+ @param p_departamento - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00016_departamento_checkColumnConstraints(p_departamento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_departamento LIKE notb00016.departamento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00016_departamento_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00016.nivel_emp" column
-#+
-#+ @param p_nivel_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00016_nivel_emp_checkColumnConstraints(p_nivel_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nivel_emp LIKE notb00016.nivel_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00016_nivel_emp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00016.cod_puesto" column
-#+
-#+ @param p_cod_puesto - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00016_cod_puesto_checkColumnConstraints(p_cod_puesto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_puesto LIKE notb00016.cod_puesto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00016_cod_puesto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00016.fecha" column
-#+
-#+ @param p_fecha - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00016_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE notb00016.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00016_fecha_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00016.cod_mov" column
-#+
-#+ @param p_cod_mov - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00016_cod_mov_checkColumnConstraints(p_cod_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mov LIKE notb00016.cod_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00016_cod_mov_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00016.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00016_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE notb00016.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00016_cantidad_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00016.valor" column
-#+
-#+ @param p_valor - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00016_valor_checkColumnConstraints(p_valor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valor LIKE notb00016.valor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00016_valor_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00016.clase_mov" column
-#+
-#+ @param p_clase_mov - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00016_clase_mov_checkColumnConstraints(p_clase_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_clase_mov LIKE notb00016.clase_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00016_clase_mov_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00016.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00016_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE notb00016.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00016_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00016.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00016_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE notb00016.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00016_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00016.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00016_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE notb00016.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00016_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00016.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00016_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE notb00016.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00016_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00016.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00016_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE notb00016.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00016_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00015" table
-#+
-#+ @param p_data - a row data LIKE notb00015.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00015_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE notb00015.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_notb00015_num_emp_checkColumnConstraints(p_data.num_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00015_departamento_checkColumnConstraints(p_data.departamento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00015_nivel_emp_checkColumnConstraints(p_data.nivel_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00015_cod_puesto_checkColumnConstraints(p_data.cod_puesto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00015_num_doc_checkColumnConstraints(p_data.num_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00015_cod_mov_checkColumnConstraints(p_data.cod_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00015_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00015_monto_checkColumnConstraints(p_data.monto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00015_porciento_checkColumnConstraints(p_data.porciento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00015_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00015_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00015_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00015_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00015_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00015_checkTableConstraints
-
-{}
-#+ Check constraints on the "notb00015.num_emp" column
-#+
-#+ @param p_num_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00015_num_emp_checkColumnConstraints(p_num_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_emp LIKE notb00015.num_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00015_num_emp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00015.departamento" column
-#+
-#+ @param p_departamento - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00015_departamento_checkColumnConstraints(p_departamento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_departamento LIKE notb00015.departamento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00015_departamento_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00015.nivel_emp" column
-#+
-#+ @param p_nivel_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00015_nivel_emp_checkColumnConstraints(p_nivel_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nivel_emp LIKE notb00015.nivel_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00015_nivel_emp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00015.cod_puesto" column
-#+
-#+ @param p_cod_puesto - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00015_cod_puesto_checkColumnConstraints(p_cod_puesto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_puesto LIKE notb00015.cod_puesto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00015_cod_puesto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00015.num_doc" column
-#+
-#+ @param p_num_doc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00015_num_doc_checkColumnConstraints(p_num_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_doc LIKE notb00015.num_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00015_num_doc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00015.cod_mov" column
-#+
-#+ @param p_cod_mov - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00015_cod_mov_checkColumnConstraints(p_cod_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mov LIKE notb00015.cod_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00015_cod_mov_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00015.fecha" column
-#+
-#+ @param p_fecha - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00015_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE notb00015.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00015_fecha_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00015.monto" column
-#+
-#+ @param p_monto - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00015_monto_checkColumnConstraints(p_monto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_monto LIKE notb00015.monto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00015_monto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00015.porciento" column
-#+
-#+ @param p_porciento - DECIMAL(5,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00015_porciento_checkColumnConstraints(p_porciento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_porciento LIKE notb00015.porciento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00015_porciento_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00015.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00015_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE notb00015.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00015_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00015.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00015_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE notb00015.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00015_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00015.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00015_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE notb00015.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00015_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00015.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00015_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE notb00015.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00015_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00015.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00015_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE notb00015.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00015_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00014" table
-#+
-#+ @param p_data - a row data LIKE notb00014.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00014_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE notb00014.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_notb00014_cod_mov_checkColumnConstraints(p_data.cod_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00014_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00014_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00014_checkTableConstraints
-
-{}
-#+ Check constraints on the "notb00014.cod_mov" column
-#+
-#+ @param p_cod_mov - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00014_cod_mov_checkColumnConstraints(p_cod_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mov LIKE notb00014.cod_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00014_cod_mov_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00014.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00014_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE notb00014.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00014_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00014.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00014_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE notb00014.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00014_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00013" table
-#+
-#+ @param p_data - a row data LIKE notb00013.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00013_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE notb00013.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_notb00013_cod_mov_checkColumnConstraints(p_data.cod_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00013_cod_mov_a_checkColumnConstraints(p_data.cod_mov_a) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00013_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00013_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00013_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00013_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00013_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00013_checkTableConstraints
-
-{}
-#+ Check constraints on the "notb00013.cod_mov" column
-#+
-#+ @param p_cod_mov - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00013_cod_mov_checkColumnConstraints(p_cod_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mov LIKE notb00013.cod_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00013_cod_mov_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00013.cod_mov_a" column
-#+
-#+ @param p_cod_mov_a - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00013_cod_mov_a_checkColumnConstraints(p_cod_mov_a)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mov_a LIKE notb00013.cod_mov_a
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00013_cod_mov_a_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00013.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00013_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE notb00013.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00013_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00013.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00013_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE notb00013.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00013_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00013.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00013_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE notb00013.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00013_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00013.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00013_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE notb00013.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00013_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00013.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00013_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE notb00013.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00013_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00012" table
-#+
-#+ @param p_data - a row data LIKE notb00012.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00012_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE notb00012.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_notb00012_cod_mes_checkColumnConstraints(p_data.cod_mes) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00012_dias_checkColumnConstraints(p_data.dias) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00012_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00012_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00012_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00012_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00012_checkTableConstraints
-
-{}
-#+ Check constraints on the "notb00012.cod_mes" column
-#+
-#+ @param p_cod_mes - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00012_cod_mes_checkColumnConstraints(p_cod_mes)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mes LIKE notb00012.cod_mes
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00012_cod_mes_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00012.dias" column
-#+
-#+ @param p_dias - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00012_dias_checkColumnConstraints(p_dias)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_dias LIKE notb00012.dias
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00012_dias_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00012.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00012_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE notb00012.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00012_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00012.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00012_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE notb00012.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00012_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00012.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00012_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE notb00012.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00012_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00012.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00012_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE notb00012.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00012_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00011" table
-#+
-#+ @param p_data - a row data LIKE notb00011.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00011_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE notb00011.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_notb00011_num_emp_checkColumnConstraints(p_data.num_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00011_departamento_checkColumnConstraints(p_data.departamento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00011_nivel_emp_checkColumnConstraints(p_data.nivel_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00011_cod_puesto_checkColumnConstraints(p_data.cod_puesto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00011_num_doc_checkColumnConstraints(p_data.num_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00011_cod_mov_checkColumnConstraints(p_data.cod_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00011_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00011_monto_checkColumnConstraints(p_data.monto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00011_porciento_checkColumnConstraints(p_data.porciento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00011_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00011_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00011_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00011_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00011_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00011_checkTableConstraints
-
-{}
-#+ Check constraints on the "notb00011.num_emp" column
-#+
-#+ @param p_num_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00011_num_emp_checkColumnConstraints(p_num_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_emp LIKE notb00011.num_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00011_num_emp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00011.departamento" column
-#+
-#+ @param p_departamento - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00011_departamento_checkColumnConstraints(p_departamento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_departamento LIKE notb00011.departamento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00011_departamento_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00011.nivel_emp" column
-#+
-#+ @param p_nivel_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00011_nivel_emp_checkColumnConstraints(p_nivel_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nivel_emp LIKE notb00011.nivel_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00011_nivel_emp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00011.cod_puesto" column
-#+
-#+ @param p_cod_puesto - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00011_cod_puesto_checkColumnConstraints(p_cod_puesto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_puesto LIKE notb00011.cod_puesto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00011_cod_puesto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00011.num_doc" column
-#+
-#+ @param p_num_doc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00011_num_doc_checkColumnConstraints(p_num_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_doc LIKE notb00011.num_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00011_num_doc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00011.cod_mov" column
-#+
-#+ @param p_cod_mov - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00011_cod_mov_checkColumnConstraints(p_cod_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mov LIKE notb00011.cod_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00011_cod_mov_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00011.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00011_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE notb00011.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00011_fecha_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00011.monto" column
-#+
-#+ @param p_monto - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00011_monto_checkColumnConstraints(p_monto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_monto LIKE notb00011.monto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00011_monto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00011.porciento" column
-#+
-#+ @param p_porciento - DECIMAL(5,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00011_porciento_checkColumnConstraints(p_porciento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_porciento LIKE notb00011.porciento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00011_porciento_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00011.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00011_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE notb00011.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00011_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00011.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00011_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE notb00011.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00011_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00011.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00011_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE notb00011.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00011_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00011.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00011_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE notb00011.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00011_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00011.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00011_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE notb00011.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00011_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00010" table
-#+
-#+ @param p_data - a row data LIKE notb00010.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00010_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE notb00010.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_notb00010_tipo_emp_checkColumnConstraints(p_data.tipo_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00010_h_normal_checkColumnConstraints(p_data.h_normal) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00010_num_nomi_checkColumnConstraints(p_data.num_nomi) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00010_mes_checkColumnConstraints(p_data.mes) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00010_ano_checkColumnConstraints(p_data.ano) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00010_num_sem_checkColumnConstraints(p_data.num_sem) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00010_fecha_del_checkColumnConstraints(p_data.fecha_del) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00010_fecha_al_checkColumnConstraints(p_data.fecha_al) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00010_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00010_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00010_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00010_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00010_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00010_fecha_cierre_nomina_checkColumnConstraints(p_data.fecha_cierre_nomina) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00010_checkTableConstraints
-
-{}
-#+ Check constraints on the "notb00010.tipo_emp" column
-#+
-#+ @param p_tipo_emp - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00010_tipo_emp_checkColumnConstraints(p_tipo_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_emp LIKE notb00010.tipo_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00010_tipo_emp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00010.h_normal" column
-#+
-#+ @param p_h_normal - DECIMAL(8,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00010_h_normal_checkColumnConstraints(p_h_normal)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_h_normal LIKE notb00010.h_normal
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00010_h_normal_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00010.num_nomi" column
-#+
-#+ @param p_num_nomi - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00010_num_nomi_checkColumnConstraints(p_num_nomi)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_nomi LIKE notb00010.num_nomi
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00010_num_nomi_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00010.mes" column
-#+
-#+ @param p_mes - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00010_mes_checkColumnConstraints(p_mes)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mes LIKE notb00010.mes
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00010_mes_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00010.ano" column
-#+
-#+ @param p_ano - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00010_ano_checkColumnConstraints(p_ano)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ano LIKE notb00010.ano
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_ano IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- ano: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00010_ano_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00010.num_sem" column
-#+
-#+ @param p_num_sem - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00010_num_sem_checkColumnConstraints(p_num_sem)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_sem LIKE notb00010.num_sem
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00010_num_sem_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00010.fecha_del" column
-#+
-#+ @param p_fecha_del - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00010_fecha_del_checkColumnConstraints(p_fecha_del)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_del LIKE notb00010.fecha_del
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00010_fecha_del_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00010.fecha_al" column
-#+
-#+ @param p_fecha_al - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00010_fecha_al_checkColumnConstraints(p_fecha_al)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_al LIKE notb00010.fecha_al
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00010_fecha_al_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00010.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00010_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE notb00010.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00010_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00010.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00010_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE notb00010.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00010_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00010.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00010_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE notb00010.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00010_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00010.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00010_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE notb00010.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00010_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00010.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00010_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE notb00010.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00010_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00010.fecha_cierre_nomina" column
-#+
-#+ @param p_fecha_cierre_nomina - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00010_fecha_cierre_nomina_checkColumnConstraints(p_fecha_cierre_nomina)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_cierre_nomina LIKE notb00010.fecha_cierre_nomina
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00010_fecha_cierre_nomina_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00009" table
-#+
-#+ @param p_data - a row data LIKE notb00009.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00009_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE notb00009.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_notb00009_num_nomi_checkColumnConstraints(p_data.num_nomi) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00009_tipo_emp_checkColumnConstraints(p_data.tipo_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00009_cheque_no_checkColumnConstraints(p_data.cheque_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00009_num_emp_checkColumnConstraints(p_data.num_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00009_monto_checkColumnConstraints(p_data.monto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00009_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00009_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00009_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00009_checkTableConstraints
-
-{}
-#+ Check constraints on the "notb00009.num_nomi" column
-#+
-#+ @param p_num_nomi - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00009_num_nomi_checkColumnConstraints(p_num_nomi)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_nomi LIKE notb00009.num_nomi
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00009_num_nomi_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00009.tipo_emp" column
-#+
-#+ @param p_tipo_emp - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00009_tipo_emp_checkColumnConstraints(p_tipo_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_emp LIKE notb00009.tipo_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00009_tipo_emp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00009.cheque_no" column
-#+
-#+ @param p_cheque_no - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00009_cheque_no_checkColumnConstraints(p_cheque_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cheque_no LIKE notb00009.cheque_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00009_cheque_no_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00009.num_emp" column
-#+
-#+ @param p_num_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00009_num_emp_checkColumnConstraints(p_num_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_emp LIKE notb00009.num_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00009_num_emp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00009.monto" column
-#+
-#+ @param p_monto - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00009_monto_checkColumnConstraints(p_monto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_monto LIKE notb00009.monto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00009_monto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00009.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00009_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE notb00009.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00009_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00009.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00009_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE notb00009.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00009_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00009.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00009_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE notb00009.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00009_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00008" table
-#+
-#+ @param p_data - a row data LIKE notb00008.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00008_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE notb00008.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_notb00008_num_nomi_checkColumnConstraints(p_data.num_nomi) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00008_tipo_emp_checkColumnConstraints(p_data.tipo_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00008_num_emp_checkColumnConstraints(p_data.num_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00008_departamento_checkColumnConstraints(p_data.departamento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00008_nivel_emp_checkColumnConstraints(p_data.nivel_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00008_cod_puesto_checkColumnConstraints(p_data.cod_puesto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00008_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00008_cod_mov_checkColumnConstraints(p_data.cod_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00008_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00008_valor_checkColumnConstraints(p_data.valor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00008_clase_mov_checkColumnConstraints(p_data.clase_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00008_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00008_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00008_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00008_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00008_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00008_checkTableConstraints
-
-{}
-#+ Check constraints on the "notb00008.num_nomi" column
-#+
-#+ @param p_num_nomi - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00008_num_nomi_checkColumnConstraints(p_num_nomi)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_nomi LIKE notb00008.num_nomi
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00008_num_nomi_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00008.tipo_emp" column
-#+
-#+ @param p_tipo_emp - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00008_tipo_emp_checkColumnConstraints(p_tipo_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_emp LIKE notb00008.tipo_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00008_tipo_emp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00008.num_emp" column
-#+
-#+ @param p_num_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00008_num_emp_checkColumnConstraints(p_num_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_emp LIKE notb00008.num_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00008_num_emp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00008.departamento" column
-#+
-#+ @param p_departamento - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00008_departamento_checkColumnConstraints(p_departamento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_departamento LIKE notb00008.departamento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00008_departamento_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00008.nivel_emp" column
-#+
-#+ @param p_nivel_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00008_nivel_emp_checkColumnConstraints(p_nivel_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nivel_emp LIKE notb00008.nivel_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00008_nivel_emp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00008.cod_puesto" column
-#+
-#+ @param p_cod_puesto - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00008_cod_puesto_checkColumnConstraints(p_cod_puesto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_puesto LIKE notb00008.cod_puesto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00008_cod_puesto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00008.fecha" column
-#+
-#+ @param p_fecha - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00008_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE notb00008.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00008_fecha_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00008.cod_mov" column
-#+
-#+ @param p_cod_mov - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00008_cod_mov_checkColumnConstraints(p_cod_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mov LIKE notb00008.cod_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00008_cod_mov_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00008.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00008_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE notb00008.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00008_cantidad_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00008.valor" column
-#+
-#+ @param p_valor - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00008_valor_checkColumnConstraints(p_valor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valor LIKE notb00008.valor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00008_valor_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00008.clase_mov" column
-#+
-#+ @param p_clase_mov - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00008_clase_mov_checkColumnConstraints(p_clase_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_clase_mov LIKE notb00008.clase_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00008_clase_mov_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00008.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00008_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE notb00008.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00008_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00008.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00008_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE notb00008.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00008_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00008.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00008_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE notb00008.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00008_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00008.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00008_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE notb00008.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00008_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00008.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00008_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE notb00008.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00008_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00007" table
-#+
-#+ @param p_data - a row data LIKE notb00007.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00007_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE notb00007.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_notb00007_num_nomi_checkColumnConstraints(p_data.num_nomi) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00007_tipo_emp_checkColumnConstraints(p_data.tipo_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00007_num_emp_checkColumnConstraints(p_data.num_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00007_departamento_checkColumnConstraints(p_data.departamento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00007_nivel_emp_checkColumnConstraints(p_data.nivel_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00007_cod_puesto_checkColumnConstraints(p_data.cod_puesto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00007_cod_mov_checkColumnConstraints(p_data.cod_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00007_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00007_valor_checkColumnConstraints(p_data.valor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00007_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00007_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00007_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00007_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00007_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00007_checkTableConstraints
-
-{}
-#+ Check constraints on the "notb00007.num_nomi" column
-#+
-#+ @param p_num_nomi - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00007_num_nomi_checkColumnConstraints(p_num_nomi)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_nomi LIKE notb00007.num_nomi
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00007_num_nomi_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00007.tipo_emp" column
-#+
-#+ @param p_tipo_emp - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00007_tipo_emp_checkColumnConstraints(p_tipo_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_emp LIKE notb00007.tipo_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00007_tipo_emp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00007.num_emp" column
-#+
-#+ @param p_num_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00007_num_emp_checkColumnConstraints(p_num_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_emp LIKE notb00007.num_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00007_num_emp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00007.departamento" column
-#+
-#+ @param p_departamento - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00007_departamento_checkColumnConstraints(p_departamento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_departamento LIKE notb00007.departamento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00007_departamento_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00007.nivel_emp" column
-#+
-#+ @param p_nivel_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00007_nivel_emp_checkColumnConstraints(p_nivel_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nivel_emp LIKE notb00007.nivel_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00007_nivel_emp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00007.cod_puesto" column
-#+
-#+ @param p_cod_puesto - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00007_cod_puesto_checkColumnConstraints(p_cod_puesto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_puesto LIKE notb00007.cod_puesto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00007_cod_puesto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00007.cod_mov" column
-#+
-#+ @param p_cod_mov - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00007_cod_mov_checkColumnConstraints(p_cod_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mov LIKE notb00007.cod_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00007_cod_mov_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00007.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00007_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE notb00007.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00007_cantidad_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00007.valor" column
-#+
-#+ @param p_valor - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00007_valor_checkColumnConstraints(p_valor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valor LIKE notb00007.valor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00007_valor_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00007.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00007_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE notb00007.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00007_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00007.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00007_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE notb00007.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00007_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00007.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00007_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE notb00007.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00007_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00007.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00007_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE notb00007.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00007_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00007.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00007_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE notb00007.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00007_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00006" table
-#+
-#+ @param p_data - a row data LIKE notb00006.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00006_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE notb00006.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_notb00006_salario_sem_desde_checkColumnConstraints(p_data.salario_sem_desde) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00006_salario_sem_hasta_checkColumnConstraints(p_data.salario_sem_hasta) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00006_salario_men_desde_checkColumnConstraints(p_data.salario_men_desde) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00006_salario_men_hasta_checkColumnConstraints(p_data.salario_men_hasta) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00006_porc_emp_checkColumnConstraints(p_data.porc_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00006_porc_pat_checkColumnConstraints(p_data.porc_pat) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00006_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00006_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00006_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00006_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00006_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00006_checkTableConstraints
-
-{}
-#+ Check constraints on the "notb00006.salario_sem_desde" column
-#+
-#+ @param p_salario_sem_desde - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00006_salario_sem_desde_checkColumnConstraints(p_salario_sem_desde)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_salario_sem_desde LIKE notb00006.salario_sem_desde
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00006_salario_sem_desde_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00006.salario_sem_hasta" column
-#+
-#+ @param p_salario_sem_hasta - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00006_salario_sem_hasta_checkColumnConstraints(p_salario_sem_hasta)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_salario_sem_hasta LIKE notb00006.salario_sem_hasta
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00006_salario_sem_hasta_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00006.salario_men_desde" column
-#+
-#+ @param p_salario_men_desde - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00006_salario_men_desde_checkColumnConstraints(p_salario_men_desde)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_salario_men_desde LIKE notb00006.salario_men_desde
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00006_salario_men_desde_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00006.salario_men_hasta" column
-#+
-#+ @param p_salario_men_hasta - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00006_salario_men_hasta_checkColumnConstraints(p_salario_men_hasta)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_salario_men_hasta LIKE notb00006.salario_men_hasta
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00006_salario_men_hasta_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00006.porc_emp" column
-#+
-#+ @param p_porc_emp - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00006_porc_emp_checkColumnConstraints(p_porc_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_porc_emp LIKE notb00006.porc_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00006_porc_emp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00006.porc_pat" column
-#+
-#+ @param p_porc_pat - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00006_porc_pat_checkColumnConstraints(p_porc_pat)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_porc_pat LIKE notb00006.porc_pat
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00006_porc_pat_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00006.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00006_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE notb00006.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00006_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00006.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00006_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE notb00006.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00006_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00006.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00006_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE notb00006.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00006_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00006.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00006_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE notb00006.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00006_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00006.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00006_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE notb00006.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00006_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00005" table
-#+
-#+ @param p_data - a row data LIKE notb00005.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00005_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE notb00005.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_notb00005_salario_checkColumnConstraints(p_data.salario) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00005_valor_checkColumnConstraints(p_data.valor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00005_porc_imp_checkColumnConstraints(p_data.porc_imp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00005_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00005_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00005_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00005_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00005_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00005_checkTableConstraints
-
-{}
-#+ Check constraints on the "notb00005.salario" column
-#+
-#+ @param p_salario - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00005_salario_checkColumnConstraints(p_salario)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_salario LIKE notb00005.salario
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00005_salario_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00005.valor" column
-#+
-#+ @param p_valor - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00005_valor_checkColumnConstraints(p_valor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valor LIKE notb00005.valor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00005_valor_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00005.porc_imp" column
-#+
-#+ @param p_porc_imp - DECIMAL(8,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00005_porc_imp_checkColumnConstraints(p_porc_imp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_porc_imp LIKE notb00005.porc_imp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00005_porc_imp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00005.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00005_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE notb00005.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00005_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00005.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00005_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE notb00005.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00005_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00005.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00005_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE notb00005.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00005_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00005.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00005_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE notb00005.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00005_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00005.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00005_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE notb00005.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00005_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00003" table
-#+
-#+ @param p_data - a row data LIKE notb00003.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00003_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE notb00003.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_notb00003_num_emp_checkColumnConstraints(p_data.num_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00003_departamento_checkColumnConstraints(p_data.departamento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00003_nivel_emp_checkColumnConstraints(p_data.nivel_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00003_cod_puesto_checkColumnConstraints(p_data.cod_puesto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00003_cod_mov_checkColumnConstraints(p_data.cod_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00003_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00003_valor_checkColumnConstraints(p_data.valor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00003_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00003_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00003_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00003_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00003_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- CALL smarmotech_dbxconstraints_notb00003_pk_notb00003_checkUniqueConstraint(p_forUpdate, p_data.num_emp, p_data.cod_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00003_checkTableConstraints
-
-{}
-#+ Check the primary key uniqueness constraint on the "notb00003"
-#+
-#+ @param p_key - Primary Key
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00003_pk_notb00003_checkUniqueConstraint(p_forUpdate, p_key)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_key
- RECORD
- notb00003_num_emp LIKE notb00003.num_emp,
- notb00003_cod_mov LIKE notb00003.cod_mov
- END RECORD
- DEFINE l_key
- RECORD
- notb00003_num_emp LIKE notb00003.num_emp,
- notb00003_cod_mov LIKE notb00003.cod_mov
- END RECORD
- DEFINE l_where STRING
- DEFINE l_sqlQuery STRING
- DEFINE l_count INTEGER
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- LET l_where = "WHERE notb00003.num_emp = ?
- AND notb00003.cod_mov = ? "
-
- let l_sqlQuery = "SELECT COUNT(*), num_emp, cod_mov FROM notb00003 ", l_where, " GROUP BY num_emp, cod_mov"
-
- PREPARE cur_notb00003_pk_notb00003_checkUniqueConstraint FROM l_sqlQuery
- EXECUTE cur_notb00003_pk_notb00003_checkUniqueConstraint INTO l_count, l_key.* USING p_key.*
- FREE cur_notb00003_pk_notb00003_checkUniqueConstraint
- IF (NOT p_forUpdate AND l_count > 0) OR (p_forUpdate AND l_count > 0 AND p_key.* != l_key.*) THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- num_emp + cod_mov: " || ERROR_BAM_00002) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00003_pk_notb00003_checkUniqueConstraint
-
-{}
-#+ Check constraints on the "notb00003.num_emp" column
-#+
-#+ @param p_num_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00003_num_emp_checkColumnConstraints(p_num_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_emp LIKE notb00003.num_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_num_emp IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- num_emp: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00003_num_emp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00003.departamento" column
-#+
-#+ @param p_departamento - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00003_departamento_checkColumnConstraints(p_departamento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_departamento LIKE notb00003.departamento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00003_departamento_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00003.nivel_emp" column
-#+
-#+ @param p_nivel_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00003_nivel_emp_checkColumnConstraints(p_nivel_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nivel_emp LIKE notb00003.nivel_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00003_nivel_emp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00003.cod_puesto" column
-#+
-#+ @param p_cod_puesto - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00003_cod_puesto_checkColumnConstraints(p_cod_puesto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_puesto LIKE notb00003.cod_puesto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00003_cod_puesto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00003.cod_mov" column
-#+
-#+ @param p_cod_mov - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00003_cod_mov_checkColumnConstraints(p_cod_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mov LIKE notb00003.cod_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_mov IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_mov: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00003_cod_mov_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00003.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00003_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE notb00003.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00003_cantidad_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00003.valor" column
-#+
-#+ @param p_valor - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00003_valor_checkColumnConstraints(p_valor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valor LIKE notb00003.valor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00003_valor_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00003.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00003_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE notb00003.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00003_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00003.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00003_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE notb00003.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00003_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00003.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00003_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE notb00003.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00003_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00003.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00003_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE notb00003.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00003_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00003.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00003_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE notb00003.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00003_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00002" table
-#+
-#+ @param p_data - a row data LIKE notb00002.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00002_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE notb00002.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_notb00002_cod_mov_checkColumnConstraints(p_data.cod_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00002_descrip_mov_checkColumnConstraints(p_data.descrip_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00002_primer_enc_checkColumnConstraints(p_data.primer_enc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00002_segundo_enc_checkColumnConstraints(p_data.segundo_enc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00002_tercer_enc_checkColumnConstraints(p_data.tercer_enc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00002_ch_encabeza_checkColumnConstraints(p_data.ch_encabeza) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00002_tipo_mov_checkColumnConstraints(p_data.tipo_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00002_clase_mov_checkColumnConstraints(p_data.clase_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00002_cantidad_cia_checkColumnConstraints(p_data.cantidad_cia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00002_cantidad_emp_checkColumnConstraints(p_data.cantidad_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00002_cta_control_checkColumnConstraints(p_data.cta_control) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00002_cta_aux_checkColumnConstraints(p_data.cta_aux) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00002_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00002_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00002_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00002_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00002_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00002_checkTableConstraints
-
-{}
-#+ Check constraints on the "notb00002.cod_mov" column
-#+
-#+ @param p_cod_mov - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00002_cod_mov_checkColumnConstraints(p_cod_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mov LIKE notb00002.cod_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00002_cod_mov_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00002.descrip_mov" column
-#+
-#+ @param p_descrip_mov - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00002_descrip_mov_checkColumnConstraints(p_descrip_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descrip_mov LIKE notb00002.descrip_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00002_descrip_mov_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00002.primer_enc" column
-#+
-#+ @param p_primer_enc - CHAR(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00002_primer_enc_checkColumnConstraints(p_primer_enc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_primer_enc LIKE notb00002.primer_enc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00002_primer_enc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00002.segundo_enc" column
-#+
-#+ @param p_segundo_enc - CHAR(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00002_segundo_enc_checkColumnConstraints(p_segundo_enc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_segundo_enc LIKE notb00002.segundo_enc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00002_segundo_enc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00002.tercer_enc" column
-#+
-#+ @param p_tercer_enc - CHAR(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00002_tercer_enc_checkColumnConstraints(p_tercer_enc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tercer_enc LIKE notb00002.tercer_enc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00002_tercer_enc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00002.ch_encabeza" column
-#+
-#+ @param p_ch_encabeza - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00002_ch_encabeza_checkColumnConstraints(p_ch_encabeza)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ch_encabeza LIKE notb00002.ch_encabeza
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00002_ch_encabeza_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00002.tipo_mov" column
-#+
-#+ @param p_tipo_mov - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00002_tipo_mov_checkColumnConstraints(p_tipo_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_mov LIKE notb00002.tipo_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00002_tipo_mov_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00002.clase_mov" column
-#+
-#+ @param p_clase_mov - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00002_clase_mov_checkColumnConstraints(p_clase_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_clase_mov LIKE notb00002.clase_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00002_clase_mov_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00002.cantidad_cia" column
-#+
-#+ @param p_cantidad_cia - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00002_cantidad_cia_checkColumnConstraints(p_cantidad_cia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad_cia LIKE notb00002.cantidad_cia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00002_cantidad_cia_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00002.cantidad_emp" column
-#+
-#+ @param p_cantidad_emp - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00002_cantidad_emp_checkColumnConstraints(p_cantidad_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad_emp LIKE notb00002.cantidad_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00002_cantidad_emp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00002.cta_control" column
-#+
-#+ @param p_cta_control - CHAR(6) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00002_cta_control_checkColumnConstraints(p_cta_control)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cta_control LIKE notb00002.cta_control
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00002_cta_control_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00002.cta_aux" column
-#+
-#+ @param p_cta_aux - CHAR(7) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00002_cta_aux_checkColumnConstraints(p_cta_aux)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cta_aux LIKE notb00002.cta_aux
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00002_cta_aux_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00002.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00002_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE notb00002.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00002_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00002.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00002_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE notb00002.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00002_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00002.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00002_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE notb00002.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00002_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00002.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00002_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE notb00002.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00002_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00002.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00002_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE notb00002.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00002_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00001" table
-#+
-#+ @param p_data - a row data LIKE notb00001.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00001_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE notb00001.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_notb00001_ult_cheque_checkColumnConstraints(p_data.ult_cheque) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00001_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00001_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00001_checkTableConstraints
-
-{}
-#+ Check constraints on the "notb00001.ult_cheque" column
-#+
-#+ @param p_ult_cheque - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00001_ult_cheque_checkColumnConstraints(p_ult_cheque)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ult_cheque LIKE notb00001.ult_cheque
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00001_ult_cheque_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00001.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00001_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE notb00001.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00001_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "notb00001.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00001_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE notb00001.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.notb00001_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "nc" table
-#+
-#+ @param p_data - a row data LIKE nc.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_nc_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE nc.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_nc_cuenta_no_checkColumnConstraints(p_data.cuenta_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_nc_cod_cia_checkColumnConstraints(p_data.cod_cia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_nc_tipo_doc_checkColumnConstraints(p_data.tipo_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_nc_num_doc_checkColumnConstraints(p_data.num_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_nc_tipo_cliente_checkColumnConstraints(p_data.tipo_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_nc_sec_cliente_checkColumnConstraints(p_data.sec_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_nc_cod_emp_checkColumnConstraints(p_data.cod_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_nc_cod_emp_sec_checkColumnConstraints(p_data.cod_emp_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_nc_fecha_orig_checkColumnConstraints(p_data.fecha_orig) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_nc_fecha_ven_checkColumnConstraints(p_data.fecha_ven) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_nc_aplica_a_checkColumnConstraints(p_data.aplica_a) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_nc_banco_checkColumnConstraints(p_data.banco) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_nc_num_cheque_checkColumnConstraints(p_data.num_cheque) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_nc_valor_checkColumnConstraints(p_data.valor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_nc_valor_efectivo_checkColumnConstraints(p_data.valor_efectivo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_nc_valor_cheque_checkColumnConstraints(p_data.valor_cheque) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_nc_costo_checkColumnConstraints(p_data.costo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_nc_monto_desc_checkColumnConstraints(p_data.monto_desc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_nc_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_nc_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_nc_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_nc_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_nc_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.nc_checkTableConstraints
-
-{}
-#+ Check constraints on the "nc.cuenta_no" column
-#+
-#+ @param p_cuenta_no - CHAR(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_nc_cuenta_no_checkColumnConstraints(p_cuenta_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cuenta_no LIKE nc.cuenta_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.nc_cuenta_no_checkColumnConstraints
-
-{}
-#+ Check constraints on the "nc.cod_cia" column
-#+
-#+ @param p_cod_cia - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_nc_cod_cia_checkColumnConstraints(p_cod_cia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_cia LIKE nc.cod_cia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.nc_cod_cia_checkColumnConstraints
-
-{}
-#+ Check constraints on the "nc.tipo_doc" column
-#+
-#+ @param p_tipo_doc - CHAR(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_nc_tipo_doc_checkColumnConstraints(p_tipo_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_doc LIKE nc.tipo_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.nc_tipo_doc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "nc.num_doc" column
-#+
-#+ @param p_num_doc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_nc_num_doc_checkColumnConstraints(p_num_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_doc LIKE nc.num_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_num_doc IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- num_doc: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.nc_num_doc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "nc.tipo_cliente" column
-#+
-#+ @param p_tipo_cliente - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_nc_tipo_cliente_checkColumnConstraints(p_tipo_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_cliente LIKE nc.tipo_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.nc_tipo_cliente_checkColumnConstraints
-
-{}
-#+ Check constraints on the "nc.sec_cliente" column
-#+
-#+ @param p_sec_cliente - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_nc_sec_cliente_checkColumnConstraints(p_sec_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_cliente LIKE nc.sec_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.nc_sec_cliente_checkColumnConstraints
-
-{}
-#+ Check constraints on the "nc.cod_emp" column
-#+
-#+ @param p_cod_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_nc_cod_emp_checkColumnConstraints(p_cod_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_emp LIKE nc.cod_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.nc_cod_emp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "nc.cod_emp_sec" column
-#+
-#+ @param p_cod_emp_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_nc_cod_emp_sec_checkColumnConstraints(p_cod_emp_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_emp_sec LIKE nc.cod_emp_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.nc_cod_emp_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "nc.fecha_orig" column
-#+
-#+ @param p_fecha_orig - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_nc_fecha_orig_checkColumnConstraints(p_fecha_orig)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_orig LIKE nc.fecha_orig
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.nc_fecha_orig_checkColumnConstraints
-
-{}
-#+ Check constraints on the "nc.fecha_ven" column
-#+
-#+ @param p_fecha_ven - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_nc_fecha_ven_checkColumnConstraints(p_fecha_ven)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_ven LIKE nc.fecha_ven
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.nc_fecha_ven_checkColumnConstraints
-
-{}
-#+ Check constraints on the "nc.aplica_a" column
-#+
-#+ @param p_aplica_a - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_nc_aplica_a_checkColumnConstraints(p_aplica_a)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_aplica_a LIKE nc.aplica_a
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.nc_aplica_a_checkColumnConstraints
-
-{}
-#+ Check constraints on the "nc.banco" column
-#+
-#+ @param p_banco - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_nc_banco_checkColumnConstraints(p_banco)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_banco LIKE nc.banco
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.nc_banco_checkColumnConstraints
-
-{}
-#+ Check constraints on the "nc.num_cheque" column
-#+
-#+ @param p_num_cheque - CHAR(12) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_nc_num_cheque_checkColumnConstraints(p_num_cheque)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_cheque LIKE nc.num_cheque
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.nc_num_cheque_checkColumnConstraints
-
-{}
-#+ Check constraints on the "nc.valor" column
-#+
-#+ @param p_valor - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_nc_valor_checkColumnConstraints(p_valor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valor LIKE nc.valor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_valor IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- valor: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.nc_valor_checkColumnConstraints
-
-{}
-#+ Check constraints on the "nc.valor_efectivo" column
-#+
-#+ @param p_valor_efectivo - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_nc_valor_efectivo_checkColumnConstraints(p_valor_efectivo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valor_efectivo LIKE nc.valor_efectivo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.nc_valor_efectivo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "nc.valor_cheque" column
-#+
-#+ @param p_valor_cheque - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_nc_valor_cheque_checkColumnConstraints(p_valor_cheque)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valor_cheque LIKE nc.valor_cheque
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.nc_valor_cheque_checkColumnConstraints
-
-{}
-#+ Check constraints on the "nc.costo" column
-#+
-#+ @param p_costo - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_nc_costo_checkColumnConstraints(p_costo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_costo LIKE nc.costo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.nc_costo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "nc.monto_desc" column
-#+
-#+ @param p_monto_desc - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_nc_monto_desc_checkColumnConstraints(p_monto_desc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_monto_desc LIKE nc.monto_desc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.nc_monto_desc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "nc.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_nc_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE nc.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.nc_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "nc.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_nc_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE nc.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.nc_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "nc.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_nc_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE nc.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.nc_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "nc.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_nc_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE nc.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.nc_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "nc.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_nc_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE nc.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.nc_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "msgtable" table
-#+
-#+ @param p_data - a row data LIKE msgtable.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_msgtable_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE msgtable.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_msgtable_cod_msg_checkColumnConstraints(p_data.cod_msg) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_msgtable_desc_msg_checkColumnConstraints(p_data.desc_msg) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_msgtable_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_msgtable_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_msgtable_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_msgtable_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.msgtable_checkTableConstraints
-
-{}
-#+ Check constraints on the "msgtable.cod_msg" column
-#+
-#+ @param p_cod_msg - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_msgtable_cod_msg_checkColumnConstraints(p_cod_msg)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_msg LIKE msgtable.cod_msg
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.msgtable_cod_msg_checkColumnConstraints
-
-{}
-#+ Check constraints on the "msgtable.desc_msg" column
-#+
-#+ @param p_desc_msg - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_msgtable_desc_msg_checkColumnConstraints(p_desc_msg)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_desc_msg LIKE msgtable.desc_msg
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.msgtable_desc_msg_checkColumnConstraints
-
-{}
-#+ Check constraints on the "msgtable.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_msgtable_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE msgtable.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.msgtable_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "msgtable.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_msgtable_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE msgtable.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.msgtable_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "msgtable.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_msgtable_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE msgtable.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.msgtable_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "msgtable.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_msgtable_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE msgtable.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.msgtable_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "molduras23" table
-#+
-#+ @param p_data - a row data LIKE molduras23.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_molduras23_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE molduras23.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_molduras23_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_molduras23_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_molduras23_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_molduras23_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.molduras23_checkTableConstraints
-
-{}
-#+ Check constraints on the "molduras23.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_molduras23_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE molduras23.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.molduras23_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "molduras23.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_molduras23_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE molduras23.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.molduras23_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "molduras23.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_molduras23_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE molduras23.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.molduras23_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "molduras23.cod_sec" column
-#+
-#+ @param p_cod_sec - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_molduras23_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE molduras23.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.molduras23_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "mestable" table
-#+
-#+ @param p_data - a row data LIKE mestable.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_mestable_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE mestable.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_mestable_mes_checkColumnConstraints(p_data.mes) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_mestable_descrip_checkColumnConstraints(p_data.descrip) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_mestable_dias_prod_checkColumnConstraints(p_data.dias_prod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_mestable_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_mestable_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_mestable_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_mestable_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_mestable_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.mestable_checkTableConstraints
-
-{}
-#+ Check constraints on the "mestable.mes" column
-#+
-#+ @param p_mes - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_mestable_mes_checkColumnConstraints(p_mes)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mes LIKE mestable.mes
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.mestable_mes_checkColumnConstraints
-
-{}
-#+ Check constraints on the "mestable.descrip" column
-#+
-#+ @param p_descrip - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_mestable_descrip_checkColumnConstraints(p_descrip)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descrip LIKE mestable.descrip
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.mestable_descrip_checkColumnConstraints
-
-{}
-#+ Check constraints on the "mestable.dias_prod" column
-#+
-#+ @param p_dias_prod - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_mestable_dias_prod_checkColumnConstraints(p_dias_prod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_dias_prod LIKE mestable.dias_prod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.mestable_dias_prod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "mestable.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_mestable_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE mestable.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.mestable_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "mestable.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_mestable_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE mestable.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.mestable_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "mestable.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_mestable_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE mestable.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.mestable_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "mestable.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_mestable_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE mestable.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.mestable_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "mestable.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_mestable_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE mestable.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.mestable_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "marzo$" table
-#+
-#+ @param p_data - a row data LIKE marzo$.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_marzo$_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE marzo$.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_marzo$_mes_checkColumnConstraints(p_data.mes) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_marzo$_ano_checkColumnConstraints(p_data.ano) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_marzo$_codprod_checkColumnConstraints(p_data.codprod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_marzo$_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.marzo$_checkTableConstraints
-
-{}
-#+ Check constraints on the "marzo$.mes" column
-#+
-#+ @param p_mes - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_marzo$_mes_checkColumnConstraints(p_mes)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mes LIKE marzo$.mes
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.marzo$_mes_checkColumnConstraints
-
-{}
-#+ Check constraints on the "marzo$.ano" column
-#+
-#+ @param p_ano - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_marzo$_ano_checkColumnConstraints(p_ano)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ano LIKE marzo$.ano
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.marzo$_ano_checkColumnConstraints
-
-{}
-#+ Check constraints on the "marzo$.codprod" column
-#+
-#+ @param p_codprod - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_marzo$_codprod_checkColumnConstraints(p_codprod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codprod LIKE marzo$.codprod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.marzo$_codprod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "marzo$.cantidad" column
-#+
-#+ @param p_cantidad - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_marzo$_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE marzo$.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.marzo$_cantidad_checkColumnConstraints
-
-{}
-#+ Check constraints on the "mallas9" table
-#+
-#+ @param p_data - a row data LIKE mallas9.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_mallas9_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE mallas9.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_mallas9_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_mallas9_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_mallas9_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_mallas9_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.mallas9_checkTableConstraints
-
-{}
-#+ Check constraints on the "mallas9.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_mallas9_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE mallas9.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.mallas9_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "mallas9.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_mallas9_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE mallas9.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.mallas9_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "mallas9.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_mallas9_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE mallas9.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.mallas9_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "mallas9.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_mallas9_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE mallas9.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.mallas9_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "localizacion" table
-#+
-#+ @param p_data - a row data LIKE localizacion.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_localizacion_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE localizacion.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_localizacion_sucid_checkColumnConstraints(p_data.sucid) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_localizacion_locid_checkColumnConstraints(p_data.locid) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_localizacion_locdescripcion_checkColumnConstraints(p_data.locdescripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.localizacion_checkTableConstraints
-
-{}
-#+ Check constraints on the "localizacion.sucid" column
-#+
-#+ @param p_sucid - VARCHAR2(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_localizacion_sucid_checkColumnConstraints(p_sucid)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sucid LIKE localizacion.sucid
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_sucid IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- sucid: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.localizacion_sucid_checkColumnConstraints
-
-{}
-#+ Check constraints on the "localizacion.locid" column
-#+
-#+ @param p_locid - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_localizacion_locid_checkColumnConstraints(p_locid)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_locid LIKE localizacion.locid
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_locid IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- locid: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.localizacion_locid_checkColumnConstraints
-
-{}
-#+ Check constraints on the "localizacion.locdescripcion" column
-#+
-#+ @param p_locdescripcion - VARCHAR2(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_localizacion_locdescripcion_checkColumnConstraints(p_locdescripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_locdescripcion LIKE localizacion.locdescripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_locdescripcion IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- locdescripcion: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.localizacion_locdescripcion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "listaprecio" table
-#+
-#+ @param p_data - a row data LIKE listaprecio.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_listaprecio_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE listaprecio.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_listaprecio_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_listaprecio_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_listaprecio_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_listaprecio_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_listaprecio_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_listaprecio_costo_prima_checkColumnConstraints(p_data.costo_prima) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_listaprecio_costo_rd_checkColumnConstraints(p_data.costo_rd) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_listaprecio_costo_estand_checkColumnConstraints(p_data.costo_estand) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_listaprecio_dif_costo_estand_checkColumnConstraints(p_data.dif_costo_estand) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.listaprecio_checkTableConstraints
-
-{}
-#+ Check constraints on the "listaprecio.cod_n" column
-#+
-#+ @param p_cod_n - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_listaprecio_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE listaprecio.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.listaprecio_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "listaprecio.cod_grupo" column
-#+
-#+ @param p_cod_grupo - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_listaprecio_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE listaprecio.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.listaprecio_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "listaprecio.cod_tipo" column
-#+
-#+ @param p_cod_tipo - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_listaprecio_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE listaprecio.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.listaprecio_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "listaprecio.cod_sec" column
-#+
-#+ @param p_cod_sec - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_listaprecio_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE listaprecio.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.listaprecio_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "listaprecio.descripcion" column
-#+
-#+ @param p_descripcion - VARCHAR2(255) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_listaprecio_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE listaprecio.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.listaprecio_descripcion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "listaprecio.costo_prima" column
-#+
-#+ @param p_costo_prima - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_listaprecio_costo_prima_checkColumnConstraints(p_costo_prima)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_costo_prima LIKE listaprecio.costo_prima
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.listaprecio_costo_prima_checkColumnConstraints
-
-{}
-#+ Check constraints on the "listaprecio.costo_rd" column
-#+
-#+ @param p_costo_rd - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_listaprecio_costo_rd_checkColumnConstraints(p_costo_rd)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_costo_rd LIKE listaprecio.costo_rd
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.listaprecio_costo_rd_checkColumnConstraints
-
-{}
-#+ Check constraints on the "listaprecio.costo_estand" column
-#+
-#+ @param p_costo_estand - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_listaprecio_costo_estand_checkColumnConstraints(p_costo_estand)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_costo_estand LIKE listaprecio.costo_estand
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.listaprecio_costo_estand_checkColumnConstraints
-
-{}
-#+ Check constraints on the "listaprecio.dif_costo_estand" column
-#+
-#+ @param p_dif_costo_estand - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_listaprecio_dif_costo_estand_checkColumnConstraints(p_dif_costo_estand)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_dif_costo_estand LIKE listaprecio.dif_costo_estand
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.listaprecio_dif_costo_estand_checkColumnConstraints
-
-{}
-#+ Check constraints on the "lineitem" table
-#+
-#+ @param p_data - a row data LIKE lineitem.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_lineitem_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE lineitem.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_lineitem_orderid_checkColumnConstraints(p_data.orderid) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_lineitem_linenum_checkColumnConstraints(p_data.linenum) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_lineitem_itemid_checkColumnConstraints(p_data.itemid) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_lineitem_quantity_checkColumnConstraints(p_data.quantity) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_lineitem_unitprice_checkColumnConstraints(p_data.unitprice) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.lineitem_checkTableConstraints
-
-{}
-#+ Check constraints on the "lineitem.orderid" column
-#+
-#+ @param p_orderid - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_lineitem_orderid_checkColumnConstraints(p_orderid)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_orderid LIKE lineitem.orderid
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_orderid IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- orderid: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.lineitem_orderid_checkColumnConstraints
-
-{}
-#+ Check constraints on the "lineitem.linenum" column
-#+
-#+ @param p_linenum - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_lineitem_linenum_checkColumnConstraints(p_linenum)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_linenum LIKE lineitem.linenum
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_linenum IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- linenum: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.lineitem_linenum_checkColumnConstraints
-
-{}
-#+ Check constraints on the "lineitem.itemid" column
-#+
-#+ @param p_itemid - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_lineitem_itemid_checkColumnConstraints(p_itemid)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_itemid LIKE lineitem.itemid
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_itemid IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- itemid: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.lineitem_itemid_checkColumnConstraints
-
-{}
-#+ Check constraints on the "lineitem.quantity" column
-#+
-#+ @param p_quantity - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_lineitem_quantity_checkColumnConstraints(p_quantity)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_quantity LIKE lineitem.quantity
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_quantity IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- quantity: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.lineitem_quantity_checkColumnConstraints
-
-{}
-#+ Check constraints on the "lineitem.unitprice" column
-#+
-#+ @param p_unitprice - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_lineitem_unitprice_checkColumnConstraints(p_unitprice)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_unitprice LIKE lineitem.unitprice
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_unitprice IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- unitprice: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.lineitem_unitprice_checkColumnConstraints
-
-{}
-#+ Check constraints on the "lajas2$" table
-#+
-#+ @param p_data - a row data LIKE lajas2$.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_lajas2$_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE lajas2$.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_lajas2$_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_lajas2$_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_lajas2$_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_lajas2$_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.lajas2$_checkTableConstraints
-
-{}
-#+ Check constraints on the "lajas2$.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_lajas2$_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE lajas2$.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.lajas2$_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "lajas2$.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_lajas2$_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE lajas2$.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.lajas2$_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "lajas2$.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_lajas2$_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE lajas2$.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.lajas2$_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "lajas2$.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_lajas2$_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE lajas2$.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.lajas2$_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "lajas2" table
-#+
-#+ @param p_data - a row data LIKE lajas2.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_lajas2_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE lajas2.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_lajas2_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_lajas2_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_lajas2_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_lajas2_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.lajas2_checkTableConstraints
-
-{}
-#+ Check constraints on the "lajas2.cod_n" column
-#+
-#+ @param p_cod_n - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_lajas2_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE lajas2.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.lajas2_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "lajas2.cod_grupo" column
-#+
-#+ @param p_cod_grupo - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_lajas2_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE lajas2.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.lajas2_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "lajas2.cod_tipo" column
-#+
-#+ @param p_cod_tipo - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_lajas2_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE lajas2.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.lajas2_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "lajas2.cod_sec" column
-#+
-#+ @param p_cod_sec - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_lajas2_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE lajas2.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.lajas2_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "lajas14" table
-#+
-#+ @param p_data - a row data LIKE lajas14.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_lajas14_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE lajas14.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_lajas14_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_lajas14_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_lajas14_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_lajas14_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.lajas14_checkTableConstraints
-
-{}
-#+ Check constraints on the "lajas14.cod_n" column
-#+
-#+ @param p_cod_n - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_lajas14_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE lajas14.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.lajas14_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "lajas14.cod_grupo" column
-#+
-#+ @param p_cod_grupo - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_lajas14_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE lajas14.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.lajas14_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "lajas14.cod_tipo" column
-#+
-#+ @param p_cod_tipo - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_lajas14_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE lajas14.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.lajas14_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "lajas14.cod_sec" column
-#+
-#+ @param p_cod_sec - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_lajas14_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE lajas14.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.lajas14_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "lajas" table
-#+
-#+ @param p_data - a row data LIKE lajas.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_lajas_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE lajas.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_lajas_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_lajas_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_lajas_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_lajas_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.lajas_checkTableConstraints
-
-{}
-#+ Check constraints on the "lajas.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_lajas_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE lajas.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.lajas_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "lajas.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_lajas_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE lajas.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.lajas_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "lajas.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_lajas_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE lajas.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.lajas_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "lajas.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_lajas_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE lajas.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.lajas_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "item" table
-#+
-#+ @param p_data - a row data LIKE item.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_item_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE item.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_item_itemid_checkColumnConstraints(p_data.itemid) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_item_productid_checkColumnConstraints(p_data.productid) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_item_listprice_checkColumnConstraints(p_data.listprice) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_item_unitcost_checkColumnConstraints(p_data.unitcost) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_item_supplier_checkColumnConstraints(p_data.supplier) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_item_status_checkColumnConstraints(p_data.status) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_item_attr1_checkColumnConstraints(p_data.attr1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_item_attr2_checkColumnConstraints(p_data.attr2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_item_attr3_checkColumnConstraints(p_data.attr3) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_item_attr4_checkColumnConstraints(p_data.attr4) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_item_attr5_checkColumnConstraints(p_data.attr5) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.item_checkTableConstraints
-
-{}
-#+ Check constraints on the "item.itemid" column
-#+
-#+ @param p_itemid - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_item_itemid_checkColumnConstraints(p_itemid)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_itemid LIKE item.itemid
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_itemid IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- itemid: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.item_itemid_checkColumnConstraints
-
-{}
-#+ Check constraints on the "item.productid" column
-#+
-#+ @param p_productid - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_item_productid_checkColumnConstraints(p_productid)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_productid LIKE item.productid
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_productid IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- productid: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.item_productid_checkColumnConstraints
-
-{}
-#+ Check constraints on the "item.listprice" column
-#+
-#+ @param p_listprice - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_item_listprice_checkColumnConstraints(p_listprice)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_listprice LIKE item.listprice
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.item_listprice_checkColumnConstraints
-
-{}
-#+ Check constraints on the "item.unitcost" column
-#+
-#+ @param p_unitcost - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_item_unitcost_checkColumnConstraints(p_unitcost)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_unitcost LIKE item.unitcost
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.item_unitcost_checkColumnConstraints
-
-{}
-#+ Check constraints on the "item.supplier" column
-#+
-#+ @param p_supplier - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_item_supplier_checkColumnConstraints(p_supplier)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_supplier LIKE item.supplier
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.item_supplier_checkColumnConstraints
-
-{}
-#+ Check constraints on the "item.status" column
-#+
-#+ @param p_status - CHAR(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_item_status_checkColumnConstraints(p_status)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status LIKE item.status
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.item_status_checkColumnConstraints
-
-{}
-#+ Check constraints on the "item.attr1" column
-#+
-#+ @param p_attr1 - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_item_attr1_checkColumnConstraints(p_attr1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_attr1 LIKE item.attr1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.item_attr1_checkColumnConstraints
-
-{}
-#+ Check constraints on the "item.attr2" column
-#+
-#+ @param p_attr2 - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_item_attr2_checkColumnConstraints(p_attr2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_attr2 LIKE item.attr2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.item_attr2_checkColumnConstraints
-
-{}
-#+ Check constraints on the "item.attr3" column
-#+
-#+ @param p_attr3 - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_item_attr3_checkColumnConstraints(p_attr3)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_attr3 LIKE item.attr3
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.item_attr3_checkColumnConstraints
-
-{}
-#+ Check constraints on the "item.attr4" column
-#+
-#+ @param p_attr4 - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_item_attr4_checkColumnConstraints(p_attr4)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_attr4 LIKE item.attr4
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.item_attr4_checkColumnConstraints
-
-{}
-#+ Check constraints on the "item.attr5" column
-#+
-#+ @param p_attr5 - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_item_attr5_checkColumnConstraints(p_attr5)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_attr5 LIKE item.attr5
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.item_attr5_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00042" table
-#+
-#+ @param p_data - a row data LIKE irtb00042.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00042_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE irtb00042.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_irtb00042_num_doc_checkColumnConstraints(p_data.num_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00042_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00042_cod_mov_checkColumnConstraints(p_data.cod_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00042_bodega_checkColumnConstraints(p_data.bodega) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00042_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00042_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00042_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00042_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00042_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00042_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00042_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00042_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00042_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00042_checkTableConstraints
-
-{}
-#+ Check constraints on the "irtb00042.num_doc" column
-#+
-#+ @param p_num_doc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00042_num_doc_checkColumnConstraints(p_num_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_doc LIKE irtb00042.num_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00042_num_doc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00042.fecha" column
-#+
-#+ @param p_fecha - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00042_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE irtb00042.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00042_fecha_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00042.cod_mov" column
-#+
-#+ @param p_cod_mov - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00042_cod_mov_checkColumnConstraints(p_cod_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mov LIKE irtb00042.cod_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00042_cod_mov_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00042.bodega" column
-#+
-#+ @param p_bodega - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00042_bodega_checkColumnConstraints(p_bodega)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_bodega LIKE irtb00042.bodega
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00042_bodega_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00042.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00042_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE irtb00042.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00042_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00042.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00042_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE irtb00042.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00042_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00042.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00042_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE irtb00042.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00042_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00042.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00042_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE irtb00042.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00042_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00042.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(18,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00042_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE irtb00042.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00042_cantidad_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00042.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00042_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE irtb00042.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00042_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00042.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00042_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE irtb00042.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00042_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00042.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00042_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE irtb00042.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00042_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00042.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00042_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE irtb00042.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00042_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00041" table
-#+
-#+ @param p_data - a row data LIKE irtb00041.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00041_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE irtb00041.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_irtb00041_fecha_act_checkColumnConstraints(p_data.fecha_act) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00041_idtrx_checkColumnConstraints(p_data.idtrx) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00041_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00041_bodega_checkColumnConstraints(p_data.bodega) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00041_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00041_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00041_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00041_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00041_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00041_balance_checkColumnConstraints(p_data.balance) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00041_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00041_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00041_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00041_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00041_checkTableConstraints
-
-{}
-#+ Check constraints on the "irtb00041.fecha_act" column
-#+
-#+ @param p_fecha_act - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00041_fecha_act_checkColumnConstraints(p_fecha_act)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_act LIKE irtb00041.fecha_act
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00041_fecha_act_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00041.idtrx" column
-#+
-#+ @param p_idtrx - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00041_idtrx_checkColumnConstraints(p_idtrx)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_idtrx LIKE irtb00041.idtrx
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00041_idtrx_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00041.fecha" column
-#+
-#+ @param p_fecha - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00041_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE irtb00041.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00041_fecha_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00041.bodega" column
-#+
-#+ @param p_bodega - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00041_bodega_checkColumnConstraints(p_bodega)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_bodega LIKE irtb00041.bodega
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00041_bodega_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00041.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00041_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE irtb00041.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00041_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00041.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00041_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE irtb00041.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00041_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00041.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00041_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE irtb00041.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00041_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00041.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00041_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE irtb00041.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00041_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00041.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00041_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE irtb00041.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00041_cantidad_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00041.balance" column
-#+
-#+ @param p_balance - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00041_balance_checkColumnConstraints(p_balance)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_balance LIKE irtb00041.balance
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00041_balance_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00041.us_crea" column
-#+
-#+ @param p_us_crea - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00041_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE irtb00041.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00041_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00041.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00041_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE irtb00041.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00041_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00041.us_mod" column
-#+
-#+ @param p_us_mod - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00041_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE irtb00041.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00041_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00041.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00041_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE irtb00041.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00041_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00040" table
-#+
-#+ @param p_data - a row data LIKE irtb00040.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00040_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE irtb00040.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_irtb00040_fecha_act_checkColumnConstraints(p_data.fecha_act) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00040_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00040_bodega_checkColumnConstraints(p_data.bodega) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00040_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00040_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00040_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00040_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00040_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00040_balance_checkColumnConstraints(p_data.balance) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00040_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00040_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00040_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00040_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00040_checkTableConstraints
-
-{}
-#+ Check constraints on the "irtb00040.fecha_act" column
-#+
-#+ @param p_fecha_act - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00040_fecha_act_checkColumnConstraints(p_fecha_act)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_act LIKE irtb00040.fecha_act
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00040_fecha_act_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00040.fecha" column
-#+
-#+ @param p_fecha - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00040_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE irtb00040.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00040_fecha_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00040.bodega" column
-#+
-#+ @param p_bodega - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00040_bodega_checkColumnConstraints(p_bodega)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_bodega LIKE irtb00040.bodega
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00040_bodega_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00040.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00040_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE irtb00040.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00040_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00040.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00040_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE irtb00040.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00040_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00040.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00040_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE irtb00040.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00040_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00040.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00040_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE irtb00040.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00040_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00040.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00040_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE irtb00040.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00040_cantidad_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00040.balance" column
-#+
-#+ @param p_balance - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00040_balance_checkColumnConstraints(p_balance)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_balance LIKE irtb00040.balance
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00040_balance_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00040.us_crea" column
-#+
-#+ @param p_us_crea - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00040_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE irtb00040.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00040_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00040.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00040_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE irtb00040.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00040_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00040.us_mod" column
-#+
-#+ @param p_us_mod - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00040_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE irtb00040.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00040_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00040.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00040_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE irtb00040.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00040_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00029" table
-#+
-#+ @param p_data - a row data LIKE irtb00029.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00029_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE irtb00029.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_irtb00029_departamento_checkColumnConstraints(p_data.departamento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00029_maquina_checkColumnConstraints(p_data.maquina) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00029_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00029_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00029_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00029_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00029_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00029_checkTableConstraints
-
-{}
-#+ Check constraints on the "irtb00029.departamento" column
-#+
-#+ @param p_departamento - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00029_departamento_checkColumnConstraints(p_departamento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_departamento LIKE irtb00029.departamento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00029_departamento_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00029.maquina" column
-#+
-#+ @param p_maquina - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00029_maquina_checkColumnConstraints(p_maquina)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_maquina LIKE irtb00029.maquina
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00029_maquina_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00029.status_t" column
-#+
-#+ @param p_status_t - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00029_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE irtb00029.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00029_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00029.us_crea" column
-#+
-#+ @param p_us_crea - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00029_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE irtb00029.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00029_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00029.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00029_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE irtb00029.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00029_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00029.us_mod" column
-#+
-#+ @param p_us_mod - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00029_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE irtb00029.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00029_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00029.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00029_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE irtb00029.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00029_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00027" table
-#+
-#+ @param p_data - a row data LIKE irtb00027.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00027_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE irtb00027.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_irtb00027_fecha_r_checkColumnConstraints(p_data.fecha_r) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00027_cod_n_r_checkColumnConstraints(p_data.cod_n_r) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00027_cod_grupo_r_checkColumnConstraints(p_data.cod_grupo_r) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00027_cod_tipo_r_checkColumnConstraints(p_data.cod_tipo_r) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00027_cod_sec_r_checkColumnConstraints(p_data.cod_sec_r) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00027_cod_n_m_checkColumnConstraints(p_data.cod_n_m) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00027_cod_grupo_m_checkColumnConstraints(p_data.cod_grupo_m) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00027_cod_tipo_m_checkColumnConstraints(p_data.cod_tipo_m) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00027_cod_sec_m_checkColumnConstraints(p_data.cod_sec_m) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00027_cantidad_m_checkColumnConstraints(p_data.cantidad_m) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00027_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00027_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00027_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00027_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00027_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00027_checkTableConstraints
-
-{}
-#+ Check constraints on the "irtb00027.fecha_r" column
-#+
-#+ @param p_fecha_r - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00027_fecha_r_checkColumnConstraints(p_fecha_r)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_r LIKE irtb00027.fecha_r
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_fecha_r IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- fecha_r: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00027_fecha_r_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00027.cod_n_r" column
-#+
-#+ @param p_cod_n_r - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00027_cod_n_r_checkColumnConstraints(p_cod_n_r)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n_r LIKE irtb00027.cod_n_r
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_n_r IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_n_r: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00027_cod_n_r_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00027.cod_grupo_r" column
-#+
-#+ @param p_cod_grupo_r - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00027_cod_grupo_r_checkColumnConstraints(p_cod_grupo_r)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo_r LIKE irtb00027.cod_grupo_r
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_grupo_r IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_grupo_r: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00027_cod_grupo_r_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00027.cod_tipo_r" column
-#+
-#+ @param p_cod_tipo_r - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00027_cod_tipo_r_checkColumnConstraints(p_cod_tipo_r)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo_r LIKE irtb00027.cod_tipo_r
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_tipo_r IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_tipo_r: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00027_cod_tipo_r_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00027.cod_sec_r" column
-#+
-#+ @param p_cod_sec_r - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00027_cod_sec_r_checkColumnConstraints(p_cod_sec_r)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec_r LIKE irtb00027.cod_sec_r
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_sec_r IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_sec_r: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00027_cod_sec_r_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00027.cod_n_m" column
-#+
-#+ @param p_cod_n_m - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00027_cod_n_m_checkColumnConstraints(p_cod_n_m)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n_m LIKE irtb00027.cod_n_m
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_n_m IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_n_m: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00027_cod_n_m_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00027.cod_grupo_m" column
-#+
-#+ @param p_cod_grupo_m - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00027_cod_grupo_m_checkColumnConstraints(p_cod_grupo_m)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo_m LIKE irtb00027.cod_grupo_m
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_grupo_m IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_grupo_m: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00027_cod_grupo_m_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00027.cod_tipo_m" column
-#+
-#+ @param p_cod_tipo_m - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00027_cod_tipo_m_checkColumnConstraints(p_cod_tipo_m)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo_m LIKE irtb00027.cod_tipo_m
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_tipo_m IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_tipo_m: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00027_cod_tipo_m_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00027.cod_sec_m" column
-#+
-#+ @param p_cod_sec_m - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00027_cod_sec_m_checkColumnConstraints(p_cod_sec_m)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec_m LIKE irtb00027.cod_sec_m
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_sec_m IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_sec_m: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00027_cod_sec_m_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00027.cantidad_m" column
-#+
-#+ @param p_cantidad_m - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00027_cantidad_m_checkColumnConstraints(p_cantidad_m)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad_m LIKE irtb00027.cantidad_m
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cantidad_m IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cantidad_m: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00027_cantidad_m_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00027.status_t" column
-#+
-#+ @param p_status_t - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00027_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE irtb00027.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00027_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00027.us_crea" column
-#+
-#+ @param p_us_crea - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00027_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE irtb00027.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00027_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00027.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00027_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE irtb00027.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00027_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00027.us_mod" column
-#+
-#+ @param p_us_mod - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00027_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE irtb00027.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00027_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00027.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00027_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE irtb00027.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00027_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00018" table
-#+
-#+ @param p_data - a row data LIKE irtb00018.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00018_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE irtb00018.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_irtb00018_cod_mov_checkColumnConstraints(p_data.cod_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00018_usuario_checkColumnConstraints(p_data.usuario) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00018_checkTableConstraints
-
-{}
-#+ Check constraints on the "irtb00018.cod_mov" column
-#+
-#+ @param p_cod_mov - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00018_cod_mov_checkColumnConstraints(p_cod_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mov LIKE irtb00018.cod_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00018_cod_mov_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00018.usuario" column
-#+
-#+ @param p_usuario - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00018_usuario_checkColumnConstraints(p_usuario)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_usuario LIKE irtb00018.usuario
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00018_usuario_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00017" table
-#+
-#+ @param p_data - a row data LIKE irtb00017.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00017_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE irtb00017.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_irtb00017_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00017_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00017_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00017_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00017_semana_del_checkColumnConstraints(p_data.semana_del) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00017_semana_al_checkColumnConstraints(p_data.semana_al) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00017_exis_act_checkColumnConstraints(p_data.exis_act) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00017_exis_fisica_checkColumnConstraints(p_data.exis_fisica) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00017_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00017_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00017_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00017_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00017_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00017_checkTableConstraints
-
-{}
-#+ Check constraints on the "irtb00017.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00017_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE irtb00017.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00017_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00017.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00017_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE irtb00017.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00017_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00017.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00017_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE irtb00017.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00017_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00017.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00017_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE irtb00017.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00017_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00017.semana_del" column
-#+
-#+ @param p_semana_del - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00017_semana_del_checkColumnConstraints(p_semana_del)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_semana_del LIKE irtb00017.semana_del
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00017_semana_del_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00017.semana_al" column
-#+
-#+ @param p_semana_al - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00017_semana_al_checkColumnConstraints(p_semana_al)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_semana_al LIKE irtb00017.semana_al
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00017_semana_al_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00017.exis_act" column
-#+
-#+ @param p_exis_act - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00017_exis_act_checkColumnConstraints(p_exis_act)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_exis_act LIKE irtb00017.exis_act
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00017_exis_act_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00017.exis_fisica" column
-#+
-#+ @param p_exis_fisica - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00017_exis_fisica_checkColumnConstraints(p_exis_fisica)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_exis_fisica LIKE irtb00017.exis_fisica
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00017_exis_fisica_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00017.status_t" column
-#+
-#+ @param p_status_t - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00017_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE irtb00017.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00017_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00017.us_crea" column
-#+
-#+ @param p_us_crea - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00017_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE irtb00017.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00017_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00017.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00017_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE irtb00017.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00017_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00017.us_mod" column
-#+
-#+ @param p_us_mod - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00017_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE irtb00017.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00017_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00017.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00017_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE irtb00017.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00017_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00016" table
-#+
-#+ @param p_data - a row data LIKE irtb00016.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00016_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE irtb00016.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_irtb00016_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00016_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00016_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00016_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00016_categoria_checkColumnConstraints(p_data.categoria) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00016_mes_ch_checkColumnConstraints(p_data.mes_ch) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00016_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00016_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00016_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00016_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00016_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00016_checkTableConstraints
-
-{}
-#+ Check constraints on the "irtb00016.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00016_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE irtb00016.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00016_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00016.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00016_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE irtb00016.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00016_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00016.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00016_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE irtb00016.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00016_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00016.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00016_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE irtb00016.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00016_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00016.categoria" column
-#+
-#+ @param p_categoria - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00016_categoria_checkColumnConstraints(p_categoria)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_categoria LIKE irtb00016.categoria
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00016_categoria_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00016.mes_ch" column
-#+
-#+ @param p_mes_ch - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00016_mes_ch_checkColumnConstraints(p_mes_ch)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mes_ch LIKE irtb00016.mes_ch
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00016_mes_ch_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00016.status_t" column
-#+
-#+ @param p_status_t - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00016_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE irtb00016.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00016_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00016.us_crea" column
-#+
-#+ @param p_us_crea - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00016_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE irtb00016.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00016_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00016.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00016_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE irtb00016.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00016_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00016.us_mod" column
-#+
-#+ @param p_us_mod - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00016_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE irtb00016.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00016_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00016.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00016_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE irtb00016.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00016_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00014" table
-#+
-#+ @param p_data - a row data LIKE irtb00014.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00014_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE irtb00014.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_irtb00014_num_salida_checkColumnConstraints(p_data.num_salida) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00014_cod_mov_checkColumnConstraints(p_data.cod_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00014_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00014_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00014_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00014_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00014_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00014_checkTableConstraints
-
-{}
-#+ Check constraints on the "irtb00014.num_salida" column
-#+
-#+ @param p_num_salida - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00014_num_salida_checkColumnConstraints(p_num_salida)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_salida LIKE irtb00014.num_salida
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00014_num_salida_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00014.cod_mov" column
-#+
-#+ @param p_cod_mov - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00014_cod_mov_checkColumnConstraints(p_cod_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mov LIKE irtb00014.cod_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00014_cod_mov_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00014.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00014_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE irtb00014.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00014_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00014.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00014_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE irtb00014.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00014_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00014.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00014_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE irtb00014.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00014_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00014.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00014_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE irtb00014.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00014_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00014.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00014_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE irtb00014.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00014_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00013" table
-#+
-#+ @param p_data - a row data LIKE irtb00013.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00013_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE irtb00013.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_irtb00013_mes_ini_checkColumnConstraints(p_data.mes_ini) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00013_mes_fin_checkColumnConstraints(p_data.mes_fin) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00013_ano_checkColumnConstraints(p_data.ano) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00013_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00013_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00013_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00013_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00013_costo_st_checkColumnConstraints(p_data.costo_st) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00013_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00013_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00013_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00013_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00013_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- CALL smarmotech_dbxconstraints_irtb00013_pk_irtb00013_checkUniqueConstraint(p_forUpdate, p_data.ano, p_data.cod_n, p_data.cod_grupo, p_data.cod_tipo, p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00013_checkTableConstraints
-
-{}
-#+ Check the primary key uniqueness constraint on the "irtb00013"
-#+
-#+ @param p_key - Primary Key
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00013_pk_irtb00013_checkUniqueConstraint(p_forUpdate, p_key)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_key
- RECORD
- irtb00013_ano LIKE irtb00013.ano,
- irtb00013_cod_n LIKE irtb00013.cod_n,
- irtb00013_cod_grupo LIKE irtb00013.cod_grupo,
- irtb00013_cod_tipo LIKE irtb00013.cod_tipo,
- irtb00013_cod_sec LIKE irtb00013.cod_sec
- END RECORD
- DEFINE l_key
- RECORD
- irtb00013_ano LIKE irtb00013.ano,
- irtb00013_cod_n LIKE irtb00013.cod_n,
- irtb00013_cod_grupo LIKE irtb00013.cod_grupo,
- irtb00013_cod_tipo LIKE irtb00013.cod_tipo,
- irtb00013_cod_sec LIKE irtb00013.cod_sec
- END RECORD
- DEFINE l_where STRING
- DEFINE l_sqlQuery STRING
- DEFINE l_count INTEGER
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- LET l_where = "WHERE irtb00013.ano = ?
- AND irtb00013.cod_n = ?
- AND irtb00013.cod_grupo = ?
- AND irtb00013.cod_tipo = ?
- AND irtb00013.cod_sec = ? "
-
- let l_sqlQuery = "SELECT COUNT(*), ano, cod_n, cod_grupo, cod_tipo, cod_sec FROM irtb00013 ", l_where, " GROUP BY ano, cod_n, cod_grupo, cod_tipo, cod_sec"
-
- PREPARE cur_irtb00013_pk_irtb00013_checkUniqueConstraint FROM l_sqlQuery
- EXECUTE cur_irtb00013_pk_irtb00013_checkUniqueConstraint INTO l_count, l_key.* USING p_key.*
- FREE cur_irtb00013_pk_irtb00013_checkUniqueConstraint
- IF (NOT p_forUpdate AND l_count > 0) OR (p_forUpdate AND l_count > 0 AND p_key.* != l_key.*) THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- ano + cod_n + cod_grupo + cod_tipo + cod_sec: " || ERROR_BAM_00002) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00013_pk_irtb00013_checkUniqueConstraint
-
-{}
-#+ Check constraints on the "irtb00013.mes_ini" column
-#+
-#+ @param p_mes_ini - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00013_mes_ini_checkColumnConstraints(p_mes_ini)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mes_ini LIKE irtb00013.mes_ini
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00013_mes_ini_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00013.mes_fin" column
-#+
-#+ @param p_mes_fin - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00013_mes_fin_checkColumnConstraints(p_mes_fin)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mes_fin LIKE irtb00013.mes_fin
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00013_mes_fin_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00013.ano" column
-#+
-#+ @param p_ano - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00013_ano_checkColumnConstraints(p_ano)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ano LIKE irtb00013.ano
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_ano IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- ano: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00013_ano_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00013.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00013_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE irtb00013.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_n IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_n: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00013_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00013.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00013_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE irtb00013.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_grupo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_grupo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00013_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00013.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00013_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE irtb00013.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_tipo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_tipo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00013_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00013.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00013_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE irtb00013.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_sec IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_sec: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00013_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00013.costo_st" column
-#+
-#+ @param p_costo_st - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00013_costo_st_checkColumnConstraints(p_costo_st)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_costo_st LIKE irtb00013.costo_st
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00013_costo_st_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00013.status_t" column
-#+
-#+ @param p_status_t - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00013_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE irtb00013.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00013_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00013.us_crea" column
-#+
-#+ @param p_us_crea - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00013_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE irtb00013.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00013_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00013.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00013_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE irtb00013.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00013_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00013.us_mod" column
-#+
-#+ @param p_us_mod - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00013_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE irtb00013.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00013_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00013.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00013_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE irtb00013.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00013_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00012" table
-#+
-#+ @param p_data - a row data LIKE irtb00012.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00012_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE irtb00012.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_irtb00012_idtrx_checkColumnConstraints(p_data.idtrx) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00012_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00012_bodega_checkColumnConstraints(p_data.bodega) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00012_cod_seccion_checkColumnConstraints(p_data.cod_seccion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00012_cod_tramo_checkColumnConstraints(p_data.cod_tramo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00012_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00012_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00012_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00012_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00012_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00012_balance_checkColumnConstraints(p_data.balance) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00012_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00012_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00012_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00012_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00012_checkTableConstraints
-
-{}
-#+ Check constraints on the "irtb00012.idtrx" column
-#+
-#+ @param p_idtrx - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00012_idtrx_checkColumnConstraints(p_idtrx)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_idtrx LIKE irtb00012.idtrx
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00012_idtrx_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00012.fecha" column
-#+
-#+ @param p_fecha - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00012_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE irtb00012.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00012_fecha_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00012.bodega" column
-#+
-#+ @param p_bodega - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00012_bodega_checkColumnConstraints(p_bodega)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_bodega LIKE irtb00012.bodega
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00012_bodega_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00012.cod_seccion" column
-#+
-#+ @param p_cod_seccion - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00012_cod_seccion_checkColumnConstraints(p_cod_seccion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_seccion LIKE irtb00012.cod_seccion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00012_cod_seccion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00012.cod_tramo" column
-#+
-#+ @param p_cod_tramo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00012_cod_tramo_checkColumnConstraints(p_cod_tramo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tramo LIKE irtb00012.cod_tramo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00012_cod_tramo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00012.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00012_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE irtb00012.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00012_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00012.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00012_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE irtb00012.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00012_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00012.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00012_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE irtb00012.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00012_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00012.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00012_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE irtb00012.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00012_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00012.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00012_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE irtb00012.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00012_cantidad_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00012.balance" column
-#+
-#+ @param p_balance - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00012_balance_checkColumnConstraints(p_balance)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_balance LIKE irtb00012.balance
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00012_balance_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00012.us_crea" column
-#+
-#+ @param p_us_crea - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00012_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE irtb00012.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00012_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00012.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00012_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE irtb00012.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00012_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00012.us_mod" column
-#+
-#+ @param p_us_mod - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00012_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE irtb00012.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00012_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00012.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00012_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE irtb00012.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00012_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00011" table
-#+
-#+ @param p_data - a row data LIKE irtb00011.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00011_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE irtb00011.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_irtb00011_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00011_bodega_checkColumnConstraints(p_data.bodega) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00011_cod_seccion_checkColumnConstraints(p_data.cod_seccion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00011_cod_tramo_checkColumnConstraints(p_data.cod_tramo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00011_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00011_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00011_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00011_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00011_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00011_balance_checkColumnConstraints(p_data.balance) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00011_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00011_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00011_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00011_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00011_checkTableConstraints
-
-{}
-#+ Check constraints on the "irtb00011.fecha" column
-#+
-#+ @param p_fecha - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00011_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE irtb00011.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_fecha IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- fecha: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00011_fecha_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00011.bodega" column
-#+
-#+ @param p_bodega - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00011_bodega_checkColumnConstraints(p_bodega)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_bodega LIKE irtb00011.bodega
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_bodega IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- bodega: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00011_bodega_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00011.cod_seccion" column
-#+
-#+ @param p_cod_seccion - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00011_cod_seccion_checkColumnConstraints(p_cod_seccion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_seccion LIKE irtb00011.cod_seccion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_seccion IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_seccion: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00011_cod_seccion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00011.cod_tramo" column
-#+
-#+ @param p_cod_tramo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00011_cod_tramo_checkColumnConstraints(p_cod_tramo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tramo LIKE irtb00011.cod_tramo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_tramo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_tramo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00011_cod_tramo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00011.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00011_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE irtb00011.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_n IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_n: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00011_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00011.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00011_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE irtb00011.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_grupo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_grupo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00011_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00011.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00011_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE irtb00011.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_tipo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_tipo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00011_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00011.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00011_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE irtb00011.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_sec IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_sec: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00011_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00011.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00011_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE irtb00011.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cantidad IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cantidad: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00011_cantidad_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00011.balance" column
-#+
-#+ @param p_balance - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00011_balance_checkColumnConstraints(p_balance)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_balance LIKE irtb00011.balance
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00011_balance_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00011.us_crea" column
-#+
-#+ @param p_us_crea - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00011_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE irtb00011.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00011_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00011.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00011_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE irtb00011.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00011_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00011.us_mod" column
-#+
-#+ @param p_us_mod - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00011_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE irtb00011.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00011_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00011.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00011_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE irtb00011.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00011_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00010" table
-#+
-#+ @param p_data - a row data LIKE irtb00010.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00010_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE irtb00010.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_irtb00010_codigo_checkColumnConstraints(p_data.codigo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00010_nombre_checkColumnConstraints(p_data.nombre) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00010_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00010_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00010_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00010_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00010_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00010_checkTableConstraints
-
-{}
-#+ Check constraints on the "irtb00010.codigo" column
-#+
-#+ @param p_codigo - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00010_codigo_checkColumnConstraints(p_codigo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codigo LIKE irtb00010.codigo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00010_codigo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00010.nombre" column
-#+
-#+ @param p_nombre - VARCHAR2(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00010_nombre_checkColumnConstraints(p_nombre)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombre LIKE irtb00010.nombre
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00010_nombre_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00010.status_t" column
-#+
-#+ @param p_status_t - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00010_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE irtb00010.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00010_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00010.us_crea" column
-#+
-#+ @param p_us_crea - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00010_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE irtb00010.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00010_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00010.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00010_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE irtb00010.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00010_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00010.us_mod" column
-#+
-#+ @param p_us_mod - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00010_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE irtb00010.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00010_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00010.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00010_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE irtb00010.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00010_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00009" table
-#+
-#+ @param p_data - a row data LIKE irtb00009.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00009_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE irtb00009.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_irtb00009_codigo_checkColumnConstraints(p_data.codigo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00009_nombre_checkColumnConstraints(p_data.nombre) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00009_unidad_med_checkColumnConstraints(p_data.unidad_med) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00009_modelo_checkColumnConstraints(p_data.modelo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00009_serie_checkColumnConstraints(p_data.serie) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00009_fabricante_checkColumnConstraints(p_data.fabricante) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00009_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00009_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00009_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00009_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00009_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00009_checkTableConstraints
-
-{}
-#+ Check constraints on the "irtb00009.codigo" column
-#+
-#+ @param p_codigo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00009_codigo_checkColumnConstraints(p_codigo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codigo LIKE irtb00009.codigo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00009_codigo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00009.nombre" column
-#+
-#+ @param p_nombre - VARCHAR2(25) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00009_nombre_checkColumnConstraints(p_nombre)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombre LIKE irtb00009.nombre
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00009_nombre_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00009.unidad_med" column
-#+
-#+ @param p_unidad_med - VARCHAR2(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00009_unidad_med_checkColumnConstraints(p_unidad_med)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_unidad_med LIKE irtb00009.unidad_med
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00009_unidad_med_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00009.modelo" column
-#+
-#+ @param p_modelo - VARCHAR2(15) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00009_modelo_checkColumnConstraints(p_modelo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_modelo LIKE irtb00009.modelo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00009_modelo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00009.serie" column
-#+
-#+ @param p_serie - VARCHAR2(15) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00009_serie_checkColumnConstraints(p_serie)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_serie LIKE irtb00009.serie
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00009_serie_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00009.fabricante" column
-#+
-#+ @param p_fabricante - VARCHAR2(45) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00009_fabricante_checkColumnConstraints(p_fabricante)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fabricante LIKE irtb00009.fabricante
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00009_fabricante_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00009.status_t" column
-#+
-#+ @param p_status_t - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00009_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE irtb00009.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00009_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00009.us_crea" column
-#+
-#+ @param p_us_crea - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00009_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE irtb00009.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00009_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00009.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00009_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE irtb00009.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00009_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00009.us_mod" column
-#+
-#+ @param p_us_mod - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00009_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE irtb00009.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00009_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00009.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00009_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE irtb00009.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00009_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00008" table
-#+
-#+ @param p_data - a row data LIKE irtb00008.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00008_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE irtb00008.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_irtb00008_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00008_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00008_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00008_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00008_cod_maq_checkColumnConstraints(p_data.cod_maq) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00008_numero_checkColumnConstraints(p_data.numero) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00008_serie_checkColumnConstraints(p_data.serie) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00008_distribuidor_checkColumnConstraints(p_data.distribuidor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00008_fabricante_checkColumnConstraints(p_data.fabricante) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00008_localizacion_checkColumnConstraints(p_data.localizacion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00008_material_checkColumnConstraints(p_data.material) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00008_dureza_checkColumnConstraints(p_data.dureza) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00008_motor_elec_checkColumnConstraints(p_data.motor_elec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00008_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00008_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00008_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00008_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00008_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00008_checkTableConstraints
-
-{}
-#+ Check constraints on the "irtb00008.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00008_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE irtb00008.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00008_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00008.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00008_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE irtb00008.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00008_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00008.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00008_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE irtb00008.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00008_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00008.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00008_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE irtb00008.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00008_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00008.cod_maq" column
-#+
-#+ @param p_cod_maq - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00008_cod_maq_checkColumnConstraints(p_cod_maq)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_maq LIKE irtb00008.cod_maq
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00008_cod_maq_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00008.numero" column
-#+
-#+ @param p_numero - VARCHAR2(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00008_numero_checkColumnConstraints(p_numero)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_numero LIKE irtb00008.numero
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00008_numero_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00008.serie" column
-#+
-#+ @param p_serie - VARCHAR2(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00008_serie_checkColumnConstraints(p_serie)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_serie LIKE irtb00008.serie
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00008_serie_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00008.distribuidor" column
-#+
-#+ @param p_distribuidor - VARCHAR2(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00008_distribuidor_checkColumnConstraints(p_distribuidor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_distribuidor LIKE irtb00008.distribuidor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00008_distribuidor_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00008.fabricante" column
-#+
-#+ @param p_fabricante - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00008_fabricante_checkColumnConstraints(p_fabricante)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fabricante LIKE irtb00008.fabricante
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00008_fabricante_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00008.localizacion" column
-#+
-#+ @param p_localizacion - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00008_localizacion_checkColumnConstraints(p_localizacion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_localizacion LIKE irtb00008.localizacion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00008_localizacion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00008.material" column
-#+
-#+ @param p_material - VARCHAR2(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00008_material_checkColumnConstraints(p_material)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_material LIKE irtb00008.material
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00008_material_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00008.dureza" column
-#+
-#+ @param p_dureza - VARCHAR2(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00008_dureza_checkColumnConstraints(p_dureza)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_dureza LIKE irtb00008.dureza
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00008_dureza_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00008.motor_elec" column
-#+
-#+ @param p_motor_elec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00008_motor_elec_checkColumnConstraints(p_motor_elec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_motor_elec LIKE irtb00008.motor_elec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00008_motor_elec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00008.status_t" column
-#+
-#+ @param p_status_t - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00008_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE irtb00008.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00008_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00008.us_crea" column
-#+
-#+ @param p_us_crea - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00008_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE irtb00008.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00008_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00008.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00008_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE irtb00008.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00008_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00008.us_mod" column
-#+
-#+ @param p_us_mod - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00008_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE irtb00008.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00008_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00008.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00008_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE irtb00008.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00008_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00007" table
-#+
-#+ @param p_data - a row data LIKE irtb00007.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00007_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE irtb00007.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_irtb00007_codigo_m_checkColumnConstraints(p_data.codigo_m) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00007_frame_checkColumnConstraints(p_data.frame) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00007_numero_checkColumnConstraints(p_data.numero) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00007_fase_m_checkColumnConstraints(p_data.fase_m) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00007_serie_checkColumnConstraints(p_data.serie) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00007_rpm_m_checkColumnConstraints(p_data.rpm_m) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00007_hp_m_checkColumnConstraints(p_data.hp_m) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00007_voltaje_checkColumnConstraints(p_data.voltaje) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00007_amperaje_checkColumnConstraints(p_data.amperaje) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00007_ciclo_checkColumnConstraints(p_data.ciclo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00007_tipo_checkColumnConstraints(p_data.tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00007_modelo_checkColumnConstraints(p_data.modelo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00007_marca_checkColumnConstraints(p_data.marca) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00007_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00007_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00007_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00007_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00007_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00007_checkTableConstraints
-
-{}
-#+ Check constraints on the "irtb00007.codigo_m" column
-#+
-#+ @param p_codigo_m - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00007_codigo_m_checkColumnConstraints(p_codigo_m)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codigo_m LIKE irtb00007.codigo_m
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00007_codigo_m_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00007.frame" column
-#+
-#+ @param p_frame - VARCHAR2(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00007_frame_checkColumnConstraints(p_frame)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_frame LIKE irtb00007.frame
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00007_frame_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00007.numero" column
-#+
-#+ @param p_numero - VARCHAR2(15) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00007_numero_checkColumnConstraints(p_numero)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_numero LIKE irtb00007.numero
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00007_numero_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00007.fase_m" column
-#+
-#+ @param p_fase_m - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00007_fase_m_checkColumnConstraints(p_fase_m)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fase_m LIKE irtb00007.fase_m
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00007_fase_m_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00007.serie" column
-#+
-#+ @param p_serie - VARCHAR2(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00007_serie_checkColumnConstraints(p_serie)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_serie LIKE irtb00007.serie
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00007_serie_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00007.rpm_m" column
-#+
-#+ @param p_rpm_m - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00007_rpm_m_checkColumnConstraints(p_rpm_m)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_rpm_m LIKE irtb00007.rpm_m
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00007_rpm_m_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00007.hp_m" column
-#+
-#+ @param p_hp_m - VARCHAR2(7) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00007_hp_m_checkColumnConstraints(p_hp_m)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_hp_m LIKE irtb00007.hp_m
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00007_hp_m_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00007.voltaje" column
-#+
-#+ @param p_voltaje - VARCHAR2(7) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00007_voltaje_checkColumnConstraints(p_voltaje)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_voltaje LIKE irtb00007.voltaje
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00007_voltaje_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00007.amperaje" column
-#+
-#+ @param p_amperaje - VARCHAR2(7) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00007_amperaje_checkColumnConstraints(p_amperaje)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_amperaje LIKE irtb00007.amperaje
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00007_amperaje_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00007.ciclo" column
-#+
-#+ @param p_ciclo - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00007_ciclo_checkColumnConstraints(p_ciclo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ciclo LIKE irtb00007.ciclo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00007_ciclo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00007.tipo" column
-#+
-#+ @param p_tipo - VARCHAR2(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00007_tipo_checkColumnConstraints(p_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo LIKE irtb00007.tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00007_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00007.modelo" column
-#+
-#+ @param p_modelo - VARCHAR2(15) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00007_modelo_checkColumnConstraints(p_modelo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_modelo LIKE irtb00007.modelo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00007_modelo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00007.marca" column
-#+
-#+ @param p_marca - VARCHAR2(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00007_marca_checkColumnConstraints(p_marca)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_marca LIKE irtb00007.marca
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00007_marca_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00007.status_t" column
-#+
-#+ @param p_status_t - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00007_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE irtb00007.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00007_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00007.us_crea" column
-#+
-#+ @param p_us_crea - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00007_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE irtb00007.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00007_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00007.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00007_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE irtb00007.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00007_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00007.us_mod" column
-#+
-#+ @param p_us_mod - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00007_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE irtb00007.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00007_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00007.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00007_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE irtb00007.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00007_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00006" table
-#+
-#+ @param p_data - a row data LIKE irtb00006.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00006_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE irtb00006.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_irtb00006_num_doc_checkColumnConstraints(p_data.num_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00006_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00006_fact_no_checkColumnConstraints(p_data.fact_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00006_conduce_no_checkColumnConstraints(p_data.conduce_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00006_tipo_checkColumnConstraints(p_data.tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00006_orden_compra_checkColumnConstraints(p_data.orden_compra) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00006_cod_sp_checkColumnConstraints(p_data.cod_sp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00006_cod_sp_sec_checkColumnConstraints(p_data.cod_sp_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00006_cod_mov_checkColumnConstraints(p_data.cod_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00006_maquina_checkColumnConstraints(p_data.maquina) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00006_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00006_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00006_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00006_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00006_cantidad_1_checkColumnConstraints(p_data.cantidad_1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00006_cantidad_2_checkColumnConstraints(p_data.cantidad_2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00006_sec_de_checkColumnConstraints(p_data.sec_de) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00006_sec_a_checkColumnConstraints(p_data.sec_a) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00006_status_mov_checkColumnConstraints(p_data.status_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00006_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00006_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00006_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00006_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00006_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00006_bodega_checkColumnConstraints(p_data.bodega) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00006_checkTableConstraints
-
-{}
-#+ Check constraints on the "irtb00006.num_doc" column
-#+
-#+ @param p_num_doc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00006_num_doc_checkColumnConstraints(p_num_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_doc LIKE irtb00006.num_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_num_doc IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- num_doc: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00006_num_doc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00006.fecha" column
-#+
-#+ @param p_fecha - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00006_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE irtb00006.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_fecha IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- fecha: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00006_fecha_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00006.fact_no" column
-#+
-#+ @param p_fact_no - VARCHAR2(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00006_fact_no_checkColumnConstraints(p_fact_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fact_no LIKE irtb00006.fact_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00006_fact_no_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00006.conduce_no" column
-#+
-#+ @param p_conduce_no - VARCHAR2(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00006_conduce_no_checkColumnConstraints(p_conduce_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_conduce_no LIKE irtb00006.conduce_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00006_conduce_no_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00006.tipo" column
-#+
-#+ @param p_tipo - VARCHAR2(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00006_tipo_checkColumnConstraints(p_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo LIKE irtb00006.tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00006_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00006.orden_compra" column
-#+
-#+ @param p_orden_compra - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00006_orden_compra_checkColumnConstraints(p_orden_compra)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_orden_compra LIKE irtb00006.orden_compra
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00006_orden_compra_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00006.cod_sp" column
-#+
-#+ @param p_cod_sp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00006_cod_sp_checkColumnConstraints(p_cod_sp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sp LIKE irtb00006.cod_sp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00006_cod_sp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00006.cod_sp_sec" column
-#+
-#+ @param p_cod_sp_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00006_cod_sp_sec_checkColumnConstraints(p_cod_sp_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sp_sec LIKE irtb00006.cod_sp_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00006_cod_sp_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00006.cod_mov" column
-#+
-#+ @param p_cod_mov - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00006_cod_mov_checkColumnConstraints(p_cod_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mov LIKE irtb00006.cod_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_mov IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_mov: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00006_cod_mov_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00006.maquina" column
-#+
-#+ @param p_maquina - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00006_maquina_checkColumnConstraints(p_maquina)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_maquina LIKE irtb00006.maquina
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00006_maquina_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00006.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00006_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE irtb00006.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00006_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00006.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00006_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE irtb00006.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00006_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00006.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00006_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE irtb00006.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00006_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00006.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00006_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE irtb00006.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00006_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00006.cantidad_1" column
-#+
-#+ @param p_cantidad_1 - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00006_cantidad_1_checkColumnConstraints(p_cantidad_1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad_1 LIKE irtb00006.cantidad_1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00006_cantidad_1_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00006.cantidad_2" column
-#+
-#+ @param p_cantidad_2 - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00006_cantidad_2_checkColumnConstraints(p_cantidad_2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad_2 LIKE irtb00006.cantidad_2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00006_cantidad_2_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00006.sec_de" column
-#+
-#+ @param p_sec_de - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00006_sec_de_checkColumnConstraints(p_sec_de)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_de LIKE irtb00006.sec_de
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00006_sec_de_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00006.sec_a" column
-#+
-#+ @param p_sec_a - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00006_sec_a_checkColumnConstraints(p_sec_a)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_a LIKE irtb00006.sec_a
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00006_sec_a_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00006.status_mov" column
-#+
-#+ @param p_status_mov - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00006_status_mov_checkColumnConstraints(p_status_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_mov LIKE irtb00006.status_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00006_status_mov_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00006.status_t" column
-#+
-#+ @param p_status_t - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00006_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE irtb00006.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00006_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00006.us_crea" column
-#+
-#+ @param p_us_crea - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00006_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE irtb00006.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00006_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00006.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00006_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE irtb00006.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00006_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00006.us_mod" column
-#+
-#+ @param p_us_mod - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00006_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE irtb00006.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00006_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00006.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00006_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE irtb00006.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00006_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00006.bodega" column
-#+
-#+ @param p_bodega - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00006_bodega_checkColumnConstraints(p_bodega)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_bodega LIKE irtb00006.bodega
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00006_bodega_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00005" table
-#+
-#+ @param p_data - a row data LIKE irtb00005.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00005_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE irtb00005.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_irtb00005_cod_mov_checkColumnConstraints(p_data.cod_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00005_descrip_mov_checkColumnConstraints(p_data.descrip_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00005_status_mov_checkColumnConstraints(p_data.status_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00005_cuenta_1_checkColumnConstraints(p_data.cuenta_1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00005_cuenta_2_checkColumnConstraints(p_data.cuenta_2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00005_cuenta_3_checkColumnConstraints(p_data.cuenta_3) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00005_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00005_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00005_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00005_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00005_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00005_checkTableConstraints
-
-{}
-#+ Check constraints on the "irtb00005.cod_mov" column
-#+
-#+ @param p_cod_mov - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00005_cod_mov_checkColumnConstraints(p_cod_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mov LIKE irtb00005.cod_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_mov IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_mov: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00005_cod_mov_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00005.descrip_mov" column
-#+
-#+ @param p_descrip_mov - VARCHAR2(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00005_descrip_mov_checkColumnConstraints(p_descrip_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descrip_mov LIKE irtb00005.descrip_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00005_descrip_mov_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00005.status_mov" column
-#+
-#+ @param p_status_mov - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00005_status_mov_checkColumnConstraints(p_status_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_mov LIKE irtb00005.status_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00005_status_mov_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00005.cuenta_1" column
-#+
-#+ @param p_cuenta_1 - VARCHAR2(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00005_cuenta_1_checkColumnConstraints(p_cuenta_1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cuenta_1 LIKE irtb00005.cuenta_1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00005_cuenta_1_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00005.cuenta_2" column
-#+
-#+ @param p_cuenta_2 - VARCHAR2(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00005_cuenta_2_checkColumnConstraints(p_cuenta_2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cuenta_2 LIKE irtb00005.cuenta_2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00005_cuenta_2_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00005.cuenta_3" column
-#+
-#+ @param p_cuenta_3 - VARCHAR2(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00005_cuenta_3_checkColumnConstraints(p_cuenta_3)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cuenta_3 LIKE irtb00005.cuenta_3
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00005_cuenta_3_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00005.status_t" column
-#+
-#+ @param p_status_t - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00005_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE irtb00005.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00005_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00005.us_crea" column
-#+
-#+ @param p_us_crea - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00005_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE irtb00005.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00005_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00005.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00005_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE irtb00005.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00005_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00005.us_mod" column
-#+
-#+ @param p_us_mod - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00005_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE irtb00005.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00005_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00005.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00005_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE irtb00005.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00005_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00002" table
-#+
-#+ @param p_data - a row data LIKE irtb00002.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00002_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE irtb00002.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_irtb00002_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00002_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00002_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00002_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00002_descrip_esp_checkColumnConstraints(p_data.descrip_esp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00002_descrip_ing_checkColumnConstraints(p_data.descrip_ing) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00002_unidad_med_checkColumnConstraints(p_data.unidad_med) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00002_existencia_checkColumnConstraints(p_data.existencia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00002_exist_min_checkColumnConstraints(p_data.exist_min) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00002_dia_llegada_checkColumnConstraints(p_data.dia_llegada) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00002_categoria_checkColumnConstraints(p_data.categoria) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00002_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00002_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00002_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00002_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00002_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- CALL smarmotech_dbxconstraints_irtb00002_pk_irtb00002_checkUniqueConstraint(p_forUpdate, p_data.cod_n, p_data.cod_grupo, p_data.cod_tipo, p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00002_checkTableConstraints
-
-{}
-#+ Check the primary key uniqueness constraint on the "irtb00002"
-#+
-#+ @param p_key - Primary Key
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00002_pk_irtb00002_checkUniqueConstraint(p_forUpdate, p_key)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_key
- RECORD
- irtb00002_cod_n LIKE irtb00002.cod_n,
- irtb00002_cod_grupo LIKE irtb00002.cod_grupo,
- irtb00002_cod_tipo LIKE irtb00002.cod_tipo,
- irtb00002_cod_sec LIKE irtb00002.cod_sec
- END RECORD
- DEFINE l_key
- RECORD
- irtb00002_cod_n LIKE irtb00002.cod_n,
- irtb00002_cod_grupo LIKE irtb00002.cod_grupo,
- irtb00002_cod_tipo LIKE irtb00002.cod_tipo,
- irtb00002_cod_sec LIKE irtb00002.cod_sec
- END RECORD
- DEFINE l_where STRING
- DEFINE l_sqlQuery STRING
- DEFINE l_count INTEGER
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- LET l_where = "WHERE irtb00002.cod_n = ?
- AND irtb00002.cod_grupo = ?
- AND irtb00002.cod_tipo = ?
- AND irtb00002.cod_sec = ? "
-
- let l_sqlQuery = "SELECT COUNT(*), cod_n, cod_grupo, cod_tipo, cod_sec FROM irtb00002 ", l_where, " GROUP BY cod_n, cod_grupo, cod_tipo, cod_sec"
-
- PREPARE cur_irtb00002_pk_irtb00002_checkUniqueConstraint FROM l_sqlQuery
- EXECUTE cur_irtb00002_pk_irtb00002_checkUniqueConstraint INTO l_count, l_key.* USING p_key.*
- FREE cur_irtb00002_pk_irtb00002_checkUniqueConstraint
- IF (NOT p_forUpdate AND l_count > 0) OR (p_forUpdate AND l_count > 0 AND p_key.* != l_key.*) THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_n + cod_grupo + cod_tipo + cod_sec: " || ERROR_BAM_00002) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00002_pk_irtb00002_checkUniqueConstraint
-
-{}
-#+ Check constraints on the "irtb00002.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00002_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE irtb00002.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_n IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_n: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00002_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00002.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00002_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE irtb00002.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_grupo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_grupo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00002_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00002.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00002_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE irtb00002.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_tipo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_tipo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00002_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00002.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00002_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE irtb00002.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_sec IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_sec: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00002_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00002.descrip_esp" column
-#+
-#+ @param p_descrip_esp - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00002_descrip_esp_checkColumnConstraints(p_descrip_esp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descrip_esp LIKE irtb00002.descrip_esp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00002_descrip_esp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00002.descrip_ing" column
-#+
-#+ @param p_descrip_ing - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00002_descrip_ing_checkColumnConstraints(p_descrip_ing)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descrip_ing LIKE irtb00002.descrip_ing
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00002_descrip_ing_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00002.unidad_med" column
-#+
-#+ @param p_unidad_med - CHAR(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00002_unidad_med_checkColumnConstraints(p_unidad_med)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_unidad_med LIKE irtb00002.unidad_med
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00002_unidad_med_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00002.existencia" column
-#+
-#+ @param p_existencia - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00002_existencia_checkColumnConstraints(p_existencia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_existencia LIKE irtb00002.existencia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00002_existencia_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00002.exist_min" column
-#+
-#+ @param p_exist_min - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00002_exist_min_checkColumnConstraints(p_exist_min)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_exist_min LIKE irtb00002.exist_min
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00002_exist_min_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00002.dia_llegada" column
-#+
-#+ @param p_dia_llegada - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00002_dia_llegada_checkColumnConstraints(p_dia_llegada)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_dia_llegada LIKE irtb00002.dia_llegada
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00002_dia_llegada_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00002.categoria" column
-#+
-#+ @param p_categoria - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00002_categoria_checkColumnConstraints(p_categoria)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_categoria LIKE irtb00002.categoria
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00002_categoria_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00002.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00002_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE irtb00002.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00002_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00002.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00002_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE irtb00002.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00002_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00002.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00002_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE irtb00002.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00002_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00002.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00002_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE irtb00002.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00002_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00002.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00002_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE irtb00002.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00002_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00001" table
-#+
-#+ @param p_data - a row data LIKE irtb00001.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00001_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE irtb00001.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_irtb00001_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00001_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00001_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00001_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00001_descrip_esp_checkColumnConstraints(p_data.descrip_esp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00001_descrip_ing_checkColumnConstraints(p_data.descrip_ing) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00001_unidad_med_checkColumnConstraints(p_data.unidad_med) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00001_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00001_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00001_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00001_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00001_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00001_checkTableConstraints
-
-{}
-#+ Check constraints on the "irtb00001.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00001_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE irtb00001.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_n IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_n: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00001_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00001.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00001_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE irtb00001.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_grupo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_grupo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00001_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00001.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00001_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE irtb00001.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_tipo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_tipo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00001_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00001.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00001_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE irtb00001.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_sec IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_sec: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00001_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00001.descrip_esp" column
-#+
-#+ @param p_descrip_esp - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00001_descrip_esp_checkColumnConstraints(p_descrip_esp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descrip_esp LIKE irtb00001.descrip_esp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_descrip_esp IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- descrip_esp: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00001_descrip_esp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00001.descrip_ing" column
-#+
-#+ @param p_descrip_ing - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00001_descrip_ing_checkColumnConstraints(p_descrip_ing)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descrip_ing LIKE irtb00001.descrip_ing
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00001_descrip_ing_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00001.unidad_med" column
-#+
-#+ @param p_unidad_med - CHAR(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00001_unidad_med_checkColumnConstraints(p_unidad_med)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_unidad_med LIKE irtb00001.unidad_med
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00001_unidad_med_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00001.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00001_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE irtb00001.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00001_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00001.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00001_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE irtb00001.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00001_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00001.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00001_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE irtb00001.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00001_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00001.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00001_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE irtb00001.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00001_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "irtb00001.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00001_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE irtb00001.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.irtb00001_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ircodigos" table
-#+
-#+ @param p_data - a row data LIKE ircodigos.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_ircodigos_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE ircodigos.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_ircodigos_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ircodigos_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ircodigos_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ircodigos_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ircodigos_cuenta_checkColumnConstraints(p_data.cuenta) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ircodigos_checkTableConstraints
-
-{}
-#+ Check constraints on the "ircodigos.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ircodigos_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE ircodigos.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ircodigos_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ircodigos.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ircodigos_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE ircodigos.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ircodigos_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ircodigos.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ircodigos_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE ircodigos.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ircodigos_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ircodigos.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ircodigos_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE ircodigos.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ircodigos_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "ircodigos.cuenta" column
-#+
-#+ @param p_cuenta - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ircodigos_cuenta_checkColumnConstraints(p_cuenta)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cuenta LIKE ircodigos.cuenta
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.ircodigos_cuenta_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptbexistencia" table
-#+
-#+ @param p_data - a row data LIKE iptbexistencia.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptbexistencia_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE iptbexistencia.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_iptbexistencia_id_checkColumnConstraints(p_data.id) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptbexistencia_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptbexistencia_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptbexistencia_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptbexistencia_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptbexistencia_num_doc_checkColumnConstraints(p_data.num_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptbexistencia_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptbexistencia_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptbexistencia_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptbexistencia_checkTableConstraints
-
-{}
-#+ Check constraints on the "iptbexistencia.id" column
-#+
-#+ @param p_id - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptbexistencia_id_checkColumnConstraints(p_id)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_id LIKE iptbexistencia.id
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptbexistencia_id_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptbexistencia.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptbexistencia_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE iptbexistencia.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptbexistencia_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptbexistencia.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptbexistencia_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE iptbexistencia.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptbexistencia_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptbexistencia.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptbexistencia_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE iptbexistencia.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptbexistencia_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptbexistencia.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptbexistencia_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE iptbexistencia.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptbexistencia_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptbexistencia.num_doc" column
-#+
-#+ @param p_num_doc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptbexistencia_num_doc_checkColumnConstraints(p_num_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_doc LIKE iptbexistencia.num_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptbexistencia_num_doc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptbexistencia.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptbexistencia_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE iptbexistencia.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptbexistencia_cantidad_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptbexistencia.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptbexistencia_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE iptbexistencia.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptbexistencia_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptbexistencia.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptbexistencia_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE iptbexistencia.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptbexistencia_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb025" table
-#+
-#+ @param p_data - a row data LIKE iptb025.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb025_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE iptb025.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_iptb025_etiqueta_checkColumnConstraints(p_data.etiqueta) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb025_cod_mov_checkColumnConstraints(p_data.cod_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb025_num_doc_checkColumnConstraints(p_data.num_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb025_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb025_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb025_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb025_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb025_lado_1_checkColumnConstraints(p_data.lado_1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb025_lado_2_checkColumnConstraints(p_data.lado_2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb025_lado_3_checkColumnConstraints(p_data.lado_3) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb025_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb025_medida_checkColumnConstraints(p_data.medida) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb025_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb025_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb025_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb025_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb025_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb025_checkTableConstraints
-
-{}
-#+ Check constraints on the "iptb025.etiqueta" column
-#+
-#+ @param p_etiqueta - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb025_etiqueta_checkColumnConstraints(p_etiqueta)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_etiqueta LIKE iptb025.etiqueta
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb025_etiqueta_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb025.cod_mov" column
-#+
-#+ @param p_cod_mov - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb025_cod_mov_checkColumnConstraints(p_cod_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mov LIKE iptb025.cod_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb025_cod_mov_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb025.num_doc" column
-#+
-#+ @param p_num_doc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb025_num_doc_checkColumnConstraints(p_num_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_doc LIKE iptb025.num_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb025_num_doc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb025.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb025_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE iptb025.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb025_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb025.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb025_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE iptb025.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb025_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb025.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb025_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE iptb025.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb025_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb025.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb025_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE iptb025.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb025_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb025.lado_1" column
-#+
-#+ @param p_lado_1 - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb025_lado_1_checkColumnConstraints(p_lado_1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_lado_1 LIKE iptb025.lado_1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb025_lado_1_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb025.lado_2" column
-#+
-#+ @param p_lado_2 - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb025_lado_2_checkColumnConstraints(p_lado_2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_lado_2 LIKE iptb025.lado_2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb025_lado_2_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb025.lado_3" column
-#+
-#+ @param p_lado_3 - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb025_lado_3_checkColumnConstraints(p_lado_3)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_lado_3 LIKE iptb025.lado_3
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb025_lado_3_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb025.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb025_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE iptb025.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb025_cantidad_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb025.medida" column
-#+
-#+ @param p_medida - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb025_medida_checkColumnConstraints(p_medida)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_medida LIKE iptb025.medida
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb025_medida_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb025.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb025_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE iptb025.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb025_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb025.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb025_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE iptb025.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb025_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb025.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb025_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE iptb025.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb025_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb025.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb025_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE iptb025.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb025_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb025.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb025_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE iptb025.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb025_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00048" table
-#+
-#+ @param p_data - a row data LIKE iptb00048.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00048_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE iptb00048.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_iptb00048_bodega_checkColumnConstraints(p_data.bodega) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00048_usuario_checkColumnConstraints(p_data.usuario) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00048_checkTableConstraints
-
-{}
-#+ Check constraints on the "iptb00048.bodega" column
-#+
-#+ @param p_bodega - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00048_bodega_checkColumnConstraints(p_bodega)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_bodega LIKE iptb00048.bodega
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00048_bodega_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00048.usuario" column
-#+
-#+ @param p_usuario - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00048_usuario_checkColumnConstraints(p_usuario)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_usuario LIKE iptb00048.usuario
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00048_usuario_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00047" table
-#+
-#+ @param p_data - a row data LIKE iptb00047.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00047_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE iptb00047.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_iptb00047_id_ficha_checkColumnConstraints(p_data.id_ficha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00047_instalacion_checkColumnConstraints(p_data.instalacion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00047_secuencia_checkColumnConstraints(p_data.secuencia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00047_checkTableConstraints
-
-{}
-#+ Check constraints on the "iptb00047.id_ficha" column
-#+
-#+ @param p_id_ficha - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00047_id_ficha_checkColumnConstraints(p_id_ficha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_id_ficha LIKE iptb00047.id_ficha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00047_id_ficha_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00047.instalacion" column
-#+
-#+ @param p_instalacion - TEXT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00047_instalacion_checkColumnConstraints(p_instalacion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_instalacion LIKE iptb00047.instalacion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00047_instalacion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00047.secuencia" column
-#+
-#+ @param p_secuencia - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00047_secuencia_checkColumnConstraints(p_secuencia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_secuencia LIKE iptb00047.secuencia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00047_secuencia_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00046" table
-#+
-#+ @param p_data - a row data LIKE iptb00046.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00046_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE iptb00046.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_iptb00046_id_ficha_checkColumnConstraints(p_data.id_ficha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00046_foto_producto_checkColumnConstraints(p_data.foto_producto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00046_secuencia_checkColumnConstraints(p_data.secuencia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00046_checkTableConstraints
-
-{}
-#+ Check constraints on the "iptb00046.id_ficha" column
-#+
-#+ @param p_id_ficha - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00046_id_ficha_checkColumnConstraints(p_id_ficha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_id_ficha LIKE iptb00046.id_ficha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00046_id_ficha_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00046.foto_producto" column
-#+
-#+ @param p_foto_producto - CHAR(200) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00046_foto_producto_checkColumnConstraints(p_foto_producto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_foto_producto LIKE iptb00046.foto_producto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00046_foto_producto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00046.secuencia" column
-#+
-#+ @param p_secuencia - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00046_secuencia_checkColumnConstraints(p_secuencia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_secuencia LIKE iptb00046.secuencia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00046_secuencia_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00045" table
-#+
-#+ @param p_data - a row data LIKE iptb00045.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00045_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE iptb00045.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_iptb00045_id_ficha_checkColumnConstraints(p_data.id_ficha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00045_caracteristicas_checkColumnConstraints(p_data.caracteristicas) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00045_secuencia_checkColumnConstraints(p_data.secuencia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00045_checkTableConstraints
-
-{}
-#+ Check constraints on the "iptb00045.id_ficha" column
-#+
-#+ @param p_id_ficha - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00045_id_ficha_checkColumnConstraints(p_id_ficha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_id_ficha LIKE iptb00045.id_ficha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00045_id_ficha_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00045.caracteristicas" column
-#+
-#+ @param p_caracteristicas - BYTE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00045_caracteristicas_checkColumnConstraints(p_caracteristicas)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_caracteristicas LIKE iptb00045.caracteristicas
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00045_caracteristicas_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00045.secuencia" column
-#+
-#+ @param p_secuencia - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00045_secuencia_checkColumnConstraints(p_secuencia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_secuencia LIKE iptb00045.secuencia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00045_secuencia_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00044" table
-#+
-#+ @param p_data - a row data LIKE iptb00044.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00044_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE iptb00044.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_iptb00044_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00044_cod_provincia_checkColumnConstraints(p_data.cod_provincia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00044_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00044_tipo_checkColumnConstraints(p_data.tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00044_id_ficha_checkColumnConstraints(p_data.id_ficha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00044_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00044_us_crera_checkColumnConstraints(p_data.us_crera) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00044_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00044_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00044_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00044_checkTableConstraints
-
-{}
-#+ Check constraints on the "iptb00044.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00044_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE iptb00044.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00044_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00044.cod_provincia" column
-#+
-#+ @param p_cod_provincia - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00044_cod_provincia_checkColumnConstraints(p_cod_provincia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_provincia LIKE iptb00044.cod_provincia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00044_cod_provincia_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00044.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00044_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE iptb00044.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00044_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00044.tipo" column
-#+
-#+ @param p_tipo - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00044_tipo_checkColumnConstraints(p_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo LIKE iptb00044.tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00044_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00044.id_ficha" column
-#+
-#+ @param p_id_ficha - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00044_id_ficha_checkColumnConstraints(p_id_ficha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_id_ficha LIKE iptb00044.id_ficha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00044_id_ficha_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00044.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00044_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE iptb00044.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00044_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00044.us_crera" column
-#+
-#+ @param p_us_crera - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00044_us_crera_checkColumnConstraints(p_us_crera)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crera LIKE iptb00044.us_crera
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00044_us_crera_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00044.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00044_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE iptb00044.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00044_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00044.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00044_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE iptb00044.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00044_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00044.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00044_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE iptb00044.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00044_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00043" table
-#+
-#+ @param p_data - a row data LIKE iptb00043.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00043_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE iptb00043.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_iptb00043_num_doc_checkColumnConstraints(p_data.num_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00043_usuario_checkColumnConstraints(p_data.usuario) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00043_checkTableConstraints
-
-{}
-#+ Check constraints on the "iptb00043.num_doc" column
-#+
-#+ @param p_num_doc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00043_num_doc_checkColumnConstraints(p_num_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_doc LIKE iptb00043.num_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00043_num_doc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00043.usuario" column
-#+
-#+ @param p_usuario - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00043_usuario_checkColumnConstraints(p_usuario)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_usuario LIKE iptb00043.usuario
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00043_usuario_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00042" table
-#+
-#+ @param p_data - a row data LIKE iptb00042.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00042_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE iptb00042.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_iptb00042_num_doc_checkColumnConstraints(p_data.num_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00042_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00042_cod_mov_checkColumnConstraints(p_data.cod_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00042_bodega_checkColumnConstraints(p_data.bodega) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00042_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00042_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00042_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00042_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00042_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00042_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00042_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00042_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00042_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00042_checkTableConstraints
-
-{}
-#+ Check constraints on the "iptb00042.num_doc" column
-#+
-#+ @param p_num_doc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00042_num_doc_checkColumnConstraints(p_num_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_doc LIKE iptb00042.num_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00042_num_doc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00042.fecha" column
-#+
-#+ @param p_fecha - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00042_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE iptb00042.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00042_fecha_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00042.cod_mov" column
-#+
-#+ @param p_cod_mov - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00042_cod_mov_checkColumnConstraints(p_cod_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mov LIKE iptb00042.cod_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00042_cod_mov_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00042.bodega" column
-#+
-#+ @param p_bodega - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00042_bodega_checkColumnConstraints(p_bodega)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_bodega LIKE iptb00042.bodega
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00042_bodega_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00042.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00042_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE iptb00042.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00042_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00042.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00042_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE iptb00042.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00042_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00042.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00042_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE iptb00042.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00042_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00042.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00042_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE iptb00042.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00042_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00042.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(18,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00042_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE iptb00042.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00042_cantidad_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00042.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00042_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE iptb00042.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00042_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00042.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00042_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE iptb00042.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00042_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00042.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00042_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE iptb00042.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00042_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00042.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00042_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE iptb00042.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00042_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00041" table
-#+
-#+ @param p_data - a row data LIKE iptb00041.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00041_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE iptb00041.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_iptb00041_fecha_act_checkColumnConstraints(p_data.fecha_act) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00041_idtrx_checkColumnConstraints(p_data.idtrx) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00041_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00041_bodega_checkColumnConstraints(p_data.bodega) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00041_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00041_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00041_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00041_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00041_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00041_balance_checkColumnConstraints(p_data.balance) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00041_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00041_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00041_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00041_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00041_checkTableConstraints
-
-{}
-#+ Check constraints on the "iptb00041.fecha_act" column
-#+
-#+ @param p_fecha_act - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00041_fecha_act_checkColumnConstraints(p_fecha_act)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_act LIKE iptb00041.fecha_act
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00041_fecha_act_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00041.idtrx" column
-#+
-#+ @param p_idtrx - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00041_idtrx_checkColumnConstraints(p_idtrx)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_idtrx LIKE iptb00041.idtrx
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00041_idtrx_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00041.fecha" column
-#+
-#+ @param p_fecha - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00041_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE iptb00041.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00041_fecha_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00041.bodega" column
-#+
-#+ @param p_bodega - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00041_bodega_checkColumnConstraints(p_bodega)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_bodega LIKE iptb00041.bodega
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00041_bodega_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00041.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00041_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE iptb00041.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00041_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00041.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00041_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE iptb00041.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00041_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00041.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00041_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE iptb00041.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00041_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00041.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00041_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE iptb00041.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00041_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00041.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00041_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE iptb00041.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00041_cantidad_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00041.balance" column
-#+
-#+ @param p_balance - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00041_balance_checkColumnConstraints(p_balance)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_balance LIKE iptb00041.balance
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00041_balance_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00041.us_crea" column
-#+
-#+ @param p_us_crea - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00041_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE iptb00041.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00041_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00041.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00041_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE iptb00041.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00041_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00041.us_mod" column
-#+
-#+ @param p_us_mod - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00041_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE iptb00041.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00041_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00041.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00041_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE iptb00041.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00041_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00040" table
-#+
-#+ @param p_data - a row data LIKE iptb00040.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00040_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE iptb00040.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_iptb00040_fecha_act_checkColumnConstraints(p_data.fecha_act) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00040_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00040_bodega_checkColumnConstraints(p_data.bodega) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00040_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00040_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00040_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00040_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00040_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00040_balance_checkColumnConstraints(p_data.balance) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00040_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00040_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00040_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00040_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00040_checkTableConstraints
-
-{}
-#+ Check constraints on the "iptb00040.fecha_act" column
-#+
-#+ @param p_fecha_act - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00040_fecha_act_checkColumnConstraints(p_fecha_act)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_act LIKE iptb00040.fecha_act
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00040_fecha_act_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00040.fecha" column
-#+
-#+ @param p_fecha - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00040_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE iptb00040.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00040_fecha_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00040.bodega" column
-#+
-#+ @param p_bodega - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00040_bodega_checkColumnConstraints(p_bodega)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_bodega LIKE iptb00040.bodega
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00040_bodega_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00040.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00040_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE iptb00040.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00040_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00040.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00040_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE iptb00040.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00040_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00040.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00040_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE iptb00040.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00040_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00040.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00040_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE iptb00040.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00040_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00040.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00040_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE iptb00040.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00040_cantidad_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00040.balance" column
-#+
-#+ @param p_balance - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00040_balance_checkColumnConstraints(p_balance)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_balance LIKE iptb00040.balance
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00040_balance_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00040.us_crea" column
-#+
-#+ @param p_us_crea - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00040_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE iptb00040.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00040_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00040.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00040_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE iptb00040.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00040_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00040.us_mod" column
-#+
-#+ @param p_us_mod - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00040_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE iptb00040.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00040_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00040.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00040_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE iptb00040.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00040_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00034" table
-#+
-#+ @param p_data - a row data LIKE iptb00034.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00034_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE iptb00034.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_iptb00034_id_kit_checkColumnConstraints(p_data.id_kit) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00034_num_doc_checkColumnConstraints(p_data.num_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00034_cod_mov_checkColumnConstraints(p_data.cod_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00034_area_checkColumnConstraints(p_data.area) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00034_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00034_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00034_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00034_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00034_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00034_precio_checkColumnConstraints(p_data.precio) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00034_checkTableConstraints
-
-{}
-#+ Check constraints on the "iptb00034.id_kit" column
-#+
-#+ @param p_id_kit - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00034_id_kit_checkColumnConstraints(p_id_kit)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_id_kit LIKE iptb00034.id_kit
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00034_id_kit_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00034.num_doc" column
-#+
-#+ @param p_num_doc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00034_num_doc_checkColumnConstraints(p_num_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_doc LIKE iptb00034.num_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00034_num_doc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00034.cod_mov" column
-#+
-#+ @param p_cod_mov - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00034_cod_mov_checkColumnConstraints(p_cod_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mov LIKE iptb00034.cod_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00034_cod_mov_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00034.area" column
-#+
-#+ @param p_area - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00034_area_checkColumnConstraints(p_area)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_area LIKE iptb00034.area
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00034_area_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00034.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00034_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE iptb00034.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00034_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00034.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00034_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE iptb00034.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00034_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00034.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00034_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE iptb00034.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00034_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00034.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00034_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE iptb00034.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00034_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00034.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00034_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE iptb00034.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00034_cantidad_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00034.precio" column
-#+
-#+ @param p_precio - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00034_precio_checkColumnConstraints(p_precio)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_precio LIKE iptb00034.precio
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00034_precio_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00033" table
-#+
-#+ @param p_data - a row data LIKE iptb00033.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00033_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE iptb00033.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_iptb00033_documento_checkColumnConstraints(p_data.documento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00033_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00033_codigo_checkColumnConstraints(p_data.codigo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00033_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00033_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00033_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00033_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00033_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00033_bodega_checkColumnConstraints(p_data.bodega) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00033_checkTableConstraints
-
-{}
-#+ Check constraints on the "iptb00033.documento" column
-#+
-#+ @param p_documento - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00033_documento_checkColumnConstraints(p_documento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_documento LIKE iptb00033.documento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_documento IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- documento: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00033_documento_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00033.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00033_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE iptb00033.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_fecha IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- fecha: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00033_fecha_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00033.codigo" column
-#+
-#+ @param p_codigo - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00033_codigo_checkColumnConstraints(p_codigo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codigo LIKE iptb00033.codigo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_codigo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- codigo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00033_codigo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00033.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00033_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE iptb00033.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_n IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_n: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00033_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00033.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00033_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE iptb00033.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_grupo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_grupo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00033_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00033.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00033_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE iptb00033.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_tipo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_tipo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00033_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00033.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00033_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE iptb00033.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_sec IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_sec: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00033_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00033.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(18,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00033_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE iptb00033.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cantidad IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cantidad: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00033_cantidad_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00033.bodega" column
-#+
-#+ @param p_bodega - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00033_bodega_checkColumnConstraints(p_bodega)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_bodega LIKE iptb00033.bodega
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_bodega IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- bodega: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00033_bodega_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00032" table
-#+
-#+ @param p_data - a row data LIKE iptb00032.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00032_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE iptb00032.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_iptb00032_documento_checkColumnConstraints(p_data.documento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00032_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00032_usuario_checkColumnConstraints(p_data.usuario) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- CALL smarmotech_dbxconstraints_iptb00032_pk_iptb00032_checkUniqueConstraint(p_forUpdate, p_data.documento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00032_checkTableConstraints
-
-{}
-#+ Check the primary key uniqueness constraint on the "iptb00032"
-#+
-#+ @param p_key - Primary Key
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00032_pk_iptb00032_checkUniqueConstraint(p_forUpdate, p_key)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_key
- RECORD
- iptb00032_documento LIKE iptb00032.documento
- END RECORD
- DEFINE l_key
- RECORD
- iptb00032_documento LIKE iptb00032.documento
- END RECORD
- DEFINE l_where STRING
- DEFINE l_sqlQuery STRING
- DEFINE l_count INTEGER
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- LET l_where = "WHERE iptb00032.documento = ? "
-
- let l_sqlQuery = "SELECT COUNT(*), documento FROM iptb00032 ", l_where, " GROUP BY documento"
-
- PREPARE cur_iptb00032_pk_iptb00032_checkUniqueConstraint FROM l_sqlQuery
- EXECUTE cur_iptb00032_pk_iptb00032_checkUniqueConstraint INTO l_count, l_key.* USING p_key.*
- FREE cur_iptb00032_pk_iptb00032_checkUniqueConstraint
- IF (NOT p_forUpdate AND l_count > 0) OR (p_forUpdate AND l_count > 0 AND p_key.* != l_key.*) THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- documento: " || ERROR_BAM_00002) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00032_pk_iptb00032_checkUniqueConstraint
-
-{}
-#+ Check constraints on the "iptb00032.documento" column
-#+
-#+ @param p_documento - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00032_documento_checkColumnConstraints(p_documento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_documento LIKE iptb00032.documento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_documento IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- documento: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00032_documento_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00032.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00032_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE iptb00032.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_fecha IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- fecha: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00032_fecha_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00032.usuario" column
-#+
-#+ @param p_usuario - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00032_usuario_checkColumnConstraints(p_usuario)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_usuario LIKE iptb00032.usuario
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_usuario IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- usuario: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00032_usuario_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00031" table
-#+
-#+ @param p_data - a row data LIKE iptb00031.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00031_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE iptb00031.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_iptb00031_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00031_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00031_checkTableConstraints
-
-{}
-#+ Check constraints on the "iptb00031.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00031_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE iptb00031.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00031_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00031.descripcion" column
-#+
-#+ @param p_descripcion - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00031_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE iptb00031.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00031_descripcion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00030" table
-#+
-#+ @param p_data - a row data LIKE iptb00030.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00030_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE iptb00030.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_iptb00030_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00030_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00030_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00030_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00030_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00030_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00030_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00030_checkTableConstraints
-
-{}
-#+ Check constraints on the "iptb00030.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00030_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE iptb00030.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00030_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00030.descripcion" column
-#+
-#+ @param p_descripcion - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00030_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE iptb00030.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00030_descripcion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00030.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00030_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE iptb00030.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00030_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00030.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00030_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE iptb00030.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00030_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00030.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00030_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE iptb00030.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00030_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00030.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00030_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE iptb00030.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00030_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00030.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00030_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE iptb00030.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00030_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00029" table
-#+
-#+ @param p_data - a row data LIKE iptb00029.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00029_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE iptb00029.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_iptb00029_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00029_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00029_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00029_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00029_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00029_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00029_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00029_checkTableConstraints
-
-{}
-#+ Check constraints on the "iptb00029.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00029_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE iptb00029.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00029_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00029.descripcion" column
-#+
-#+ @param p_descripcion - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00029_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE iptb00029.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00029_descripcion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00029.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00029_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE iptb00029.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00029_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00029.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00029_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE iptb00029.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00029_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00029.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00029_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE iptb00029.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00029_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00029.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00029_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE iptb00029.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00029_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00029.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00029_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE iptb00029.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00029_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00028" table
-#+
-#+ @param p_data - a row data LIKE iptb00028.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00028_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE iptb00028.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_iptb00028_cod_mov_checkColumnConstraints(p_data.cod_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00028_num_doc_checkColumnConstraints(p_data.num_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00028_cod_mov1_checkColumnConstraints(p_data.cod_mov1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00028_entrada_checkColumnConstraints(p_data.entrada) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00028_bodega_checkColumnConstraints(p_data.bodega) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00028_checkTableConstraints
-
-{}
-#+ Check constraints on the "iptb00028.cod_mov" column
-#+
-#+ @param p_cod_mov - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00028_cod_mov_checkColumnConstraints(p_cod_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mov LIKE iptb00028.cod_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00028_cod_mov_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00028.num_doc" column
-#+
-#+ @param p_num_doc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00028_num_doc_checkColumnConstraints(p_num_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_doc LIKE iptb00028.num_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00028_num_doc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00028.cod_mov1" column
-#+
-#+ @param p_cod_mov1 - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00028_cod_mov1_checkColumnConstraints(p_cod_mov1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mov1 LIKE iptb00028.cod_mov1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00028_cod_mov1_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00028.entrada" column
-#+
-#+ @param p_entrada - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00028_entrada_checkColumnConstraints(p_entrada)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_entrada LIKE iptb00028.entrada
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00028_entrada_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00028.bodega" column
-#+
-#+ @param p_bodega - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00028_bodega_checkColumnConstraints(p_bodega)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_bodega LIKE iptb00028.bodega
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00028_bodega_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00027" table
-#+
-#+ @param p_data - a row data LIKE iptb00027.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00027_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE iptb00027.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_iptb00027_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00027_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00027_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00027_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00027_checkTableConstraints
-
-{}
-#+ Check constraints on the "iptb00027.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00027_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE iptb00027.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00027_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00027.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00027_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE iptb00027.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00027_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00027.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00027_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE iptb00027.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00027_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00027.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00027_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE iptb00027.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00027_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00026" table
-#+
-#+ @param p_data - a row data LIKE iptb00026.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00026_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE iptb00026.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_iptb00026_cod_mov_checkColumnConstraints(p_data.cod_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00026_num_doc_checkColumnConstraints(p_data.num_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00026_departamento_checkColumnConstraints(p_data.departamento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00026_bodega_checkColumnConstraints(p_data.bodega) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00026_checkTableConstraints
-
-{}
-#+ Check constraints on the "iptb00026.cod_mov" column
-#+
-#+ @param p_cod_mov - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00026_cod_mov_checkColumnConstraints(p_cod_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mov LIKE iptb00026.cod_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00026_cod_mov_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00026.num_doc" column
-#+
-#+ @param p_num_doc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00026_num_doc_checkColumnConstraints(p_num_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_doc LIKE iptb00026.num_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00026_num_doc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00026.departamento" column
-#+
-#+ @param p_departamento - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00026_departamento_checkColumnConstraints(p_departamento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_departamento LIKE iptb00026.departamento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00026_departamento_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00026.bodega" column
-#+
-#+ @param p_bodega - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00026_bodega_checkColumnConstraints(p_bodega)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_bodega LIKE iptb00026.bodega
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00026_bodega_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00025" table
-#+
-#+ @param p_data - a row data LIKE iptb00025.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00025_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE iptb00025.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_iptb00025_etiqueta_checkColumnConstraints(p_data.etiqueta) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00025_cod_mov_checkColumnConstraints(p_data.cod_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00025_num_doc_checkColumnConstraints(p_data.num_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00025_area_checkColumnConstraints(p_data.area) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00025_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00025_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00025_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00025_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00025_lado_1_checkColumnConstraints(p_data.lado_1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00025_lado_2_checkColumnConstraints(p_data.lado_2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00025_lado_3_checkColumnConstraints(p_data.lado_3) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00025_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00025_medida_checkColumnConstraints(p_data.medida) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00025_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00025_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00025_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00025_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00025_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00025_checkTableConstraints
-
-{}
-#+ Check constraints on the "iptb00025.etiqueta" column
-#+
-#+ @param p_etiqueta - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00025_etiqueta_checkColumnConstraints(p_etiqueta)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_etiqueta LIKE iptb00025.etiqueta
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00025_etiqueta_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00025.cod_mov" column
-#+
-#+ @param p_cod_mov - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00025_cod_mov_checkColumnConstraints(p_cod_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mov LIKE iptb00025.cod_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00025_cod_mov_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00025.num_doc" column
-#+
-#+ @param p_num_doc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00025_num_doc_checkColumnConstraints(p_num_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_doc LIKE iptb00025.num_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00025_num_doc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00025.area" column
-#+
-#+ @param p_area - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00025_area_checkColumnConstraints(p_area)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_area LIKE iptb00025.area
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00025_area_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00025.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00025_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE iptb00025.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00025_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00025.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00025_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE iptb00025.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00025_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00025.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00025_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE iptb00025.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00025_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00025.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00025_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE iptb00025.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00025_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00025.lado_1" column
-#+
-#+ @param p_lado_1 - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00025_lado_1_checkColumnConstraints(p_lado_1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_lado_1 LIKE iptb00025.lado_1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00025_lado_1_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00025.lado_2" column
-#+
-#+ @param p_lado_2 - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00025_lado_2_checkColumnConstraints(p_lado_2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_lado_2 LIKE iptb00025.lado_2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00025_lado_2_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00025.lado_3" column
-#+
-#+ @param p_lado_3 - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00025_lado_3_checkColumnConstraints(p_lado_3)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_lado_3 LIKE iptb00025.lado_3
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00025_lado_3_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00025.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00025_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE iptb00025.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00025_cantidad_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00025.medida" column
-#+
-#+ @param p_medida - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00025_medida_checkColumnConstraints(p_medida)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_medida LIKE iptb00025.medida
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00025_medida_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00025.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00025_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE iptb00025.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00025_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00025.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00025_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE iptb00025.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00025_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00025.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00025_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE iptb00025.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00025_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00025.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00025_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE iptb00025.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00025_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00025.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00025_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE iptb00025.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00025_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00024" table
-#+
-#+ @param p_data - a row data LIKE iptb00024.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00024_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE iptb00024.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_iptb00024_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00024_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00024_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00024_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00024_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00024_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00024_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00024_cod_inv_checkColumnConstraints(p_data.cod_inv) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- CALL smarmotech_dbxconstraints_iptb00024_pk_iptb00024_checkUniqueConstraint(p_forUpdate, p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00024_checkTableConstraints
-
-{}
-#+ Check the primary key uniqueness constraint on the "iptb00024"
-#+
-#+ @param p_key - Primary Key
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00024_pk_iptb00024_checkUniqueConstraint(p_forUpdate, p_key)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_key
- RECORD
- iptb00024_cod_tipo LIKE iptb00024.cod_tipo
- END RECORD
- DEFINE l_key
- RECORD
- iptb00024_cod_tipo LIKE iptb00024.cod_tipo
- END RECORD
- DEFINE l_where STRING
- DEFINE l_sqlQuery STRING
- DEFINE l_count INTEGER
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- LET l_where = "WHERE iptb00024.cod_tipo = ? "
-
- let l_sqlQuery = "SELECT COUNT(*), cod_tipo FROM iptb00024 ", l_where, " GROUP BY cod_tipo"
-
- PREPARE cur_iptb00024_pk_iptb00024_checkUniqueConstraint FROM l_sqlQuery
- EXECUTE cur_iptb00024_pk_iptb00024_checkUniqueConstraint INTO l_count, l_key.* USING p_key.*
- FREE cur_iptb00024_pk_iptb00024_checkUniqueConstraint
- IF (NOT p_forUpdate AND l_count > 0) OR (p_forUpdate AND l_count > 0 AND p_key.* != l_key.*) THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_tipo: " || ERROR_BAM_00002) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00024_pk_iptb00024_checkUniqueConstraint
-
-{}
-#+ Check constraints on the "iptb00024.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00024_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE iptb00024.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_tipo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_tipo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00024_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00024.descripcion" column
-#+
-#+ @param p_descripcion - VARCHAR2(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00024_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE iptb00024.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00024_descripcion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00024.status_t" column
-#+
-#+ @param p_status_t - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00024_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE iptb00024.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00024_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00024.us_crea" column
-#+
-#+ @param p_us_crea - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00024_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE iptb00024.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00024_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00024.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00024_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE iptb00024.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00024_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00024.us_mod" column
-#+
-#+ @param p_us_mod - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00024_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE iptb00024.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00024_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00024.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00024_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE iptb00024.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00024_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00024.cod_inv" column
-#+
-#+ @param p_cod_inv - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00024_cod_inv_checkColumnConstraints(p_cod_inv)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_inv LIKE iptb00024.cod_inv
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00024_cod_inv_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00022" table
-#+
-#+ @param p_data - a row data LIKE iptb00022.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00022_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE iptb00022.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_iptb00022_cod_cia_checkColumnConstraints(p_data.cod_cia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00022_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00022_departamento_checkColumnConstraints(p_data.departamento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00022_cuenta_no_checkColumnConstraints(p_data.cuenta_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00022_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00022_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00022_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00022_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00022_checkTableConstraints
-
-{}
-#+ Check constraints on the "iptb00022.cod_cia" column
-#+
-#+ @param p_cod_cia - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00022_cod_cia_checkColumnConstraints(p_cod_cia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_cia LIKE iptb00022.cod_cia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00022_cod_cia_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00022.descripcion" column
-#+
-#+ @param p_descripcion - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00022_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE iptb00022.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00022_descripcion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00022.departamento" column
-#+
-#+ @param p_departamento - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00022_departamento_checkColumnConstraints(p_departamento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_departamento LIKE iptb00022.departamento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00022_departamento_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00022.cuenta_no" column
-#+
-#+ @param p_cuenta_no - CHAR(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00022_cuenta_no_checkColumnConstraints(p_cuenta_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cuenta_no LIKE iptb00022.cuenta_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00022_cuenta_no_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00022.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00022_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE iptb00022.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00022_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00022.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00022_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE iptb00022.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00022_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00022.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00022_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE iptb00022.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00022_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00022.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00022_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE iptb00022.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00022_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00021" table
-#+
-#+ @param p_data - a row data LIKE iptb00021.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00021_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE iptb00021.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_iptb00021_cod_cia_checkColumnConstraints(p_data.cod_cia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00021_nombre_cia_checkColumnConstraints(p_data.nombre_cia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00021_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00021_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00021_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00021_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00021_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00021_checkTableConstraints
-
-{}
-#+ Check constraints on the "iptb00021.cod_cia" column
-#+
-#+ @param p_cod_cia - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00021_cod_cia_checkColumnConstraints(p_cod_cia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_cia LIKE iptb00021.cod_cia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_cia IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_cia: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00021_cod_cia_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00021.nombre_cia" column
-#+
-#+ @param p_nombre_cia - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00021_nombre_cia_checkColumnConstraints(p_nombre_cia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombre_cia LIKE iptb00021.nombre_cia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00021_nombre_cia_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00021.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00021_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE iptb00021.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00021_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00021.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00021_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE iptb00021.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00021_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00021.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00021_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE iptb00021.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00021_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00021.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00021_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE iptb00021.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00021_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00021.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00021_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE iptb00021.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00021_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00020" table
-#+
-#+ @param p_data - a row data LIKE iptb00020.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00020_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE iptb00020.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_iptb00020_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00020_producto_checkColumnConstraints(p_data.producto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00020_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00020_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00020_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00020_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00020_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00020_cod_inv_checkColumnConstraints(p_data.cod_inv) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00020_comentario_checkColumnConstraints(p_data.comentario) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00020_checkTableConstraints
-
-{}
-#+ Check constraints on the "iptb00020.cod_n" column
-#+
-#+ @param p_cod_n - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00020_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE iptb00020.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_n IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_n: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00020_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00020.producto" column
-#+
-#+ @param p_producto - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00020_producto_checkColumnConstraints(p_producto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_producto LIKE iptb00020.producto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00020_producto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00020.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00020_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE iptb00020.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00020_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00020.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00020_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE iptb00020.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00020_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00020.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00020_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE iptb00020.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00020_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00020.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00020_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE iptb00020.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00020_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00020.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00020_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE iptb00020.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00020_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00020.cod_inv" column
-#+
-#+ @param p_cod_inv - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00020_cod_inv_checkColumnConstraints(p_cod_inv)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_inv LIKE iptb00020.cod_inv
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00020_cod_inv_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00020.comentario" column
-#+
-#+ @param p_comentario - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00020_comentario_checkColumnConstraints(p_comentario)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_comentario LIKE iptb00020.comentario
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00020_comentario_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00019" table
-#+
-#+ @param p_data - a row data LIKE iptb00019.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00019_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE iptb00019.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_iptb00019_marca_checkColumnConstraints(p_data.marca) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00019_nombre_marca_checkColumnConstraints(p_data.nombre_marca) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00019_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00019_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00019_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00019_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00019_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00019_checkTableConstraints
-
-{}
-#+ Check constraints on the "iptb00019.marca" column
-#+
-#+ @param p_marca - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00019_marca_checkColumnConstraints(p_marca)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_marca LIKE iptb00019.marca
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00019_marca_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00019.nombre_marca" column
-#+
-#+ @param p_nombre_marca - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00019_nombre_marca_checkColumnConstraints(p_nombre_marca)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombre_marca LIKE iptb00019.nombre_marca
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00019_nombre_marca_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00019.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00019_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE iptb00019.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00019_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00019.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00019_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE iptb00019.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00019_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00019.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00019_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE iptb00019.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00019_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00019.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00019_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE iptb00019.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00019_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00019.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00019_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE iptb00019.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00019_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00017" table
-#+
-#+ @param p_data - a row data LIKE iptb00017.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00017_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE iptb00017.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_iptb00017_cod_cia_checkColumnConstraints(p_data.cod_cia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00017_num_doc_checkColumnConstraints(p_data.num_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00017_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00017_fact_no_checkColumnConstraints(p_data.fact_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00017_conduce_no_checkColumnConstraints(p_data.conduce_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00017_tipo_checkColumnConstraints(p_data.tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00017_orden_compra_checkColumnConstraints(p_data.orden_compra) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00017_cod_sp_checkColumnConstraints(p_data.cod_sp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00017_cod_sp_sec_checkColumnConstraints(p_data.cod_sp_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00017_cod_transp_checkColumnConstraints(p_data.cod_transp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00017_sec_transp_checkColumnConstraints(p_data.sec_transp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00017_placa_checkColumnConstraints(p_data.placa) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00017_cod_tarifa_checkColumnConstraints(p_data.cod_tarifa) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00017_cod_mov_checkColumnConstraints(p_data.cod_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00017_detalle_checkColumnConstraints(p_data.detalle) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00017_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00017_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00017_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00017_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00017_cantidad_1_checkColumnConstraints(p_data.cantidad_1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00017_cantidad_2_checkColumnConstraints(p_data.cantidad_2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00017_cond_recep_checkColumnConstraints(p_data.cond_recep) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00017_uso_tiempo_checkColumnConstraints(p_data.uso_tiempo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00017_bodega_checkColumnConstraints(p_data.bodega) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00017_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00017_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00017_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00017_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00017_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00017_checkTableConstraints
-
-{}
-#+ Check constraints on the "iptb00017.cod_cia" column
-#+
-#+ @param p_cod_cia - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00017_cod_cia_checkColumnConstraints(p_cod_cia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_cia LIKE iptb00017.cod_cia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00017_cod_cia_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00017.num_doc" column
-#+
-#+ @param p_num_doc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00017_num_doc_checkColumnConstraints(p_num_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_doc LIKE iptb00017.num_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_num_doc IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- num_doc: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00017_num_doc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00017.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00017_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE iptb00017.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00017_fecha_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00017.fact_no" column
-#+
-#+ @param p_fact_no - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00017_fact_no_checkColumnConstraints(p_fact_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fact_no LIKE iptb00017.fact_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00017_fact_no_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00017.conduce_no" column
-#+
-#+ @param p_conduce_no - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00017_conduce_no_checkColumnConstraints(p_conduce_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_conduce_no LIKE iptb00017.conduce_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00017_conduce_no_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00017.tipo" column
-#+
-#+ @param p_tipo - CHAR(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00017_tipo_checkColumnConstraints(p_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo LIKE iptb00017.tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00017_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00017.orden_compra" column
-#+
-#+ @param p_orden_compra - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00017_orden_compra_checkColumnConstraints(p_orden_compra)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_orden_compra LIKE iptb00017.orden_compra
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00017_orden_compra_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00017.cod_sp" column
-#+
-#+ @param p_cod_sp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00017_cod_sp_checkColumnConstraints(p_cod_sp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sp LIKE iptb00017.cod_sp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00017_cod_sp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00017.cod_sp_sec" column
-#+
-#+ @param p_cod_sp_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00017_cod_sp_sec_checkColumnConstraints(p_cod_sp_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sp_sec LIKE iptb00017.cod_sp_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00017_cod_sp_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00017.cod_transp" column
-#+
-#+ @param p_cod_transp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00017_cod_transp_checkColumnConstraints(p_cod_transp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_transp LIKE iptb00017.cod_transp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00017_cod_transp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00017.sec_transp" column
-#+
-#+ @param p_sec_transp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00017_sec_transp_checkColumnConstraints(p_sec_transp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_transp LIKE iptb00017.sec_transp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00017_sec_transp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00017.placa" column
-#+
-#+ @param p_placa - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00017_placa_checkColumnConstraints(p_placa)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_placa LIKE iptb00017.placa
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00017_placa_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00017.cod_tarifa" column
-#+
-#+ @param p_cod_tarifa - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00017_cod_tarifa_checkColumnConstraints(p_cod_tarifa)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tarifa LIKE iptb00017.cod_tarifa
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00017_cod_tarifa_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00017.cod_mov" column
-#+
-#+ @param p_cod_mov - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00017_cod_mov_checkColumnConstraints(p_cod_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mov LIKE iptb00017.cod_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00017_cod_mov_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00017.detalle" column
-#+
-#+ @param p_detalle - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00017_detalle_checkColumnConstraints(p_detalle)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_detalle LIKE iptb00017.detalle
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00017_detalle_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00017.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00017_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE iptb00017.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00017_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00017.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00017_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE iptb00017.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00017_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00017.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00017_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE iptb00017.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00017_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00017.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00017_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE iptb00017.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00017_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00017.cantidad_1" column
-#+
-#+ @param p_cantidad_1 - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00017_cantidad_1_checkColumnConstraints(p_cantidad_1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad_1 LIKE iptb00017.cantidad_1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00017_cantidad_1_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00017.cantidad_2" column
-#+
-#+ @param p_cantidad_2 - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00017_cantidad_2_checkColumnConstraints(p_cantidad_2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad_2 LIKE iptb00017.cantidad_2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00017_cantidad_2_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00017.cond_recep" column
-#+
-#+ @param p_cond_recep - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00017_cond_recep_checkColumnConstraints(p_cond_recep)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cond_recep LIKE iptb00017.cond_recep
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00017_cond_recep_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00017.uso_tiempo" column
-#+
-#+ @param p_uso_tiempo - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00017_uso_tiempo_checkColumnConstraints(p_uso_tiempo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_uso_tiempo LIKE iptb00017.uso_tiempo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00017_uso_tiempo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00017.bodega" column
-#+
-#+ @param p_bodega - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00017_bodega_checkColumnConstraints(p_bodega)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_bodega LIKE iptb00017.bodega
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00017_bodega_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00017.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00017_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE iptb00017.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00017_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00017.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00017_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE iptb00017.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00017_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00017.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00017_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE iptb00017.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00017_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00017.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00017_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE iptb00017.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00017_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00017.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00017_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE iptb00017.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00017_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00015" table
-#+
-#+ @param p_data - a row data LIKE iptb00015.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00015_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE iptb00015.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_iptb00015_fecha_conteo_checkColumnConstraints(p_data.fecha_conteo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00015_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00015_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00015_checkTableConstraints
-
-{}
-#+ Check constraints on the "iptb00015.fecha_conteo" column
-#+
-#+ @param p_fecha_conteo - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00015_fecha_conteo_checkColumnConstraints(p_fecha_conteo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_conteo LIKE iptb00015.fecha_conteo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00015_fecha_conteo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00015.us_mod" column
-#+
-#+ @param p_us_mod - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00015_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE iptb00015.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00015_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00015.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00015_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE iptb00015.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00015_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00014" table
-#+
-#+ @param p_data - a row data LIKE iptb00014.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00014_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE iptb00014.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_iptb00014_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00014_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00014_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00014_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00014_precio_min_checkColumnConstraints(p_data.precio_min) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00014_precio_lista_checkColumnConstraints(p_data.precio_lista) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00014_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00014_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00014_fecha_crea_checkColumnConstraints(p_data.fecha_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00014_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00014_fecha_mod_checkColumnConstraints(p_data.fecha_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00014_checkTableConstraints
-
-{}
-#+ Check constraints on the "iptb00014.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00014_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE iptb00014.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_n IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_n: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00014_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00014.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00014_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE iptb00014.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_grupo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_grupo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00014_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00014.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00014_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE iptb00014.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_tipo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_tipo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00014_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00014.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00014_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE iptb00014.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_sec IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_sec: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00014_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00014.precio_min" column
-#+
-#+ @param p_precio_min - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00014_precio_min_checkColumnConstraints(p_precio_min)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_precio_min LIKE iptb00014.precio_min
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00014_precio_min_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00014.precio_lista" column
-#+
-#+ @param p_precio_lista - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00014_precio_lista_checkColumnConstraints(p_precio_lista)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_precio_lista LIKE iptb00014.precio_lista
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00014_precio_lista_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00014.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00014_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE iptb00014.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00014_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00014.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00014_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE iptb00014.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00014_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00014.fecha_crea" column
-#+
-#+ @param p_fecha_crea - VARCHAR2(27) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00014_fecha_crea_checkColumnConstraints(p_fecha_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_crea LIKE iptb00014.fecha_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00014_fecha_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00014.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00014_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE iptb00014.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00014_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00014.fecha_mod" column
-#+
-#+ @param p_fecha_mod - VARCHAR2(27) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00014_fecha_mod_checkColumnConstraints(p_fecha_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_mod LIKE iptb00014.fecha_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00014_fecha_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00013" table
-#+
-#+ @param p_data - a row data LIKE iptb00013.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00013_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE iptb00013.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_iptb00013_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00013_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00013_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00013_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00013_tipo_prod_checkColumnConstraints(p_data.tipo_prod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00013_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00013_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00013_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00013_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00013_checkTableConstraints
-
-{}
-#+ Check constraints on the "iptb00013.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00013_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE iptb00013.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00013_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00013.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00013_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE iptb00013.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00013_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00013.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00013_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE iptb00013.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00013_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00013.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00013_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE iptb00013.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00013_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00013.tipo_prod" column
-#+
-#+ @param p_tipo_prod - CHAR(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00013_tipo_prod_checkColumnConstraints(p_tipo_prod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_prod LIKE iptb00013.tipo_prod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00013_tipo_prod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00013.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00013_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE iptb00013.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00013_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00013.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00013_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE iptb00013.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00013_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00013.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00013_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE iptb00013.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00013_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00013.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00013_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE iptb00013.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00013_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00012" table
-#+
-#+ @param p_data - a row data LIKE iptb00012.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00012_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE iptb00012.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_iptb00012_idtrx_checkColumnConstraints(p_data.idtrx) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00012_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00012_bodega_checkColumnConstraints(p_data.bodega) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00012_cod_seccion_checkColumnConstraints(p_data.cod_seccion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00012_cod_tramo_checkColumnConstraints(p_data.cod_tramo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00012_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00012_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00012_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00012_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00012_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00012_balance_checkColumnConstraints(p_data.balance) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00012_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00012_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00012_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00012_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00012_lado_1_checkColumnConstraints(p_data.lado_1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00012_lado_2_checkColumnConstraints(p_data.lado_2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00012_lado_3_checkColumnConstraints(p_data.lado_3) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00012_checkTableConstraints
-
-{}
-#+ Check constraints on the "iptb00012.idtrx" column
-#+
-#+ @param p_idtrx - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00012_idtrx_checkColumnConstraints(p_idtrx)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_idtrx LIKE iptb00012.idtrx
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00012_idtrx_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00012.fecha" column
-#+
-#+ @param p_fecha - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00012_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE iptb00012.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00012_fecha_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00012.bodega" column
-#+
-#+ @param p_bodega - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00012_bodega_checkColumnConstraints(p_bodega)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_bodega LIKE iptb00012.bodega
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00012_bodega_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00012.cod_seccion" column
-#+
-#+ @param p_cod_seccion - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00012_cod_seccion_checkColumnConstraints(p_cod_seccion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_seccion LIKE iptb00012.cod_seccion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00012_cod_seccion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00012.cod_tramo" column
-#+
-#+ @param p_cod_tramo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00012_cod_tramo_checkColumnConstraints(p_cod_tramo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tramo LIKE iptb00012.cod_tramo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00012_cod_tramo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00012.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00012_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE iptb00012.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00012_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00012.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00012_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE iptb00012.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00012_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00012.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00012_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE iptb00012.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00012_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00012.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00012_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE iptb00012.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00012_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00012.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00012_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE iptb00012.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00012_cantidad_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00012.balance" column
-#+
-#+ @param p_balance - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00012_balance_checkColumnConstraints(p_balance)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_balance LIKE iptb00012.balance
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00012_balance_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00012.us_crea" column
-#+
-#+ @param p_us_crea - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00012_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE iptb00012.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00012_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00012.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00012_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE iptb00012.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00012_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00012.us_mod" column
-#+
-#+ @param p_us_mod - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00012_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE iptb00012.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00012_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00012.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00012_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE iptb00012.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00012_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00012.lado_1" column
-#+
-#+ @param p_lado_1 - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00012_lado_1_checkColumnConstraints(p_lado_1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_lado_1 LIKE iptb00012.lado_1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00012_lado_1_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00012.lado_2" column
-#+
-#+ @param p_lado_2 - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00012_lado_2_checkColumnConstraints(p_lado_2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_lado_2 LIKE iptb00012.lado_2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00012_lado_2_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00012.lado_3" column
-#+
-#+ @param p_lado_3 - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00012_lado_3_checkColumnConstraints(p_lado_3)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_lado_3 LIKE iptb00012.lado_3
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00012_lado_3_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00011" table
-#+
-#+ @param p_data - a row data LIKE iptb00011.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00011_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE iptb00011.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_iptb00011_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00011_bodega_checkColumnConstraints(p_data.bodega) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00011_cod_seccion_checkColumnConstraints(p_data.cod_seccion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00011_cod_tramo_checkColumnConstraints(p_data.cod_tramo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00011_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00011_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00011_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00011_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00011_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00011_balance_checkColumnConstraints(p_data.balance) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00011_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00011_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00011_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00011_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00011_checkTableConstraints
-
-{}
-#+ Check constraints on the "iptb00011.fecha" column
-#+
-#+ @param p_fecha - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00011_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE iptb00011.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_fecha IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- fecha: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00011_fecha_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00011.bodega" column
-#+
-#+ @param p_bodega - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00011_bodega_checkColumnConstraints(p_bodega)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_bodega LIKE iptb00011.bodega
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_bodega IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- bodega: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00011_bodega_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00011.cod_seccion" column
-#+
-#+ @param p_cod_seccion - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00011_cod_seccion_checkColumnConstraints(p_cod_seccion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_seccion LIKE iptb00011.cod_seccion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_seccion IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_seccion: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00011_cod_seccion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00011.cod_tramo" column
-#+
-#+ @param p_cod_tramo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00011_cod_tramo_checkColumnConstraints(p_cod_tramo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tramo LIKE iptb00011.cod_tramo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_tramo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_tramo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00011_cod_tramo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00011.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00011_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE iptb00011.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_n IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_n: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00011_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00011.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00011_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE iptb00011.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_grupo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_grupo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00011_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00011.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00011_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE iptb00011.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_tipo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_tipo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00011_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00011.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00011_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE iptb00011.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_sec IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_sec: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00011_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00011.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00011_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE iptb00011.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cantidad IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cantidad: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00011_cantidad_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00011.balance" column
-#+
-#+ @param p_balance - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00011_balance_checkColumnConstraints(p_balance)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_balance LIKE iptb00011.balance
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00011_balance_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00011.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00011_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE iptb00011.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00011_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00011.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00011_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE iptb00011.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00011_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00011.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00011_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE iptb00011.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00011_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00011.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00011_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE iptb00011.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00011_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00010" table
-#+
-#+ @param p_data - a row data LIKE iptb00010.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00010_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE iptb00010.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_iptb00010_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00010_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00010_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00010_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00010_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00010_cod_barra1_checkColumnConstraints(p_data.cod_barra1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00010_cod_barra2_checkColumnConstraints(p_data.cod_barra2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00010_conversion_checkColumnConstraints(p_data.conversion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00010_cod_dumm1_checkColumnConstraints(p_data.cod_dumm1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00010_cod_dumm2_checkColumnConstraints(p_data.cod_dumm2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00010_cod_dumm3_checkColumnConstraints(p_data.cod_dumm3) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00010_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00010_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00010_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00010_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00010_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00010_checkTableConstraints
-
-{}
-#+ Check constraints on the "iptb00010.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00010_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE iptb00010.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00010_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00010.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00010_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE iptb00010.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00010_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00010.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00010_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE iptb00010.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00010_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00010.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00010_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE iptb00010.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00010_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00010.descripcion" column
-#+
-#+ @param p_descripcion - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00010_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE iptb00010.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00010_descripcion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00010.cod_barra1" column
-#+
-#+ @param p_cod_barra1 - CHAR(13) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00010_cod_barra1_checkColumnConstraints(p_cod_barra1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_barra1 LIKE iptb00010.cod_barra1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00010_cod_barra1_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00010.cod_barra2" column
-#+
-#+ @param p_cod_barra2 - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00010_cod_barra2_checkColumnConstraints(p_cod_barra2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_barra2 LIKE iptb00010.cod_barra2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00010_cod_barra2_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00010.conversion" column
-#+
-#+ @param p_conversion - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00010_conversion_checkColumnConstraints(p_conversion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_conversion LIKE iptb00010.conversion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00010_conversion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00010.cod_dumm1" column
-#+
-#+ @param p_cod_dumm1 - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00010_cod_dumm1_checkColumnConstraints(p_cod_dumm1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_dumm1 LIKE iptb00010.cod_dumm1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00010_cod_dumm1_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00010.cod_dumm2" column
-#+
-#+ @param p_cod_dumm2 - CHAR(12) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00010_cod_dumm2_checkColumnConstraints(p_cod_dumm2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_dumm2 LIKE iptb00010.cod_dumm2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00010_cod_dumm2_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00010.cod_dumm3" column
-#+
-#+ @param p_cod_dumm3 - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00010_cod_dumm3_checkColumnConstraints(p_cod_dumm3)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_dumm3 LIKE iptb00010.cod_dumm3
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00010_cod_dumm3_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00010.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00010_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE iptb00010.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00010_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00010.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00010_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE iptb00010.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00010_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00010.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00010_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE iptb00010.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00010_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00010.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00010_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE iptb00010.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00010_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00010.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00010_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE iptb00010.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00010_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00008" table
-#+
-#+ @param p_data - a row data LIKE iptb00008.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00008_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE iptb00008.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_iptb00008_cod_cia_checkColumnConstraints(p_data.cod_cia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00008_num_doc_checkColumnConstraints(p_data.num_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00008_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00008_fact_no_checkColumnConstraints(p_data.fact_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00008_conduce_no_checkColumnConstraints(p_data.conduce_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00008_tipo_checkColumnConstraints(p_data.tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00008_orden_compra_checkColumnConstraints(p_data.orden_compra) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00008_cod_sp_checkColumnConstraints(p_data.cod_sp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00008_cod_sp_sec_checkColumnConstraints(p_data.cod_sp_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00008_cod_transp_checkColumnConstraints(p_data.cod_transp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00008_sec_transp_checkColumnConstraints(p_data.sec_transp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00008_placa_checkColumnConstraints(p_data.placa) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00008_cod_tarifa_checkColumnConstraints(p_data.cod_tarifa) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00008_cod_mov_checkColumnConstraints(p_data.cod_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00008_detalle_checkColumnConstraints(p_data.detalle) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00008_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00008_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00008_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00008_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00008_cantidad_1_checkColumnConstraints(p_data.cantidad_1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00008_cantidad_2_checkColumnConstraints(p_data.cantidad_2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00008_cond_recep_checkColumnConstraints(p_data.cond_recep) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00008_uso_tiempo_checkColumnConstraints(p_data.uso_tiempo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00008_bodega_checkColumnConstraints(p_data.bodega) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00008_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00008_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00008_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00008_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00008_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00008_checkTableConstraints
-
-{}
-#+ Check constraints on the "iptb00008.cod_cia" column
-#+
-#+ @param p_cod_cia - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00008_cod_cia_checkColumnConstraints(p_cod_cia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_cia LIKE iptb00008.cod_cia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00008_cod_cia_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00008.num_doc" column
-#+
-#+ @param p_num_doc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00008_num_doc_checkColumnConstraints(p_num_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_doc LIKE iptb00008.num_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_num_doc IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- num_doc: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00008_num_doc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00008.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00008_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE iptb00008.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00008_fecha_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00008.fact_no" column
-#+
-#+ @param p_fact_no - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00008_fact_no_checkColumnConstraints(p_fact_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fact_no LIKE iptb00008.fact_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00008_fact_no_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00008.conduce_no" column
-#+
-#+ @param p_conduce_no - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00008_conduce_no_checkColumnConstraints(p_conduce_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_conduce_no LIKE iptb00008.conduce_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00008_conduce_no_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00008.tipo" column
-#+
-#+ @param p_tipo - CHAR(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00008_tipo_checkColumnConstraints(p_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo LIKE iptb00008.tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00008_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00008.orden_compra" column
-#+
-#+ @param p_orden_compra - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00008_orden_compra_checkColumnConstraints(p_orden_compra)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_orden_compra LIKE iptb00008.orden_compra
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00008_orden_compra_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00008.cod_sp" column
-#+
-#+ @param p_cod_sp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00008_cod_sp_checkColumnConstraints(p_cod_sp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sp LIKE iptb00008.cod_sp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00008_cod_sp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00008.cod_sp_sec" column
-#+
-#+ @param p_cod_sp_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00008_cod_sp_sec_checkColumnConstraints(p_cod_sp_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sp_sec LIKE iptb00008.cod_sp_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00008_cod_sp_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00008.cod_transp" column
-#+
-#+ @param p_cod_transp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00008_cod_transp_checkColumnConstraints(p_cod_transp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_transp LIKE iptb00008.cod_transp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00008_cod_transp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00008.sec_transp" column
-#+
-#+ @param p_sec_transp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00008_sec_transp_checkColumnConstraints(p_sec_transp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_transp LIKE iptb00008.sec_transp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00008_sec_transp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00008.placa" column
-#+
-#+ @param p_placa - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00008_placa_checkColumnConstraints(p_placa)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_placa LIKE iptb00008.placa
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00008_placa_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00008.cod_tarifa" column
-#+
-#+ @param p_cod_tarifa - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00008_cod_tarifa_checkColumnConstraints(p_cod_tarifa)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tarifa LIKE iptb00008.cod_tarifa
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00008_cod_tarifa_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00008.cod_mov" column
-#+
-#+ @param p_cod_mov - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00008_cod_mov_checkColumnConstraints(p_cod_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mov LIKE iptb00008.cod_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_mov IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_mov: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00008_cod_mov_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00008.detalle" column
-#+
-#+ @param p_detalle - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00008_detalle_checkColumnConstraints(p_detalle)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_detalle LIKE iptb00008.detalle
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00008_detalle_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00008.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00008_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE iptb00008.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00008_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00008.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00008_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE iptb00008.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00008_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00008.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00008_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE iptb00008.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00008_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00008.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00008_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE iptb00008.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00008_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00008.cantidad_1" column
-#+
-#+ @param p_cantidad_1 - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00008_cantidad_1_checkColumnConstraints(p_cantidad_1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad_1 LIKE iptb00008.cantidad_1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00008_cantidad_1_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00008.cantidad_2" column
-#+
-#+ @param p_cantidad_2 - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00008_cantidad_2_checkColumnConstraints(p_cantidad_2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad_2 LIKE iptb00008.cantidad_2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cantidad_2 IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cantidad_2: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00008_cantidad_2_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00008.cond_recep" column
-#+
-#+ @param p_cond_recep - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00008_cond_recep_checkColumnConstraints(p_cond_recep)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cond_recep LIKE iptb00008.cond_recep
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00008_cond_recep_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00008.uso_tiempo" column
-#+
-#+ @param p_uso_tiempo - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00008_uso_tiempo_checkColumnConstraints(p_uso_tiempo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_uso_tiempo LIKE iptb00008.uso_tiempo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00008_uso_tiempo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00008.bodega" column
-#+
-#+ @param p_bodega - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00008_bodega_checkColumnConstraints(p_bodega)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_bodega LIKE iptb00008.bodega
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00008_bodega_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00008.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00008_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE iptb00008.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00008_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00008.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00008_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE iptb00008.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00008_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00008.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00008_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE iptb00008.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00008_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00008.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00008_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE iptb00008.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00008_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00008.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00008_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE iptb00008.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00008_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00007" table
-#+
-#+ @param p_data - a row data LIKE iptb00007.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00007_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE iptb00007.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_iptb00007_num_doc_checkColumnConstraints(p_data.num_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00007_cod_mov_checkColumnConstraints(p_data.cod_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00007_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00007_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00007_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00007_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00007_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00007_bodega_checkColumnConstraints(p_data.bodega) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00007_checkTableConstraints
-
-{}
-#+ Check constraints on the "iptb00007.num_doc" column
-#+
-#+ @param p_num_doc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00007_num_doc_checkColumnConstraints(p_num_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_doc LIKE iptb00007.num_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_num_doc IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- num_doc: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00007_num_doc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00007.cod_mov" column
-#+
-#+ @param p_cod_mov - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00007_cod_mov_checkColumnConstraints(p_cod_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mov LIKE iptb00007.cod_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00007_cod_mov_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00007.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00007_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE iptb00007.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00007_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00007.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00007_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE iptb00007.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00007_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00007.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00007_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE iptb00007.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00007_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00007.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00007_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE iptb00007.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00007_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00007.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00007_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE iptb00007.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00007_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00007.bodega" column
-#+
-#+ @param p_bodega - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00007_bodega_checkColumnConstraints(p_bodega)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_bodega LIKE iptb00007.bodega
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00007_bodega_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00006" table
-#+
-#+ @param p_data - a row data LIKE iptb00006.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00006_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE iptb00006.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_iptb00006_cod_cia_checkColumnConstraints(p_data.cod_cia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00006_num_doc_checkColumnConstraints(p_data.num_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00006_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00006_fact_no_checkColumnConstraints(p_data.fact_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00006_conduce_no_checkColumnConstraints(p_data.conduce_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00006_tipo_checkColumnConstraints(p_data.tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00006_orden_compra_checkColumnConstraints(p_data.orden_compra) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00006_cod_sp_checkColumnConstraints(p_data.cod_sp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00006_cod_sp_sec_checkColumnConstraints(p_data.cod_sp_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00006_cod_transp_checkColumnConstraints(p_data.cod_transp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00006_sec_transp_checkColumnConstraints(p_data.sec_transp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00006_placa_checkColumnConstraints(p_data.placa) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00006_cod_tarifa_checkColumnConstraints(p_data.cod_tarifa) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00006_cod_mov_checkColumnConstraints(p_data.cod_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00006_detalle_checkColumnConstraints(p_data.detalle) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00006_area_checkColumnConstraints(p_data.area) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00006_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00006_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00006_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00006_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00006_cantidad_1_checkColumnConstraints(p_data.cantidad_1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00006_cantidad_2_checkColumnConstraints(p_data.cantidad_2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00006_cond_recep_checkColumnConstraints(p_data.cond_recep) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00006_uso_tiempo_checkColumnConstraints(p_data.uso_tiempo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00006_bodega_checkColumnConstraints(p_data.bodega) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00006_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00006_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00006_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00006_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00006_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00006_num_req_checkColumnConstraints(p_data.num_req) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00006_codigo_bloque_checkColumnConstraints(p_data.codigo_bloque) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00006_sec_vend_checkColumnConstraints(p_data.sec_vend) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00006_direccion_checkColumnConstraints(p_data.direccion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00006_num_oc_checkColumnConstraints(p_data.num_oc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00006_bodega_d_checkColumnConstraints(p_data.bodega_d) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00006_checkTableConstraints
-
-{}
-#+ Check constraints on the "iptb00006.cod_cia" column
-#+
-#+ @param p_cod_cia - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00006_cod_cia_checkColumnConstraints(p_cod_cia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_cia LIKE iptb00006.cod_cia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00006_cod_cia_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00006.num_doc" column
-#+
-#+ @param p_num_doc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00006_num_doc_checkColumnConstraints(p_num_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_doc LIKE iptb00006.num_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_num_doc IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- num_doc: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00006_num_doc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00006.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00006_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE iptb00006.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_fecha IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- fecha: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00006_fecha_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00006.fact_no" column
-#+
-#+ @param p_fact_no - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00006_fact_no_checkColumnConstraints(p_fact_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fact_no LIKE iptb00006.fact_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00006_fact_no_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00006.conduce_no" column
-#+
-#+ @param p_conduce_no - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00006_conduce_no_checkColumnConstraints(p_conduce_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_conduce_no LIKE iptb00006.conduce_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00006_conduce_no_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00006.tipo" column
-#+
-#+ @param p_tipo - CHAR(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00006_tipo_checkColumnConstraints(p_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo LIKE iptb00006.tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00006_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00006.orden_compra" column
-#+
-#+ @param p_orden_compra - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00006_orden_compra_checkColumnConstraints(p_orden_compra)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_orden_compra LIKE iptb00006.orden_compra
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00006_orden_compra_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00006.cod_sp" column
-#+
-#+ @param p_cod_sp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00006_cod_sp_checkColumnConstraints(p_cod_sp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sp LIKE iptb00006.cod_sp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00006_cod_sp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00006.cod_sp_sec" column
-#+
-#+ @param p_cod_sp_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00006_cod_sp_sec_checkColumnConstraints(p_cod_sp_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sp_sec LIKE iptb00006.cod_sp_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00006_cod_sp_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00006.cod_transp" column
-#+
-#+ @param p_cod_transp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00006_cod_transp_checkColumnConstraints(p_cod_transp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_transp LIKE iptb00006.cod_transp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00006_cod_transp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00006.sec_transp" column
-#+
-#+ @param p_sec_transp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00006_sec_transp_checkColumnConstraints(p_sec_transp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_transp LIKE iptb00006.sec_transp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00006_sec_transp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00006.placa" column
-#+
-#+ @param p_placa - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00006_placa_checkColumnConstraints(p_placa)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_placa LIKE iptb00006.placa
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00006_placa_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00006.cod_tarifa" column
-#+
-#+ @param p_cod_tarifa - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00006_cod_tarifa_checkColumnConstraints(p_cod_tarifa)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tarifa LIKE iptb00006.cod_tarifa
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00006_cod_tarifa_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00006.cod_mov" column
-#+
-#+ @param p_cod_mov - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00006_cod_mov_checkColumnConstraints(p_cod_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mov LIKE iptb00006.cod_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_mov IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_mov: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00006_cod_mov_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00006.detalle" column
-#+
-#+ @param p_detalle - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00006_detalle_checkColumnConstraints(p_detalle)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_detalle LIKE iptb00006.detalle
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00006_detalle_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00006.area" column
-#+
-#+ @param p_area - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00006_area_checkColumnConstraints(p_area)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_area LIKE iptb00006.area
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00006_area_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00006.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00006_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE iptb00006.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_n IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_n: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00006_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00006.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00006_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE iptb00006.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_grupo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_grupo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00006_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00006.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00006_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE iptb00006.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_tipo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_tipo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00006_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00006.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00006_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE iptb00006.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_sec IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_sec: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00006_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00006.cantidad_1" column
-#+
-#+ @param p_cantidad_1 - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00006_cantidad_1_checkColumnConstraints(p_cantidad_1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad_1 LIKE iptb00006.cantidad_1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00006_cantidad_1_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00006.cantidad_2" column
-#+
-#+ @param p_cantidad_2 - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00006_cantidad_2_checkColumnConstraints(p_cantidad_2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad_2 LIKE iptb00006.cantidad_2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cantidad_2 IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cantidad_2: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00006_cantidad_2_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00006.cond_recep" column
-#+
-#+ @param p_cond_recep - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00006_cond_recep_checkColumnConstraints(p_cond_recep)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cond_recep LIKE iptb00006.cond_recep
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00006_cond_recep_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00006.uso_tiempo" column
-#+
-#+ @param p_uso_tiempo - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00006_uso_tiempo_checkColumnConstraints(p_uso_tiempo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_uso_tiempo LIKE iptb00006.uso_tiempo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00006_uso_tiempo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00006.bodega" column
-#+
-#+ @param p_bodega - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00006_bodega_checkColumnConstraints(p_bodega)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_bodega LIKE iptb00006.bodega
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00006_bodega_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00006.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00006_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE iptb00006.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00006_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00006.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00006_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE iptb00006.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00006_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00006.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00006_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE iptb00006.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00006_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00006.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00006_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE iptb00006.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00006_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00006.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00006_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE iptb00006.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00006_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00006.num_req" column
-#+
-#+ @param p_num_req - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00006_num_req_checkColumnConstraints(p_num_req)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_req LIKE iptb00006.num_req
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00006_num_req_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00006.codigo_bloque" column
-#+
-#+ @param p_codigo_bloque - CHAR(25) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00006_codigo_bloque_checkColumnConstraints(p_codigo_bloque)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codigo_bloque LIKE iptb00006.codigo_bloque
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00006_codigo_bloque_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00006.sec_vend" column
-#+
-#+ @param p_sec_vend - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00006_sec_vend_checkColumnConstraints(p_sec_vend)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_vend LIKE iptb00006.sec_vend
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00006_sec_vend_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00006.direccion" column
-#+
-#+ @param p_direccion - CHAR(500) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00006_direccion_checkColumnConstraints(p_direccion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_direccion LIKE iptb00006.direccion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00006_direccion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00006.num_oc" column
-#+
-#+ @param p_num_oc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00006_num_oc_checkColumnConstraints(p_num_oc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_oc LIKE iptb00006.num_oc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00006_num_oc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00006.bodega_d" column
-#+
-#+ @param p_bodega_d - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00006_bodega_d_checkColumnConstraints(p_bodega_d)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_bodega_d LIKE iptb00006.bodega_d
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00006_bodega_d_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00005" table
-#+
-#+ @param p_data - a row data LIKE iptb00005.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00005_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE iptb00005.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_iptb00005_cod_mov_checkColumnConstraints(p_data.cod_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00005_descrip_mov_checkColumnConstraints(p_data.descrip_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00005_status_mov_checkColumnConstraints(p_data.status_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00005_cuenta_1_checkColumnConstraints(p_data.cuenta_1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00005_cuenta_2_checkColumnConstraints(p_data.cuenta_2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00005_cuenta_3_checkColumnConstraints(p_data.cuenta_3) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00005_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00005_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00005_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00005_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00005_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00005_control_clientes_checkColumnConstraints(p_data.control_clientes) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00005_control_despacho_checkColumnConstraints(p_data.control_despacho) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00005_control_devolucion_checkColumnConstraints(p_data.control_devolucion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00005_control_transferencia_checkColumnConstraints(p_data.control_transferencia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00005_checkTableConstraints
-
-{}
-#+ Check constraints on the "iptb00005.cod_mov" column
-#+
-#+ @param p_cod_mov - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00005_cod_mov_checkColumnConstraints(p_cod_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mov LIKE iptb00005.cod_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_mov IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_mov: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00005_cod_mov_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00005.descrip_mov" column
-#+
-#+ @param p_descrip_mov - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00005_descrip_mov_checkColumnConstraints(p_descrip_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descrip_mov LIKE iptb00005.descrip_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00005_descrip_mov_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00005.status_mov" column
-#+
-#+ @param p_status_mov - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00005_status_mov_checkColumnConstraints(p_status_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_mov LIKE iptb00005.status_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00005_status_mov_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00005.cuenta_1" column
-#+
-#+ @param p_cuenta_1 - CHAR(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00005_cuenta_1_checkColumnConstraints(p_cuenta_1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cuenta_1 LIKE iptb00005.cuenta_1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00005_cuenta_1_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00005.cuenta_2" column
-#+
-#+ @param p_cuenta_2 - CHAR(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00005_cuenta_2_checkColumnConstraints(p_cuenta_2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cuenta_2 LIKE iptb00005.cuenta_2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00005_cuenta_2_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00005.cuenta_3" column
-#+
-#+ @param p_cuenta_3 - CHAR(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00005_cuenta_3_checkColumnConstraints(p_cuenta_3)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cuenta_3 LIKE iptb00005.cuenta_3
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00005_cuenta_3_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00005.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00005_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE iptb00005.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00005_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00005.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00005_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE iptb00005.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00005_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00005.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00005_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE iptb00005.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00005_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00005.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00005_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE iptb00005.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00005_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00005.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00005_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE iptb00005.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00005_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00005.control_clientes" column
-#+
-#+ @param p_control_clientes - CHAR(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00005_control_clientes_checkColumnConstraints(p_control_clientes)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_control_clientes LIKE iptb00005.control_clientes
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_control_clientes IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- control_clientes: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00005_control_clientes_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00005.control_despacho" column
-#+
-#+ @param p_control_despacho - CHAR(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00005_control_despacho_checkColumnConstraints(p_control_despacho)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_control_despacho LIKE iptb00005.control_despacho
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00005_control_despacho_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00005.control_devolucion" column
-#+
-#+ @param p_control_devolucion - CHAR(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00005_control_devolucion_checkColumnConstraints(p_control_devolucion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_control_devolucion LIKE iptb00005.control_devolucion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00005_control_devolucion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00005.control_transferencia" column
-#+
-#+ @param p_control_transferencia - CHAR(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00005_control_transferencia_checkColumnConstraints(p_control_transferencia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_control_transferencia LIKE iptb00005.control_transferencia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00005_control_transferencia_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00004" table
-#+
-#+ @param p_data - a row data LIKE iptb00004.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00004_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE iptb00004.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_iptb00004_ventas_checkColumnConstraints(p_data.ventas) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00004_mes_ini_checkColumnConstraints(p_data.mes_ini) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00004_mes_fin_checkColumnConstraints(p_data.mes_fin) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00004_ano_checkColumnConstraints(p_data.ano) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00004_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00004_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00004_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00004_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00004_material_checkColumnConstraints(p_data.material) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00004_labor_checkColumnConstraints(p_data.labor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00004_gastos_checkColumnConstraints(p_data.gastos) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00004_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00004_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00004_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00004_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00004_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- CALL smarmotech_dbxconstraints_iptb00004_pk_iptb00004_checkUniqueConstraint(p_forUpdate, p_data.ano, p_data.cod_n, p_data.cod_grupo, p_data.cod_tipo, p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00004_checkTableConstraints
-
-{}
-#+ Check the primary key uniqueness constraint on the "iptb00004"
-#+
-#+ @param p_key - Primary Key
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00004_pk_iptb00004_checkUniqueConstraint(p_forUpdate, p_key)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_key
- RECORD
- iptb00004_ano LIKE iptb00004.ano,
- iptb00004_cod_n LIKE iptb00004.cod_n,
- iptb00004_cod_grupo LIKE iptb00004.cod_grupo,
- iptb00004_cod_tipo LIKE iptb00004.cod_tipo,
- iptb00004_cod_sec LIKE iptb00004.cod_sec
- END RECORD
- DEFINE l_key
- RECORD
- iptb00004_ano LIKE iptb00004.ano,
- iptb00004_cod_n LIKE iptb00004.cod_n,
- iptb00004_cod_grupo LIKE iptb00004.cod_grupo,
- iptb00004_cod_tipo LIKE iptb00004.cod_tipo,
- iptb00004_cod_sec LIKE iptb00004.cod_sec
- END RECORD
- DEFINE l_where STRING
- DEFINE l_sqlQuery STRING
- DEFINE l_count INTEGER
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- LET l_where = "WHERE iptb00004.ano = ?
- AND iptb00004.cod_n = ?
- AND iptb00004.cod_grupo = ?
- AND iptb00004.cod_tipo = ?
- AND iptb00004.cod_sec = ? "
-
- let l_sqlQuery = "SELECT COUNT(*), ano, cod_n, cod_grupo, cod_tipo, cod_sec FROM iptb00004 ", l_where, " GROUP BY ano, cod_n, cod_grupo, cod_tipo, cod_sec"
-
- PREPARE cur_iptb00004_pk_iptb00004_checkUniqueConstraint FROM l_sqlQuery
- EXECUTE cur_iptb00004_pk_iptb00004_checkUniqueConstraint INTO l_count, l_key.* USING p_key.*
- FREE cur_iptb00004_pk_iptb00004_checkUniqueConstraint
- IF (NOT p_forUpdate AND l_count > 0) OR (p_forUpdate AND l_count > 0 AND p_key.* != l_key.*) THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- ano + cod_n + cod_grupo + cod_tipo + cod_sec: " || ERROR_BAM_00002) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00004_pk_iptb00004_checkUniqueConstraint
-
-{}
-#+ Check constraints on the "iptb00004.ventas" column
-#+
-#+ @param p_ventas - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00004_ventas_checkColumnConstraints(p_ventas)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ventas LIKE iptb00004.ventas
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00004_ventas_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00004.mes_ini" column
-#+
-#+ @param p_mes_ini - CHAR(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00004_mes_ini_checkColumnConstraints(p_mes_ini)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mes_ini LIKE iptb00004.mes_ini
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00004_mes_ini_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00004.mes_fin" column
-#+
-#+ @param p_mes_fin - CHAR(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00004_mes_fin_checkColumnConstraints(p_mes_fin)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mes_fin LIKE iptb00004.mes_fin
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00004_mes_fin_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00004.ano" column
-#+
-#+ @param p_ano - CHAR(4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00004_ano_checkColumnConstraints(p_ano)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ano LIKE iptb00004.ano
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_ano IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- ano: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00004_ano_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00004.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00004_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE iptb00004.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_n IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_n: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00004_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00004.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00004_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE iptb00004.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_grupo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_grupo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00004_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00004.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00004_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE iptb00004.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_tipo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_tipo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00004_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00004.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00004_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE iptb00004.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_sec IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_sec: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00004_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00004.material" column
-#+
-#+ @param p_material - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00004_material_checkColumnConstraints(p_material)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_material LIKE iptb00004.material
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00004_material_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00004.labor" column
-#+
-#+ @param p_labor - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00004_labor_checkColumnConstraints(p_labor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_labor LIKE iptb00004.labor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00004_labor_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00004.gastos" column
-#+
-#+ @param p_gastos - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00004_gastos_checkColumnConstraints(p_gastos)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_gastos LIKE iptb00004.gastos
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00004_gastos_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00004.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00004_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE iptb00004.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00004_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00004.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00004_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE iptb00004.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00004_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00004.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00004_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE iptb00004.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00004_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00004.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00004_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE iptb00004.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00004_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00004.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00004_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE iptb00004.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00004_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00003" table
-#+
-#+ @param p_data - a row data LIKE iptb00003.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00003_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE iptb00003.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_iptb00003_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00003_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00003_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00003_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00003_presentacion_checkColumnConstraints(p_data.presentacion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00003_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00003_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00003_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00003_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00003_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00003_checkTableConstraints
-
-{}
-#+ Check constraints on the "iptb00003.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00003_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE iptb00003.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00003_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00003.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00003_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE iptb00003.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00003_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00003.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00003_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE iptb00003.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00003_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00003.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00003_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE iptb00003.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00003_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00003.presentacion" column
-#+
-#+ @param p_presentacion - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00003_presentacion_checkColumnConstraints(p_presentacion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_presentacion LIKE iptb00003.presentacion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00003_presentacion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00003.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00003_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE iptb00003.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00003_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00003.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00003_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE iptb00003.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00003_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00003.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00003_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE iptb00003.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00003_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00003.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00003_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE iptb00003.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00003_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00003.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00003_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE iptb00003.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00003_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00002" table
-#+
-#+ @param p_data - a row data LIKE iptb00002.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00002_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE iptb00002.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_iptb00002_cod_cia_checkColumnConstraints(p_data.cod_cia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00002_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00002_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00002_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00002_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00002_descrip_esp_checkColumnConstraints(p_data.descrip_esp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00002_descrip_ing_checkColumnConstraints(p_data.descrip_ing) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00002_unidad_med_checkColumnConstraints(p_data.unidad_med) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00002_nomenclatura_checkColumnConstraints(p_data.nomenclatura) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00002_bodega_checkColumnConstraints(p_data.bodega) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00002_exist_max_checkColumnConstraints(p_data.exist_max) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00002_exist_min_checkColumnConstraints(p_data.exist_min) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00002_dia_llegada_checkColumnConstraints(p_data.dia_llegada) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00002_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00002_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00002_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00002_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00002_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00002_control_existencia_checkColumnConstraints(p_data.control_existencia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00002_control_itbis_checkColumnConstraints(p_data.control_itbis) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00002_codid_checkColumnConstraints(p_data.codid) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00002_foto_producto_checkColumnConstraints(p_data.foto_producto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00002_porc_desc_checkColumnConstraints(p_data.porc_desc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00002_fecha_desc_checkColumnConstraints(p_data.fecha_desc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00002_checkTableConstraints
-
-{}
-#+ Check constraints on the "iptb00002.cod_cia" column
-#+
-#+ @param p_cod_cia - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00002_cod_cia_checkColumnConstraints(p_cod_cia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_cia LIKE iptb00002.cod_cia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_cia IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_cia: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00002_cod_cia_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00002.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00002_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE iptb00002.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_n IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_n: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00002_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00002.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00002_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE iptb00002.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_grupo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_grupo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00002_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00002.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00002_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE iptb00002.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_tipo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_tipo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00002_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00002.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00002_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE iptb00002.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_sec IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_sec: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00002_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00002.descrip_esp" column
-#+
-#+ @param p_descrip_esp - CHAR(180) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00002_descrip_esp_checkColumnConstraints(p_descrip_esp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descrip_esp LIKE iptb00002.descrip_esp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_descrip_esp IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- descrip_esp: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00002_descrip_esp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00002.descrip_ing" column
-#+
-#+ @param p_descrip_ing - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00002_descrip_ing_checkColumnConstraints(p_descrip_ing)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descrip_ing LIKE iptb00002.descrip_ing
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00002_descrip_ing_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00002.unidad_med" column
-#+
-#+ @param p_unidad_med - CHAR(4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00002_unidad_med_checkColumnConstraints(p_unidad_med)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_unidad_med LIKE iptb00002.unidad_med
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00002_unidad_med_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00002.nomenclatura" column
-#+
-#+ @param p_nomenclatura - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00002_nomenclatura_checkColumnConstraints(p_nomenclatura)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nomenclatura LIKE iptb00002.nomenclatura
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00002_nomenclatura_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00002.bodega" column
-#+
-#+ @param p_bodega - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00002_bodega_checkColumnConstraints(p_bodega)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_bodega LIKE iptb00002.bodega
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00002_bodega_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00002.exist_max" column
-#+
-#+ @param p_exist_max - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00002_exist_max_checkColumnConstraints(p_exist_max)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_exist_max LIKE iptb00002.exist_max
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00002_exist_max_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00002.exist_min" column
-#+
-#+ @param p_exist_min - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00002_exist_min_checkColumnConstraints(p_exist_min)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_exist_min LIKE iptb00002.exist_min
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00002_exist_min_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00002.dia_llegada" column
-#+
-#+ @param p_dia_llegada - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00002_dia_llegada_checkColumnConstraints(p_dia_llegada)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_dia_llegada LIKE iptb00002.dia_llegada
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00002_dia_llegada_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00002.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00002_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE iptb00002.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00002_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00002.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00002_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE iptb00002.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00002_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00002.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00002_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE iptb00002.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00002_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00002.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00002_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE iptb00002.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00002_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00002.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00002_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE iptb00002.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00002_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00002.control_existencia" column
-#+
-#+ @param p_control_existencia - VARCHAR2(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00002_control_existencia_checkColumnConstraints(p_control_existencia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_control_existencia LIKE iptb00002.control_existencia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00002_control_existencia_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00002.control_itbis" column
-#+
-#+ @param p_control_itbis - VARCHAR2(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00002_control_itbis_checkColumnConstraints(p_control_itbis)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_control_itbis LIKE iptb00002.control_itbis
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00002_control_itbis_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00002.codid" column
-#+
-#+ @param p_codid - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00002_codid_checkColumnConstraints(p_codid)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codid LIKE iptb00002.codid
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_codid IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- codid: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00002_codid_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00002.foto_producto" column
-#+
-#+ @param p_foto_producto - CHAR(200) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00002_foto_producto_checkColumnConstraints(p_foto_producto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_foto_producto LIKE iptb00002.foto_producto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00002_foto_producto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00002.porc_desc" column
-#+
-#+ @param p_porc_desc - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00002_porc_desc_checkColumnConstraints(p_porc_desc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_porc_desc LIKE iptb00002.porc_desc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00002_porc_desc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00002.fecha_desc" column
-#+
-#+ @param p_fecha_desc - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00002_fecha_desc_checkColumnConstraints(p_fecha_desc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_desc LIKE iptb00002.fecha_desc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00002_fecha_desc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00001" table
-#+
-#+ @param p_data - a row data LIKE iptb00001.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00001_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE iptb00001.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_iptb00001_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00001_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00001_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00001_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00001_unidad_checkColumnConstraints(p_data.unidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00001_factor_conv_checkColumnConstraints(p_data.factor_conv) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00001_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00001_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00001_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00001_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00001_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00001_factor_ad_checkColumnConstraints(p_data.factor_ad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00001_checkTableConstraints
-
-{}
-#+ Check constraints on the "iptb00001.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00001_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE iptb00001.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_n IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_n: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00001_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00001.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00001_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE iptb00001.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_grupo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_grupo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00001_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00001.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00001_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE iptb00001.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_tipo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_tipo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00001_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00001.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00001_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE iptb00001.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_sec IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_sec: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00001_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00001.unidad" column
-#+
-#+ @param p_unidad - CHAR(5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00001_unidad_checkColumnConstraints(p_unidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_unidad LIKE iptb00001.unidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00001_unidad_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00001.factor_conv" column
-#+
-#+ @param p_factor_conv - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00001_factor_conv_checkColumnConstraints(p_factor_conv)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_factor_conv LIKE iptb00001.factor_conv
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00001_factor_conv_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00001.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00001_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE iptb00001.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00001_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00001.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00001_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE iptb00001.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00001_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00001.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00001_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE iptb00001.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00001_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00001.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00001_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE iptb00001.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00001_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00001.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00001_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE iptb00001.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00001_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "iptb00001.factor_ad" column
-#+
-#+ @param p_factor_ad - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00001_factor_ad_checkColumnConstraints(p_factor_ad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_factor_ad LIKE iptb00001.factor_ad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.iptb00001_factor_ad_checkColumnConstraints
-
-{}
-#+ Check constraints on the "inventory" table
-#+
-#+ @param p_data - a row data LIKE inventory.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_inventory_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE inventory.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_inventory_itemid_checkColumnConstraints(p_data.itemid) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_inventory_qty_checkColumnConstraints(p_data.qty) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.inventory_checkTableConstraints
-
-{}
-#+ Check constraints on the "inventory.itemid" column
-#+
-#+ @param p_itemid - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_inventory_itemid_checkColumnConstraints(p_itemid)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_itemid LIKE inventory.itemid
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_itemid IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- itemid: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.inventory_itemid_checkColumnConstraints
-
-{}
-#+ Check constraints on the "inventory.qty" column
-#+
-#+ @param p_qty - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_inventory_qty_checkColumnConstraints(p_qty)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_qty LIKE inventory.qty
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_qty IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- qty: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.inventory_qty_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00043a" table
-#+
-#+ @param p_data - a row data LIKE intb00043a.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00043a_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE intb00043a.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_intb00043a_cod_bodega_checkColumnConstraints(p_data.cod_bodega) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00043a_cod_seccion_checkColumnConstraints(p_data.cod_seccion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00043a_cod_tramo_checkColumnConstraints(p_data.cod_tramo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00043a_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00043a_checkTableConstraints
-
-{}
-#+ Check constraints on the "intb00043a.cod_bodega" column
-#+
-#+ @param p_cod_bodega - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00043a_cod_bodega_checkColumnConstraints(p_cod_bodega)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_bodega LIKE intb00043a.cod_bodega
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_bodega IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_bodega: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00043a_cod_bodega_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00043a.cod_seccion" column
-#+
-#+ @param p_cod_seccion - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00043a_cod_seccion_checkColumnConstraints(p_cod_seccion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_seccion LIKE intb00043a.cod_seccion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_seccion IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_seccion: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00043a_cod_seccion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00043a.cod_tramo" column
-#+
-#+ @param p_cod_tramo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00043a_cod_tramo_checkColumnConstraints(p_cod_tramo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tramo LIKE intb00043a.cod_tramo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_tramo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_tramo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00043a_cod_tramo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00043a.descripcion" column
-#+
-#+ @param p_descripcion - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00043a_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE intb00043a.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00043a_descripcion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00043$" table
-#+
-#+ @param p_data - a row data LIKE intb00043$.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00043$_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE intb00043$.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_intb00043$_cod_bodega_checkColumnConstraints(p_data.cod_bodega) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00043$_cod_seccion_checkColumnConstraints(p_data.cod_seccion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00043$_cod_tramo_checkColumnConstraints(p_data.cod_tramo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00043$_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00043$_checkTableConstraints
-
-{}
-#+ Check constraints on the "intb00043$.cod_bodega" column
-#+
-#+ @param p_cod_bodega - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00043$_cod_bodega_checkColumnConstraints(p_cod_bodega)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_bodega LIKE intb00043$.cod_bodega
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00043$_cod_bodega_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00043$.cod_seccion" column
-#+
-#+ @param p_cod_seccion - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00043$_cod_seccion_checkColumnConstraints(p_cod_seccion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_seccion LIKE intb00043$.cod_seccion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00043$_cod_seccion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00043$.cod_tramo" column
-#+
-#+ @param p_cod_tramo - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00043$_cod_tramo_checkColumnConstraints(p_cod_tramo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tramo LIKE intb00043$.cod_tramo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00043$_cod_tramo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00043$.descripcion" column
-#+
-#+ @param p_descripcion - VARCHAR2(255) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00043$_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE intb00043$.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00043$_descripcion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00043" table
-#+
-#+ @param p_data - a row data LIKE intb00043.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00043_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE intb00043.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_intb00043_cod_bodega_checkColumnConstraints(p_data.cod_bodega) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00043_cod_seccion_checkColumnConstraints(p_data.cod_seccion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00043_cod_tramo_checkColumnConstraints(p_data.cod_tramo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00043_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00043_checkTableConstraints
-
-{}
-#+ Check constraints on the "intb00043.cod_bodega" column
-#+
-#+ @param p_cod_bodega - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00043_cod_bodega_checkColumnConstraints(p_cod_bodega)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_bodega LIKE intb00043.cod_bodega
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00043_cod_bodega_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00043.cod_seccion" column
-#+
-#+ @param p_cod_seccion - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00043_cod_seccion_checkColumnConstraints(p_cod_seccion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_seccion LIKE intb00043.cod_seccion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00043_cod_seccion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00043.cod_tramo" column
-#+
-#+ @param p_cod_tramo - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00043_cod_tramo_checkColumnConstraints(p_cod_tramo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tramo LIKE intb00043.cod_tramo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00043_cod_tramo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00043.descripcion" column
-#+
-#+ @param p_descripcion - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00043_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE intb00043.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00043_descripcion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00042" table
-#+
-#+ @param p_data - a row data LIKE intb00042.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00042_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE intb00042.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_intb00042_num_doc_checkColumnConstraints(p_data.num_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00042_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00042_cod_mov_checkColumnConstraints(p_data.cod_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00042_bodega_checkColumnConstraints(p_data.bodega) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00042_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00042_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00042_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00042_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00042_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00042_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00042_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00042_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00042_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00042_checkTableConstraints
-
-{}
-#+ Check constraints on the "intb00042.num_doc" column
-#+
-#+ @param p_num_doc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00042_num_doc_checkColumnConstraints(p_num_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_doc LIKE intb00042.num_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00042_num_doc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00042.fecha" column
-#+
-#+ @param p_fecha - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00042_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE intb00042.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00042_fecha_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00042.cod_mov" column
-#+
-#+ @param p_cod_mov - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00042_cod_mov_checkColumnConstraints(p_cod_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mov LIKE intb00042.cod_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00042_cod_mov_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00042.bodega" column
-#+
-#+ @param p_bodega - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00042_bodega_checkColumnConstraints(p_bodega)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_bodega LIKE intb00042.bodega
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00042_bodega_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00042.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00042_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE intb00042.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00042_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00042.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00042_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE intb00042.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00042_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00042.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00042_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE intb00042.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00042_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00042.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00042_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE intb00042.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00042_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00042.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(18,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00042_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE intb00042.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00042_cantidad_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00042.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00042_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE intb00042.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00042_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00042.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00042_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE intb00042.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00042_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00042.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00042_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE intb00042.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00042_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00042.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00042_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE intb00042.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00042_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00041" table
-#+
-#+ @param p_data - a row data LIKE intb00041.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00041_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE intb00041.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_intb00041_fecha_act_checkColumnConstraints(p_data.fecha_act) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00041_idtrx_checkColumnConstraints(p_data.idtrx) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00041_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00041_bodega_checkColumnConstraints(p_data.bodega) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00041_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00041_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00041_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00041_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00041_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00041_balance_checkColumnConstraints(p_data.balance) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00041_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00041_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00041_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00041_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00041_checkTableConstraints
-
-{}
-#+ Check constraints on the "intb00041.fecha_act" column
-#+
-#+ @param p_fecha_act - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00041_fecha_act_checkColumnConstraints(p_fecha_act)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_act LIKE intb00041.fecha_act
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00041_fecha_act_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00041.idtrx" column
-#+
-#+ @param p_idtrx - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00041_idtrx_checkColumnConstraints(p_idtrx)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_idtrx LIKE intb00041.idtrx
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00041_idtrx_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00041.fecha" column
-#+
-#+ @param p_fecha - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00041_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE intb00041.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00041_fecha_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00041.bodega" column
-#+
-#+ @param p_bodega - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00041_bodega_checkColumnConstraints(p_bodega)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_bodega LIKE intb00041.bodega
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00041_bodega_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00041.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00041_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE intb00041.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00041_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00041.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00041_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE intb00041.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00041_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00041.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00041_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE intb00041.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00041_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00041.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00041_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE intb00041.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00041_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00041.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00041_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE intb00041.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00041_cantidad_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00041.balance" column
-#+
-#+ @param p_balance - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00041_balance_checkColumnConstraints(p_balance)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_balance LIKE intb00041.balance
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00041_balance_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00041.us_crea" column
-#+
-#+ @param p_us_crea - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00041_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE intb00041.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00041_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00041.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00041_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE intb00041.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00041_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00041.us_mod" column
-#+
-#+ @param p_us_mod - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00041_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE intb00041.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00041_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00041.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00041_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE intb00041.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00041_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00040" table
-#+
-#+ @param p_data - a row data LIKE intb00040.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00040_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE intb00040.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_intb00040_fecha_act_checkColumnConstraints(p_data.fecha_act) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00040_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00040_bodega_checkColumnConstraints(p_data.bodega) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00040_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00040_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00040_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00040_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00040_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00040_balance_checkColumnConstraints(p_data.balance) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00040_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00040_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00040_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00040_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00040_checkTableConstraints
-
-{}
-#+ Check constraints on the "intb00040.fecha_act" column
-#+
-#+ @param p_fecha_act - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00040_fecha_act_checkColumnConstraints(p_fecha_act)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_act LIKE intb00040.fecha_act
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00040_fecha_act_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00040.fecha" column
-#+
-#+ @param p_fecha - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00040_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE intb00040.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00040_fecha_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00040.bodega" column
-#+
-#+ @param p_bodega - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00040_bodega_checkColumnConstraints(p_bodega)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_bodega LIKE intb00040.bodega
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00040_bodega_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00040.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00040_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE intb00040.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00040_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00040.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00040_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE intb00040.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00040_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00040.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00040_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE intb00040.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00040_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00040.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00040_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE intb00040.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00040_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00040.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00040_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE intb00040.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00040_cantidad_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00040.balance" column
-#+
-#+ @param p_balance - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00040_balance_checkColumnConstraints(p_balance)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_balance LIKE intb00040.balance
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00040_balance_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00040.us_crea" column
-#+
-#+ @param p_us_crea - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00040_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE intb00040.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00040_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00040.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00040_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE intb00040.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00040_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00040.us_mod" column
-#+
-#+ @param p_us_mod - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00040_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE intb00040.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00040_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00040.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00040_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE intb00040.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00040_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00026" table
-#+
-#+ @param p_data - a row data LIKE intb00026.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00026_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE intb00026.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_intb00026_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00026_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00026_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00026_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00026_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00026_cantidad_a_checkColumnConstraints(p_data.cantidad_a) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00026_cantidad_b_checkColumnConstraints(p_data.cantidad_b) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00026_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00026_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00026_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00026_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00026_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00026_checkTableConstraints
-
-{}
-#+ Check constraints on the "intb00026.fecha" column
-#+
-#+ @param p_fecha - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00026_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE intb00026.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00026_fecha_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00026.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00026_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE intb00026.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00026_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00026.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00026_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE intb00026.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00026_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00026.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00026_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE intb00026.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00026_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00026.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00026_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE intb00026.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00026_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00026.cantidad_a" column
-#+
-#+ @param p_cantidad_a - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00026_cantidad_a_checkColumnConstraints(p_cantidad_a)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad_a LIKE intb00026.cantidad_a
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00026_cantidad_a_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00026.cantidad_b" column
-#+
-#+ @param p_cantidad_b - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00026_cantidad_b_checkColumnConstraints(p_cantidad_b)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad_b LIKE intb00026.cantidad_b
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00026_cantidad_b_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00026.status_t" column
-#+
-#+ @param p_status_t - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00026_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE intb00026.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00026_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00026.us_crea" column
-#+
-#+ @param p_us_crea - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00026_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE intb00026.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00026_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00026.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00026_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE intb00026.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00026_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00026.us_mod" column
-#+
-#+ @param p_us_mod - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00026_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE intb00026.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00026_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00026.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00026_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE intb00026.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00026_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00023" table
-#+
-#+ @param p_data - a row data LIKE intb00023.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00023_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE intb00023.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_intb00023_num_doc_checkColumnConstraints(p_data.num_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00023_cod_mov_checkColumnConstraints(p_data.cod_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00023_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00023_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00023_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00023_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00023_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00023_checkTableConstraints
-
-{}
-#+ Check constraints on the "intb00023.num_doc" column
-#+
-#+ @param p_num_doc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00023_num_doc_checkColumnConstraints(p_num_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_doc LIKE intb00023.num_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_num_doc IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- num_doc: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00023_num_doc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00023.cod_mov" column
-#+
-#+ @param p_cod_mov - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00023_cod_mov_checkColumnConstraints(p_cod_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mov LIKE intb00023.cod_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00023_cod_mov_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00023.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00023_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE intb00023.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00023_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00023.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00023_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE intb00023.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00023_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00023.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00023_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE intb00023.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00023_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00023.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00023_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE intb00023.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00023_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00023.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00023_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE intb00023.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00023_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00022" table
-#+
-#+ @param p_data - a row data LIKE intb00022.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00022_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE intb00022.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_intb00022_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00022_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00022_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00022_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00022_descrip_esp_checkColumnConstraints(p_data.descrip_esp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00022_descrip_ing_checkColumnConstraints(p_data.descrip_ing) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00022_unidad_med_checkColumnConstraints(p_data.unidad_med) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00022_costo_real_ci_checkColumnConstraints(p_data.costo_real_ci) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00022_costo_real_si_checkColumnConstraints(p_data.costo_real_si) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00022_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00022_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00022_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00022_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00022_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00022_checkTableConstraints
-
-{}
-#+ Check constraints on the "intb00022.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00022_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE intb00022.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_n IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_n: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00022_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00022.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00022_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE intb00022.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_grupo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_grupo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00022_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00022.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00022_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE intb00022.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_tipo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_tipo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00022_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00022.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00022_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE intb00022.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_sec IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_sec: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00022_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00022.descrip_esp" column
-#+
-#+ @param p_descrip_esp - VARCHAR2(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00022_descrip_esp_checkColumnConstraints(p_descrip_esp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descrip_esp LIKE intb00022.descrip_esp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00022_descrip_esp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00022.descrip_ing" column
-#+
-#+ @param p_descrip_ing - VARCHAR2(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00022_descrip_ing_checkColumnConstraints(p_descrip_ing)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descrip_ing LIKE intb00022.descrip_ing
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00022_descrip_ing_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00022.unidad_med" column
-#+
-#+ @param p_unidad_med - VARCHAR2(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00022_unidad_med_checkColumnConstraints(p_unidad_med)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_unidad_med LIKE intb00022.unidad_med
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00022_unidad_med_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00022.costo_real_ci" column
-#+
-#+ @param p_costo_real_ci - DECIMAL(9,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00022_costo_real_ci_checkColumnConstraints(p_costo_real_ci)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_costo_real_ci LIKE intb00022.costo_real_ci
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00022_costo_real_ci_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00022.costo_real_si" column
-#+
-#+ @param p_costo_real_si - DECIMAL(9,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00022_costo_real_si_checkColumnConstraints(p_costo_real_si)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_costo_real_si LIKE intb00022.costo_real_si
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00022_costo_real_si_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00022.status_t" column
-#+
-#+ @param p_status_t - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00022_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE intb00022.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00022_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00022.us_crea" column
-#+
-#+ @param p_us_crea - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00022_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE intb00022.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00022_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00022.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00022_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE intb00022.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00022_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00022.us_mod" column
-#+
-#+ @param p_us_mod - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00022_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE intb00022.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00022_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00022.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00022_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE intb00022.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00022_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00020" table
-#+
-#+ @param p_data - a row data LIKE intb00020.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00020_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE intb00020.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_intb00020_tipo_doc_checkColumnConstraints(p_data.tipo_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00020_num_fianza_checkColumnConstraints(p_data.num_fianza) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00020_num_res_checkColumnConstraints(p_data.num_res) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00020_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00020_nom_buque_checkColumnConstraints(p_data.nom_buque) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00020_fecha_ent_checkColumnConstraints(p_data.fecha_ent) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00020_cod_sp_checkColumnConstraints(p_data.cod_sp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00020_cod_sp_sec_checkColumnConstraints(p_data.cod_sp_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00020_cod_pais_checkColumnConstraints(p_data.cod_pais) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00020_cant_bulto_checkColumnConstraints(p_data.cant_bulto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00020_num_oc_checkColumnConstraints(p_data.num_oc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00020_num_emb_checkColumnConstraints(p_data.num_emb) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00020_valor_merc_checkColumnConstraints(p_data.valor_merc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00020_cod_ca_checkColumnConstraints(p_data.cod_ca) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00020_poliza_checkColumnConstraints(p_data.poliza) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00020_prima_checkColumnConstraints(p_data.prima) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00020_porc_prima_checkColumnConstraints(p_data.porc_prima) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00020_valor_desm_checkColumnConstraints(p_data.valor_desm) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00020_valor_gar_checkColumnConstraints(p_data.valor_gar) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00020_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00020_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00020_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00020_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00020_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00020_cantidad_c_checkColumnConstraints(p_data.cantidad_c) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00020_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00020_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00020_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00020_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00020_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00020_checkTableConstraints
-
-{}
-#+ Check constraints on the "intb00020.tipo_doc" column
-#+
-#+ @param p_tipo_doc - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00020_tipo_doc_checkColumnConstraints(p_tipo_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_doc LIKE intb00020.tipo_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00020_tipo_doc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00020.num_fianza" column
-#+
-#+ @param p_num_fianza - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00020_num_fianza_checkColumnConstraints(p_num_fianza)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_fianza LIKE intb00020.num_fianza
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00020_num_fianza_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00020.num_res" column
-#+
-#+ @param p_num_res - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00020_num_res_checkColumnConstraints(p_num_res)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_res LIKE intb00020.num_res
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00020_num_res_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00020.fecha" column
-#+
-#+ @param p_fecha - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00020_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE intb00020.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00020_fecha_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00020.nom_buque" column
-#+
-#+ @param p_nom_buque - VARCHAR2(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00020_nom_buque_checkColumnConstraints(p_nom_buque)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nom_buque LIKE intb00020.nom_buque
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00020_nom_buque_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00020.fecha_ent" column
-#+
-#+ @param p_fecha_ent - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00020_fecha_ent_checkColumnConstraints(p_fecha_ent)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_ent LIKE intb00020.fecha_ent
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00020_fecha_ent_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00020.cod_sp" column
-#+
-#+ @param p_cod_sp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00020_cod_sp_checkColumnConstraints(p_cod_sp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sp LIKE intb00020.cod_sp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00020_cod_sp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00020.cod_sp_sec" column
-#+
-#+ @param p_cod_sp_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00020_cod_sp_sec_checkColumnConstraints(p_cod_sp_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sp_sec LIKE intb00020.cod_sp_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00020_cod_sp_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00020.cod_pais" column
-#+
-#+ @param p_cod_pais - VARCHAR2(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00020_cod_pais_checkColumnConstraints(p_cod_pais)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_pais LIKE intb00020.cod_pais
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00020_cod_pais_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00020.cant_bulto" column
-#+
-#+ @param p_cant_bulto - VARCHAR2(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00020_cant_bulto_checkColumnConstraints(p_cant_bulto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cant_bulto LIKE intb00020.cant_bulto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00020_cant_bulto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00020.num_oc" column
-#+
-#+ @param p_num_oc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00020_num_oc_checkColumnConstraints(p_num_oc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_oc LIKE intb00020.num_oc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00020_num_oc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00020.num_emb" column
-#+
-#+ @param p_num_emb - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00020_num_emb_checkColumnConstraints(p_num_emb)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_emb LIKE intb00020.num_emb
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00020_num_emb_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00020.valor_merc" column
-#+
-#+ @param p_valor_merc - DECIMAL(13,3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00020_valor_merc_checkColumnConstraints(p_valor_merc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valor_merc LIKE intb00020.valor_merc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00020_valor_merc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00020.cod_ca" column
-#+
-#+ @param p_cod_ca - VARCHAR2(4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00020_cod_ca_checkColumnConstraints(p_cod_ca)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_ca LIKE intb00020.cod_ca
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00020_cod_ca_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00020.poliza" column
-#+
-#+ @param p_poliza - VARCHAR2(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00020_poliza_checkColumnConstraints(p_poliza)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_poliza LIKE intb00020.poliza
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00020_poliza_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00020.prima" column
-#+
-#+ @param p_prima - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00020_prima_checkColumnConstraints(p_prima)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_prima LIKE intb00020.prima
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00020_prima_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00020.porc_prima" column
-#+
-#+ @param p_porc_prima - DECIMAL(7,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00020_porc_prima_checkColumnConstraints(p_porc_prima)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_porc_prima LIKE intb00020.porc_prima
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00020_porc_prima_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00020.valor_desm" column
-#+
-#+ @param p_valor_desm - DECIMAL(7,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00020_valor_desm_checkColumnConstraints(p_valor_desm)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valor_desm LIKE intb00020.valor_desm
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00020_valor_desm_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00020.valor_gar" column
-#+
-#+ @param p_valor_gar - DECIMAL(13,3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00020_valor_gar_checkColumnConstraints(p_valor_gar)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valor_gar LIKE intb00020.valor_gar
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00020_valor_gar_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00020.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00020_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE intb00020.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00020_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00020.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00020_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE intb00020.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00020_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00020.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00020_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE intb00020.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00020_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00020.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00020_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE intb00020.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00020_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00020.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(13,3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00020_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE intb00020.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00020_cantidad_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00020.cantidad_c" column
-#+
-#+ @param p_cantidad_c - DECIMAL(13,3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00020_cantidad_c_checkColumnConstraints(p_cantidad_c)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad_c LIKE intb00020.cantidad_c
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00020_cantidad_c_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00020.status_t" column
-#+
-#+ @param p_status_t - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00020_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE intb00020.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00020_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00020.us_crea" column
-#+
-#+ @param p_us_crea - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00020_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE intb00020.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00020_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00020.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00020_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE intb00020.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00020_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00020.us_mod" column
-#+
-#+ @param p_us_mod - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00020_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE intb00020.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00020_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00020.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00020_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE intb00020.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00020_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00019" table
-#+
-#+ @param p_data - a row data LIKE intb00019.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00019_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE intb00019.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_intb00019_cod_inv_checkColumnConstraints(p_data.cod_inv) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00019_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00019_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00019_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00019_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00019_cod_sp_checkColumnConstraints(p_data.cod_sp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00019_cod_sp_sec_checkColumnConstraints(p_data.cod_sp_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00019_unidad_med_checkColumnConstraints(p_data.unidad_med) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00019_conversion_checkColumnConstraints(p_data.conversion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00019_precio_checkColumnConstraints(p_data.precio) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00019_precio_s_checkColumnConstraints(p_data.precio_s) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00019_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00019_referencia_checkColumnConstraints(p_data.referencia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00019_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00019_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00019_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00019_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00019_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- CALL smarmotech_dbxconstraints_intb00019_pk_intb00019_checkUniqueConstraint(p_forUpdate, p_data.cod_n, p_data.cod_grupo, p_data.cod_tipo, p_data.cod_sec, p_data.cod_sp, p_data.cod_sp_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00019_checkTableConstraints
-
-{}
-#+ Check the primary key uniqueness constraint on the "intb00019"
-#+
-#+ @param p_key - Primary Key
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00019_pk_intb00019_checkUniqueConstraint(p_forUpdate, p_key)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_key
- RECORD
- intb00019_cod_n LIKE intb00019.cod_n,
- intb00019_cod_grupo LIKE intb00019.cod_grupo,
- intb00019_cod_tipo LIKE intb00019.cod_tipo,
- intb00019_cod_sec LIKE intb00019.cod_sec,
- intb00019_cod_sp LIKE intb00019.cod_sp,
- intb00019_cod_sp_sec LIKE intb00019.cod_sp_sec
- END RECORD
- DEFINE l_key
- RECORD
- intb00019_cod_n LIKE intb00019.cod_n,
- intb00019_cod_grupo LIKE intb00019.cod_grupo,
- intb00019_cod_tipo LIKE intb00019.cod_tipo,
- intb00019_cod_sec LIKE intb00019.cod_sec,
- intb00019_cod_sp LIKE intb00019.cod_sp,
- intb00019_cod_sp_sec LIKE intb00019.cod_sp_sec
- END RECORD
- DEFINE l_where STRING
- DEFINE l_sqlQuery STRING
- DEFINE l_count INTEGER
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- LET l_where = "WHERE intb00019.cod_n = ?
- AND intb00019.cod_grupo = ?
- AND intb00019.cod_tipo = ?
- AND intb00019.cod_sec = ?
- AND intb00019.cod_sp = ?
- AND intb00019.cod_sp_sec = ? "
-
- let l_sqlQuery = "SELECT COUNT(*), cod_n, cod_grupo, cod_tipo, cod_sec, cod_sp, cod_sp_sec FROM intb00019 ", l_where, " GROUP BY cod_n, cod_grupo, cod_tipo, cod_sec, cod_sp, cod_sp_sec"
-
- PREPARE cur_intb00019_pk_intb00019_checkUniqueConstraint FROM l_sqlQuery
- EXECUTE cur_intb00019_pk_intb00019_checkUniqueConstraint INTO l_count, l_key.* USING p_key.*
- FREE cur_intb00019_pk_intb00019_checkUniqueConstraint
- IF (NOT p_forUpdate AND l_count > 0) OR (p_forUpdate AND l_count > 0 AND p_key.* != l_key.*) THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_n + cod_grupo + cod_tipo + cod_sec + cod_sp + cod_sp_sec: " || ERROR_BAM_00002) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00019_pk_intb00019_checkUniqueConstraint
-
-{}
-#+ Check constraints on the "intb00019.cod_inv" column
-#+
-#+ @param p_cod_inv - CHAR(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00019_cod_inv_checkColumnConstraints(p_cod_inv)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_inv LIKE intb00019.cod_inv
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00019_cod_inv_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00019.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00019_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE intb00019.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_n IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_n: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00019_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00019.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00019_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE intb00019.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_grupo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_grupo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00019_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00019.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00019_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE intb00019.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_tipo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_tipo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00019_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00019.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00019_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE intb00019.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_sec IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_sec: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00019_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00019.cod_sp" column
-#+
-#+ @param p_cod_sp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00019_cod_sp_checkColumnConstraints(p_cod_sp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sp LIKE intb00019.cod_sp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_sp IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_sp: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00019_cod_sp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00019.cod_sp_sec" column
-#+
-#+ @param p_cod_sp_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00019_cod_sp_sec_checkColumnConstraints(p_cod_sp_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sp_sec LIKE intb00019.cod_sp_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_sp_sec IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_sp_sec: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00019_cod_sp_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00019.unidad_med" column
-#+
-#+ @param p_unidad_med - CHAR(4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00019_unidad_med_checkColumnConstraints(p_unidad_med)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_unidad_med LIKE intb00019.unidad_med
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00019_unidad_med_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00019.conversion" column
-#+
-#+ @param p_conversion - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00019_conversion_checkColumnConstraints(p_conversion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_conversion LIKE intb00019.conversion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00019_conversion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00019.precio" column
-#+
-#+ @param p_precio - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00019_precio_checkColumnConstraints(p_precio)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_precio LIKE intb00019.precio
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00019_precio_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00019.precio_s" column
-#+
-#+ @param p_precio_s - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00019_precio_s_checkColumnConstraints(p_precio_s)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_precio_s LIKE intb00019.precio_s
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00019_precio_s_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00019.descripcion" column
-#+
-#+ @param p_descripcion - CHAR(100) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00019_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE intb00019.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00019_descripcion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00019.referencia" column
-#+
-#+ @param p_referencia - CHAR(25) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00019_referencia_checkColumnConstraints(p_referencia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_referencia LIKE intb00019.referencia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00019_referencia_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00019.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00019_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE intb00019.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00019_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00019.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00019_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE intb00019.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00019_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00019.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00019_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE intb00019.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00019_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00019.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00019_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE intb00019.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00019_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00019.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00019_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE intb00019.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00019_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00018" table
-#+
-#+ @param p_data - a row data LIKE intb00018.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00018_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE intb00018.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_intb00018_documento_checkColumnConstraints(p_data.documento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00018_cod_mov_checkColumnConstraints(p_data.cod_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00018_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00018_codigo_bloque_checkColumnConstraints(p_data.codigo_bloque) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00018_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00018_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00018_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00018_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00018_ancho1_checkColumnConstraints(p_data.ancho1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00018_largo1_checkColumnConstraints(p_data.largo1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00018_espesor1_checkColumnConstraints(p_data.espesor1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00018_medida1_checkColumnConstraints(p_data.medida1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00018_ancho2_checkColumnConstraints(p_data.ancho2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00018_largo2_checkColumnConstraints(p_data.largo2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00018_espesor2_checkColumnConstraints(p_data.espesor2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00018_medida2_checkColumnConstraints(p_data.medida2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00018_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00018_checkTableConstraints
-
-{}
-#+ Check constraints on the "intb00018.documento" column
-#+
-#+ @param p_documento - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00018_documento_checkColumnConstraints(p_documento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_documento LIKE intb00018.documento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00018_documento_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00018.cod_mov" column
-#+
-#+ @param p_cod_mov - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00018_cod_mov_checkColumnConstraints(p_cod_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mov LIKE intb00018.cod_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00018_cod_mov_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00018.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00018_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE intb00018.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00018_fecha_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00018.codigo_bloque" column
-#+
-#+ @param p_codigo_bloque - CHAR(25) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00018_codigo_bloque_checkColumnConstraints(p_codigo_bloque)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codigo_bloque LIKE intb00018.codigo_bloque
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00018_codigo_bloque_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00018.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00018_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE intb00018.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00018_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00018.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00018_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE intb00018.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00018_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00018.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00018_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE intb00018.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00018_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00018.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00018_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE intb00018.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00018_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00018.ancho1" column
-#+
-#+ @param p_ancho1 - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00018_ancho1_checkColumnConstraints(p_ancho1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ancho1 LIKE intb00018.ancho1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00018_ancho1_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00018.largo1" column
-#+
-#+ @param p_largo1 - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00018_largo1_checkColumnConstraints(p_largo1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_largo1 LIKE intb00018.largo1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00018_largo1_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00018.espesor1" column
-#+
-#+ @param p_espesor1 - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00018_espesor1_checkColumnConstraints(p_espesor1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_espesor1 LIKE intb00018.espesor1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00018_espesor1_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00018.medida1" column
-#+
-#+ @param p_medida1 - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00018_medida1_checkColumnConstraints(p_medida1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_medida1 LIKE intb00018.medida1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00018_medida1_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00018.ancho2" column
-#+
-#+ @param p_ancho2 - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00018_ancho2_checkColumnConstraints(p_ancho2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ancho2 LIKE intb00018.ancho2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00018_ancho2_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00018.largo2" column
-#+
-#+ @param p_largo2 - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00018_largo2_checkColumnConstraints(p_largo2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_largo2 LIKE intb00018.largo2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00018_largo2_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00018.espesor2" column
-#+
-#+ @param p_espesor2 - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00018_espesor2_checkColumnConstraints(p_espesor2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_espesor2 LIKE intb00018.espesor2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00018_espesor2_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00018.medida2" column
-#+
-#+ @param p_medida2 - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00018_medida2_checkColumnConstraints(p_medida2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_medida2 LIKE intb00018.medida2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00018_medida2_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00018.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00018_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE intb00018.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00018_cantidad_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00015" table
-#+
-#+ @param p_data - a row data LIKE intb00015.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00015_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE intb00015.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_intb00015_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00015_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00015_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00015_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00015_semana_del_checkColumnConstraints(p_data.semana_del) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00015_semana_al_checkColumnConstraints(p_data.semana_al) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00015_exis_act_checkColumnConstraints(p_data.exis_act) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00015_exis_fisica_checkColumnConstraints(p_data.exis_fisica) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00015_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00015_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00015_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00015_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00015_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00015_checkTableConstraints
-
-{}
-#+ Check constraints on the "intb00015.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00015_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE intb00015.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00015_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00015.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00015_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE intb00015.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00015_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00015.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00015_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE intb00015.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00015_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00015.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00015_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE intb00015.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00015_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00015.semana_del" column
-#+
-#+ @param p_semana_del - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00015_semana_del_checkColumnConstraints(p_semana_del)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_semana_del LIKE intb00015.semana_del
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00015_semana_del_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00015.semana_al" column
-#+
-#+ @param p_semana_al - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00015_semana_al_checkColumnConstraints(p_semana_al)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_semana_al LIKE intb00015.semana_al
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00015_semana_al_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00015.exis_act" column
-#+
-#+ @param p_exis_act - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00015_exis_act_checkColumnConstraints(p_exis_act)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_exis_act LIKE intb00015.exis_act
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00015_exis_act_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00015.exis_fisica" column
-#+
-#+ @param p_exis_fisica - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00015_exis_fisica_checkColumnConstraints(p_exis_fisica)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_exis_fisica LIKE intb00015.exis_fisica
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00015_exis_fisica_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00015.status_t" column
-#+
-#+ @param p_status_t - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00015_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE intb00015.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00015_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00015.us_crea" column
-#+
-#+ @param p_us_crea - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00015_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE intb00015.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00015_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00015.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00015_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE intb00015.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00015_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00015.us_mod" column
-#+
-#+ @param p_us_mod - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00015_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE intb00015.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00015_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00015.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00015_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE intb00015.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00015_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00014" table
-#+
-#+ @param p_data - a row data LIKE intb00014.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00014_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE intb00014.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_intb00014_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00014_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00014_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00014_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00014_categoria_checkColumnConstraints(p_data.categoria) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00014_mes_ch_checkColumnConstraints(p_data.mes_ch) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00014_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00014_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00014_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00014_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00014_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00014_checkTableConstraints
-
-{}
-#+ Check constraints on the "intb00014.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00014_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE intb00014.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00014_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00014.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00014_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE intb00014.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00014_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00014.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00014_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE intb00014.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00014_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00014.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00014_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE intb00014.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00014_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00014.categoria" column
-#+
-#+ @param p_categoria - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00014_categoria_checkColumnConstraints(p_categoria)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_categoria LIKE intb00014.categoria
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00014_categoria_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00014.mes_ch" column
-#+
-#+ @param p_mes_ch - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00014_mes_ch_checkColumnConstraints(p_mes_ch)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mes_ch LIKE intb00014.mes_ch
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00014_mes_ch_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00014.status_t" column
-#+
-#+ @param p_status_t - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00014_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE intb00014.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00014_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00014.us_crea" column
-#+
-#+ @param p_us_crea - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00014_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE intb00014.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00014_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00014.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00014_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE intb00014.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00014_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00014.us_mod" column
-#+
-#+ @param p_us_mod - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00014_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE intb00014.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00014_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00014.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00014_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE intb00014.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00014_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00013" table
-#+
-#+ @param p_data - a row data LIKE intb00013.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00013_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE intb00013.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_intb00013_mes_ini_checkColumnConstraints(p_data.mes_ini) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00013_mes_fin_checkColumnConstraints(p_data.mes_fin) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00013_ano_checkColumnConstraints(p_data.ano) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00013_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00013_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00013_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00013_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00013_costo_st_checkColumnConstraints(p_data.costo_st) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00013_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00013_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00013_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00013_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00013_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- CALL smarmotech_dbxconstraints_intb00013_pk_intb00013_checkUniqueConstraint(p_forUpdate, p_data.ano, p_data.cod_n, p_data.cod_grupo, p_data.cod_tipo, p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00013_checkTableConstraints
-
-{}
-#+ Check the primary key uniqueness constraint on the "intb00013"
-#+
-#+ @param p_key - Primary Key
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00013_pk_intb00013_checkUniqueConstraint(p_forUpdate, p_key)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_key
- RECORD
- intb00013_ano LIKE intb00013.ano,
- intb00013_cod_n LIKE intb00013.cod_n,
- intb00013_cod_grupo LIKE intb00013.cod_grupo,
- intb00013_cod_tipo LIKE intb00013.cod_tipo,
- intb00013_cod_sec LIKE intb00013.cod_sec
- END RECORD
- DEFINE l_key
- RECORD
- intb00013_ano LIKE intb00013.ano,
- intb00013_cod_n LIKE intb00013.cod_n,
- intb00013_cod_grupo LIKE intb00013.cod_grupo,
- intb00013_cod_tipo LIKE intb00013.cod_tipo,
- intb00013_cod_sec LIKE intb00013.cod_sec
- END RECORD
- DEFINE l_where STRING
- DEFINE l_sqlQuery STRING
- DEFINE l_count INTEGER
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- LET l_where = "WHERE intb00013.ano = ?
- AND intb00013.cod_n = ?
- AND intb00013.cod_grupo = ?
- AND intb00013.cod_tipo = ?
- AND intb00013.cod_sec = ? "
-
- let l_sqlQuery = "SELECT COUNT(*), ano, cod_n, cod_grupo, cod_tipo, cod_sec FROM intb00013 ", l_where, " GROUP BY ano, cod_n, cod_grupo, cod_tipo, cod_sec"
-
- PREPARE cur_intb00013_pk_intb00013_checkUniqueConstraint FROM l_sqlQuery
- EXECUTE cur_intb00013_pk_intb00013_checkUniqueConstraint INTO l_count, l_key.* USING p_key.*
- FREE cur_intb00013_pk_intb00013_checkUniqueConstraint
- IF (NOT p_forUpdate AND l_count > 0) OR (p_forUpdate AND l_count > 0 AND p_key.* != l_key.*) THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- ano + cod_n + cod_grupo + cod_tipo + cod_sec: " || ERROR_BAM_00002) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00013_pk_intb00013_checkUniqueConstraint
-
-{}
-#+ Check constraints on the "intb00013.mes_ini" column
-#+
-#+ @param p_mes_ini - VARCHAR2(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00013_mes_ini_checkColumnConstraints(p_mes_ini)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mes_ini LIKE intb00013.mes_ini
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00013_mes_ini_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00013.mes_fin" column
-#+
-#+ @param p_mes_fin - VARCHAR2(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00013_mes_fin_checkColumnConstraints(p_mes_fin)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mes_fin LIKE intb00013.mes_fin
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00013_mes_fin_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00013.ano" column
-#+
-#+ @param p_ano - VARCHAR2(4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00013_ano_checkColumnConstraints(p_ano)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ano LIKE intb00013.ano
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_ano IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- ano: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00013_ano_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00013.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00013_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE intb00013.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_n IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_n: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00013_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00013.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00013_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE intb00013.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_grupo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_grupo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00013_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00013.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00013_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE intb00013.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_tipo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_tipo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00013_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00013.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00013_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE intb00013.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_sec IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_sec: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00013_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00013.costo_st" column
-#+
-#+ @param p_costo_st - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00013_costo_st_checkColumnConstraints(p_costo_st)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_costo_st LIKE intb00013.costo_st
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00013_costo_st_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00013.status_t" column
-#+
-#+ @param p_status_t - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00013_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE intb00013.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00013_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00013.us_crea" column
-#+
-#+ @param p_us_crea - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00013_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE intb00013.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00013_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00013.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00013_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE intb00013.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00013_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00013.us_mod" column
-#+
-#+ @param p_us_mod - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00013_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE intb00013.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00013_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00013.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00013_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE intb00013.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00013_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00012" table
-#+
-#+ @param p_data - a row data LIKE intb00012.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00012_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE intb00012.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_intb00012_idtrx_checkColumnConstraints(p_data.idtrx) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00012_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00012_bodega_checkColumnConstraints(p_data.bodega) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00012_cod_seccion_checkColumnConstraints(p_data.cod_seccion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00012_cod_tramo_checkColumnConstraints(p_data.cod_tramo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00012_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00012_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00012_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00012_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00012_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00012_balance_checkColumnConstraints(p_data.balance) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00012_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00012_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00012_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00012_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00012_checkTableConstraints
-
-{}
-#+ Check constraints on the "intb00012.idtrx" column
-#+
-#+ @param p_idtrx - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00012_idtrx_checkColumnConstraints(p_idtrx)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_idtrx LIKE intb00012.idtrx
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00012_idtrx_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00012.fecha" column
-#+
-#+ @param p_fecha - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00012_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE intb00012.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00012_fecha_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00012.bodega" column
-#+
-#+ @param p_bodega - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00012_bodega_checkColumnConstraints(p_bodega)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_bodega LIKE intb00012.bodega
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00012_bodega_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00012.cod_seccion" column
-#+
-#+ @param p_cod_seccion - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00012_cod_seccion_checkColumnConstraints(p_cod_seccion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_seccion LIKE intb00012.cod_seccion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00012_cod_seccion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00012.cod_tramo" column
-#+
-#+ @param p_cod_tramo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00012_cod_tramo_checkColumnConstraints(p_cod_tramo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tramo LIKE intb00012.cod_tramo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00012_cod_tramo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00012.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00012_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE intb00012.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00012_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00012.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00012_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE intb00012.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00012_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00012.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00012_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE intb00012.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00012_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00012.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00012_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE intb00012.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00012_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00012.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00012_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE intb00012.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00012_cantidad_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00012.balance" column
-#+
-#+ @param p_balance - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00012_balance_checkColumnConstraints(p_balance)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_balance LIKE intb00012.balance
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00012_balance_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00012.us_crea" column
-#+
-#+ @param p_us_crea - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00012_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE intb00012.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00012_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00012.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00012_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE intb00012.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00012_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00012.us_mod" column
-#+
-#+ @param p_us_mod - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00012_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE intb00012.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00012_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00012.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00012_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE intb00012.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00012_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00011" table
-#+
-#+ @param p_data - a row data LIKE intb00011.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00011_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE intb00011.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_intb00011_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00011_bodega_checkColumnConstraints(p_data.bodega) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00011_cod_seccion_checkColumnConstraints(p_data.cod_seccion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00011_cod_tramo_checkColumnConstraints(p_data.cod_tramo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00011_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00011_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00011_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00011_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00011_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00011_balance_checkColumnConstraints(p_data.balance) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00011_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00011_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00011_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00011_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00011_checkTableConstraints
-
-{}
-#+ Check constraints on the "intb00011.fecha" column
-#+
-#+ @param p_fecha - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00011_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE intb00011.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_fecha IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- fecha: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00011_fecha_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00011.bodega" column
-#+
-#+ @param p_bodega - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00011_bodega_checkColumnConstraints(p_bodega)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_bodega LIKE intb00011.bodega
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_bodega IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- bodega: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00011_bodega_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00011.cod_seccion" column
-#+
-#+ @param p_cod_seccion - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00011_cod_seccion_checkColumnConstraints(p_cod_seccion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_seccion LIKE intb00011.cod_seccion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00011_cod_seccion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00011.cod_tramo" column
-#+
-#+ @param p_cod_tramo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00011_cod_tramo_checkColumnConstraints(p_cod_tramo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tramo LIKE intb00011.cod_tramo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00011_cod_tramo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00011.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00011_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE intb00011.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_n IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_n: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00011_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00011.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00011_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE intb00011.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_grupo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_grupo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00011_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00011.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00011_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE intb00011.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_tipo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_tipo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00011_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00011.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00011_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE intb00011.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_sec IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_sec: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00011_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00011.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00011_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE intb00011.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cantidad IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cantidad: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00011_cantidad_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00011.balance" column
-#+
-#+ @param p_balance - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00011_balance_checkColumnConstraints(p_balance)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_balance LIKE intb00011.balance
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00011_balance_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00011.us_crea" column
-#+
-#+ @param p_us_crea - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00011_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE intb00011.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00011_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00011.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00011_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE intb00011.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00011_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00011.us_mod" column
-#+
-#+ @param p_us_mod - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00011_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE intb00011.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00011_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00011.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00011_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE intb00011.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00011_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00010" table
-#+
-#+ @param p_data - a row data LIKE intb00010.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00010_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE intb00010.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_intb00010_cod_bodega_checkColumnConstraints(p_data.cod_bodega) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00010_cod_seccion_checkColumnConstraints(p_data.cod_seccion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00010_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- CALL smarmotech_dbxconstraints_intb00010_pk_intb00010_checkUniqueConstraint(p_forUpdate, p_data.cod_bodega, p_data.cod_seccion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00010_checkTableConstraints
-
-{}
-#+ Check the primary key uniqueness constraint on the "intb00010"
-#+
-#+ @param p_key - Primary Key
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00010_pk_intb00010_checkUniqueConstraint(p_forUpdate, p_key)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_key
- RECORD
- intb00010_cod_bodega LIKE intb00010.cod_bodega,
- intb00010_cod_seccion LIKE intb00010.cod_seccion
- END RECORD
- DEFINE l_key
- RECORD
- intb00010_cod_bodega LIKE intb00010.cod_bodega,
- intb00010_cod_seccion LIKE intb00010.cod_seccion
- END RECORD
- DEFINE l_where STRING
- DEFINE l_sqlQuery STRING
- DEFINE l_count INTEGER
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- LET l_where = "WHERE intb00010.cod_bodega = ?
- AND intb00010.cod_seccion = ? "
-
- let l_sqlQuery = "SELECT COUNT(*), cod_bodega, cod_seccion FROM intb00010 ", l_where, " GROUP BY cod_bodega, cod_seccion"
-
- PREPARE cur_intb00010_pk_intb00010_checkUniqueConstraint FROM l_sqlQuery
- EXECUTE cur_intb00010_pk_intb00010_checkUniqueConstraint INTO l_count, l_key.* USING p_key.*
- FREE cur_intb00010_pk_intb00010_checkUniqueConstraint
- IF (NOT p_forUpdate AND l_count > 0) OR (p_forUpdate AND l_count > 0 AND p_key.* != l_key.*) THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_bodega + cod_seccion: " || ERROR_BAM_00002) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00010_pk_intb00010_checkUniqueConstraint
-
-{}
-#+ Check constraints on the "intb00010.cod_bodega" column
-#+
-#+ @param p_cod_bodega - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00010_cod_bodega_checkColumnConstraints(p_cod_bodega)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_bodega LIKE intb00010.cod_bodega
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_bodega IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_bodega: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00010_cod_bodega_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00010.cod_seccion" column
-#+
-#+ @param p_cod_seccion - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00010_cod_seccion_checkColumnConstraints(p_cod_seccion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_seccion LIKE intb00010.cod_seccion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_seccion IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_seccion: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00010_cod_seccion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00010.descripcion" column
-#+
-#+ @param p_descripcion - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00010_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE intb00010.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00010_descripcion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00009" table
-#+
-#+ @param p_data - a row data LIKE intb00009.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00009_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE intb00009.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_intb00009_cod_bodega_checkColumnConstraints(p_data.cod_bodega) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00009_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- CALL smarmotech_dbxconstraints_intb00009_pk_intb00009_checkUniqueConstraint(p_forUpdate, p_data.cod_bodega) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00009_checkTableConstraints
-
-{}
-#+ Check the primary key uniqueness constraint on the "intb00009"
-#+
-#+ @param p_key - Primary Key
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00009_pk_intb00009_checkUniqueConstraint(p_forUpdate, p_key)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_key
- RECORD
- intb00009_cod_bodega LIKE intb00009.cod_bodega
- END RECORD
- DEFINE l_key
- RECORD
- intb00009_cod_bodega LIKE intb00009.cod_bodega
- END RECORD
- DEFINE l_where STRING
- DEFINE l_sqlQuery STRING
- DEFINE l_count INTEGER
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- LET l_where = "WHERE intb00009.cod_bodega = ? "
-
- let l_sqlQuery = "SELECT COUNT(*), cod_bodega FROM intb00009 ", l_where, " GROUP BY cod_bodega"
-
- PREPARE cur_intb00009_pk_intb00009_checkUniqueConstraint FROM l_sqlQuery
- EXECUTE cur_intb00009_pk_intb00009_checkUniqueConstraint INTO l_count, l_key.* USING p_key.*
- FREE cur_intb00009_pk_intb00009_checkUniqueConstraint
- IF (NOT p_forUpdate AND l_count > 0) OR (p_forUpdate AND l_count > 0 AND p_key.* != l_key.*) THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_bodega: " || ERROR_BAM_00002) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00009_pk_intb00009_checkUniqueConstraint
-
-{}
-#+ Check constraints on the "intb00009.cod_bodega" column
-#+
-#+ @param p_cod_bodega - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00009_cod_bodega_checkColumnConstraints(p_cod_bodega)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_bodega LIKE intb00009.cod_bodega
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_bodega IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_bodega: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00009_cod_bodega_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00009.descripcion" column
-#+
-#+ @param p_descripcion - VARCHAR2(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00009_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE intb00009.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00009_descripcion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00008" table
-#+
-#+ @param p_data - a row data LIKE intb00008.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00008_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE intb00008.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_intb00008_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00008_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00008_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00008_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00008_cod_sp_checkColumnConstraints(p_data.cod_sp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00008_cod_sp_sec_checkColumnConstraints(p_data.cod_sp_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00008_precio_checkColumnConstraints(p_data.precio) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00008_fecha_act_checkColumnConstraints(p_data.fecha_act) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00008_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00008_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00008_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00008_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00008_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00008_checkTableConstraints
-
-{}
-#+ Check constraints on the "intb00008.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00008_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE intb00008.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_n IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_n: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00008_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00008.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00008_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE intb00008.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_grupo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_grupo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00008_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00008.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00008_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE intb00008.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_tipo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_tipo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00008_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00008.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00008_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE intb00008.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_sec IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_sec: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00008_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00008.cod_sp" column
-#+
-#+ @param p_cod_sp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00008_cod_sp_checkColumnConstraints(p_cod_sp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sp LIKE intb00008.cod_sp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_sp IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_sp: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00008_cod_sp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00008.cod_sp_sec" column
-#+
-#+ @param p_cod_sp_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00008_cod_sp_sec_checkColumnConstraints(p_cod_sp_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sp_sec LIKE intb00008.cod_sp_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_sp_sec IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_sp_sec: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00008_cod_sp_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00008.precio" column
-#+
-#+ @param p_precio - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00008_precio_checkColumnConstraints(p_precio)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_precio LIKE intb00008.precio
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00008_precio_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00008.fecha_act" column
-#+
-#+ @param p_fecha_act - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00008_fecha_act_checkColumnConstraints(p_fecha_act)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_act LIKE intb00008.fecha_act
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00008_fecha_act_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00008.status_t" column
-#+
-#+ @param p_status_t - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00008_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE intb00008.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00008_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00008.us_crea" column
-#+
-#+ @param p_us_crea - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00008_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE intb00008.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00008_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00008.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00008_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE intb00008.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00008_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00008.us_mod" column
-#+
-#+ @param p_us_mod - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00008_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE intb00008.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00008_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00008.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00008_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE intb00008.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00008_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00007" table
-#+
-#+ @param p_data - a row data LIKE intb00007.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00007_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE intb00007.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_intb00007_codigo_unidad_checkColumnConstraints(p_data.codigo_unidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00007_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00007_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00007_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00007_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00007_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00007_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00007_checkTableConstraints
-
-{}
-#+ Check constraints on the "intb00007.codigo_unidad" column
-#+
-#+ @param p_codigo_unidad - VARCHAR2(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00007_codigo_unidad_checkColumnConstraints(p_codigo_unidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codigo_unidad LIKE intb00007.codigo_unidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_codigo_unidad IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- codigo_unidad: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00007_codigo_unidad_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00007.descripcion" column
-#+
-#+ @param p_descripcion - VARCHAR2(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00007_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE intb00007.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00007_descripcion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00007.status_t" column
-#+
-#+ @param p_status_t - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00007_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE intb00007.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00007_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00007.us_crea" column
-#+
-#+ @param p_us_crea - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00007_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE intb00007.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00007_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00007.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00007_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE intb00007.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00007_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00007.us_mod" column
-#+
-#+ @param p_us_mod - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00007_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE intb00007.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00007_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00007.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00007_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE intb00007.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00007_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00006" table
-#+
-#+ @param p_data - a row data LIKE intb00006.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00006_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE intb00006.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_intb00006_num_doc_checkColumnConstraints(p_data.num_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00006_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00006_fact_no_checkColumnConstraints(p_data.fact_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00006_conduce_no_checkColumnConstraints(p_data.conduce_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00006_orden_compra_checkColumnConstraints(p_data.orden_compra) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00006_tipo_checkColumnConstraints(p_data.tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00006_cod_sp_checkColumnConstraints(p_data.cod_sp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00006_cod_sp_sec_checkColumnConstraints(p_data.cod_sp_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00006_cod_mov_checkColumnConstraints(p_data.cod_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00006_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00006_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00006_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00006_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00006_cantidad_1_checkColumnConstraints(p_data.cantidad_1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00006_cantidad_2_checkColumnConstraints(p_data.cantidad_2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00006_depto_de_checkColumnConstraints(p_data.depto_de) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00006_depto_a_checkColumnConstraints(p_data.depto_a) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00006_cod_seccion_checkColumnConstraints(p_data.cod_seccion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00006_cond_recep_checkColumnConstraints(p_data.cond_recep) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00006_uso_tiempo_checkColumnConstraints(p_data.uso_tiempo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00006_bodega_checkColumnConstraints(p_data.bodega) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00006_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00006_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00006_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00006_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00006_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00006_num_emp_checkColumnConstraints(p_data.num_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00006_checkTableConstraints
-
-{}
-#+ Check constraints on the "intb00006.num_doc" column
-#+
-#+ @param p_num_doc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00006_num_doc_checkColumnConstraints(p_num_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_doc LIKE intb00006.num_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_num_doc IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- num_doc: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00006_num_doc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00006.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00006_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE intb00006.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00006_fecha_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00006.fact_no" column
-#+
-#+ @param p_fact_no - VARCHAR2(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00006_fact_no_checkColumnConstraints(p_fact_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fact_no LIKE intb00006.fact_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00006_fact_no_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00006.conduce_no" column
-#+
-#+ @param p_conduce_no - VARCHAR2(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00006_conduce_no_checkColumnConstraints(p_conduce_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_conduce_no LIKE intb00006.conduce_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00006_conduce_no_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00006.orden_compra" column
-#+
-#+ @param p_orden_compra - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00006_orden_compra_checkColumnConstraints(p_orden_compra)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_orden_compra LIKE intb00006.orden_compra
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00006_orden_compra_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00006.tipo" column
-#+
-#+ @param p_tipo - VARCHAR2(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00006_tipo_checkColumnConstraints(p_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo LIKE intb00006.tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00006_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00006.cod_sp" column
-#+
-#+ @param p_cod_sp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00006_cod_sp_checkColumnConstraints(p_cod_sp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sp LIKE intb00006.cod_sp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00006_cod_sp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00006.cod_sp_sec" column
-#+
-#+ @param p_cod_sp_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00006_cod_sp_sec_checkColumnConstraints(p_cod_sp_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sp_sec LIKE intb00006.cod_sp_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00006_cod_sp_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00006.cod_mov" column
-#+
-#+ @param p_cod_mov - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00006_cod_mov_checkColumnConstraints(p_cod_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mov LIKE intb00006.cod_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_mov IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_mov: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00006_cod_mov_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00006.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00006_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE intb00006.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00006_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00006.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00006_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE intb00006.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00006_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00006.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00006_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE intb00006.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00006_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00006.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00006_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE intb00006.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00006_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00006.cantidad_1" column
-#+
-#+ @param p_cantidad_1 - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00006_cantidad_1_checkColumnConstraints(p_cantidad_1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad_1 LIKE intb00006.cantidad_1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00006_cantidad_1_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00006.cantidad_2" column
-#+
-#+ @param p_cantidad_2 - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00006_cantidad_2_checkColumnConstraints(p_cantidad_2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad_2 LIKE intb00006.cantidad_2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00006_cantidad_2_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00006.depto_de" column
-#+
-#+ @param p_depto_de - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00006_depto_de_checkColumnConstraints(p_depto_de)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_depto_de LIKE intb00006.depto_de
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00006_depto_de_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00006.depto_a" column
-#+
-#+ @param p_depto_a - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00006_depto_a_checkColumnConstraints(p_depto_a)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_depto_a LIKE intb00006.depto_a
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00006_depto_a_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00006.cod_seccion" column
-#+
-#+ @param p_cod_seccion - VARCHAR2(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00006_cod_seccion_checkColumnConstraints(p_cod_seccion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_seccion LIKE intb00006.cod_seccion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00006_cod_seccion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00006.cond_recep" column
-#+
-#+ @param p_cond_recep - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00006_cond_recep_checkColumnConstraints(p_cond_recep)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cond_recep LIKE intb00006.cond_recep
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00006_cond_recep_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00006.uso_tiempo" column
-#+
-#+ @param p_uso_tiempo - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00006_uso_tiempo_checkColumnConstraints(p_uso_tiempo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_uso_tiempo LIKE intb00006.uso_tiempo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00006_uso_tiempo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00006.bodega" column
-#+
-#+ @param p_bodega - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00006_bodega_checkColumnConstraints(p_bodega)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_bodega LIKE intb00006.bodega
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_bodega IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- bodega: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00006_bodega_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00006.status_t" column
-#+
-#+ @param p_status_t - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00006_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE intb00006.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00006_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00006.us_crea" column
-#+
-#+ @param p_us_crea - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00006_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE intb00006.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00006_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00006.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00006_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE intb00006.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00006_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00006.us_mod" column
-#+
-#+ @param p_us_mod - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00006_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE intb00006.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00006_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00006.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00006_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE intb00006.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00006_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00006.num_emp" column
-#+
-#+ @param p_num_emp - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00006_num_emp_checkColumnConstraints(p_num_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_emp LIKE intb00006.num_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00006_num_emp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00005" table
-#+
-#+ @param p_data - a row data LIKE intb00005.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00005_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE intb00005.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_intb00005_cod_mov_checkColumnConstraints(p_data.cod_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00005_descrip_mov_checkColumnConstraints(p_data.descrip_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00005_status_mov_checkColumnConstraints(p_data.status_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00005_cuenta_1_checkColumnConstraints(p_data.cuenta_1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00005_cuenta_2_checkColumnConstraints(p_data.cuenta_2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00005_cuenta_3_checkColumnConstraints(p_data.cuenta_3) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00005_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00005_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00005_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00005_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00005_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00005_checkTableConstraints
-
-{}
-#+ Check constraints on the "intb00005.cod_mov" column
-#+
-#+ @param p_cod_mov - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00005_cod_mov_checkColumnConstraints(p_cod_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mov LIKE intb00005.cod_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_mov IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_mov: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00005_cod_mov_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00005.descrip_mov" column
-#+
-#+ @param p_descrip_mov - VARCHAR2(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00005_descrip_mov_checkColumnConstraints(p_descrip_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descrip_mov LIKE intb00005.descrip_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00005_descrip_mov_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00005.status_mov" column
-#+
-#+ @param p_status_mov - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00005_status_mov_checkColumnConstraints(p_status_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_mov LIKE intb00005.status_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00005_status_mov_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00005.cuenta_1" column
-#+
-#+ @param p_cuenta_1 - VARCHAR2(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00005_cuenta_1_checkColumnConstraints(p_cuenta_1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cuenta_1 LIKE intb00005.cuenta_1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00005_cuenta_1_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00005.cuenta_2" column
-#+
-#+ @param p_cuenta_2 - VARCHAR2(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00005_cuenta_2_checkColumnConstraints(p_cuenta_2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cuenta_2 LIKE intb00005.cuenta_2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00005_cuenta_2_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00005.cuenta_3" column
-#+
-#+ @param p_cuenta_3 - VARCHAR2(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00005_cuenta_3_checkColumnConstraints(p_cuenta_3)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cuenta_3 LIKE intb00005.cuenta_3
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00005_cuenta_3_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00005.status_t" column
-#+
-#+ @param p_status_t - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00005_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE intb00005.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00005_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00005.us_crea" column
-#+
-#+ @param p_us_crea - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00005_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE intb00005.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00005_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00005.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00005_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE intb00005.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00005_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00005.us_mod" column
-#+
-#+ @param p_us_mod - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00005_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE intb00005.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00005_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00005.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00005_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE intb00005.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00005_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00004" table
-#+
-#+ @param p_data - a row data LIKE intb00004.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00004_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE intb00004.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_intb00004_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00004_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00004_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00004_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00004_cod_n_e_checkColumnConstraints(p_data.cod_n_e) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00004_cod_grupo_e_checkColumnConstraints(p_data.cod_grupo_e) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00004_cod_tipo_e_checkColumnConstraints(p_data.cod_tipo_e) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00004_cod_sec_e_checkColumnConstraints(p_data.cod_sec_e) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00004_cod_uso_e_checkColumnConstraints(p_data.cod_uso_e) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00004_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00004_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00004_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00004_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00004_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00004_checkTableConstraints
-
-{}
-#+ Check constraints on the "intb00004.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00004_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE intb00004.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_n IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_n: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00004_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00004.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00004_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE intb00004.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_grupo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_grupo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00004_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00004.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00004_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE intb00004.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_tipo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_tipo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00004_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00004.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00004_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE intb00004.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_sec IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_sec: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00004_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00004.cod_n_e" column
-#+
-#+ @param p_cod_n_e - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00004_cod_n_e_checkColumnConstraints(p_cod_n_e)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n_e LIKE intb00004.cod_n_e
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00004_cod_n_e_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00004.cod_grupo_e" column
-#+
-#+ @param p_cod_grupo_e - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00004_cod_grupo_e_checkColumnConstraints(p_cod_grupo_e)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo_e LIKE intb00004.cod_grupo_e
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00004_cod_grupo_e_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00004.cod_tipo_e" column
-#+
-#+ @param p_cod_tipo_e - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00004_cod_tipo_e_checkColumnConstraints(p_cod_tipo_e)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo_e LIKE intb00004.cod_tipo_e
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00004_cod_tipo_e_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00004.cod_sec_e" column
-#+
-#+ @param p_cod_sec_e - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00004_cod_sec_e_checkColumnConstraints(p_cod_sec_e)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec_e LIKE intb00004.cod_sec_e
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00004_cod_sec_e_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00004.cod_uso_e" column
-#+
-#+ @param p_cod_uso_e - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00004_cod_uso_e_checkColumnConstraints(p_cod_uso_e)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_uso_e LIKE intb00004.cod_uso_e
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00004_cod_uso_e_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00004.status_t" column
-#+
-#+ @param p_status_t - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00004_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE intb00004.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00004_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00004.us_crea" column
-#+
-#+ @param p_us_crea - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00004_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE intb00004.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00004_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00004.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00004_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE intb00004.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00004_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00004.us_mod" column
-#+
-#+ @param p_us_mod - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00004_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE intb00004.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00004_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00004.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00004_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE intb00004.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00004_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00003" table
-#+
-#+ @param p_data - a row data LIKE intb00003.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00003_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE intb00003.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_intb00003_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00003_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00003_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00003_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00003_cod_n_s_checkColumnConstraints(p_data.cod_n_s) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00003_cod_grupo_s_checkColumnConstraints(p_data.cod_grupo_s) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00003_cod_tipo_s_checkColumnConstraints(p_data.cod_tipo_s) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00003_cod_sec_s_checkColumnConstraints(p_data.cod_sec_s) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00003_cod_uso_s_checkColumnConstraints(p_data.cod_uso_s) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00003_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00003_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00003_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00003_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00003_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00003_checkTableConstraints
-
-{}
-#+ Check constraints on the "intb00003.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00003_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE intb00003.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_n IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_n: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00003_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00003.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00003_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE intb00003.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_grupo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_grupo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00003_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00003.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00003_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE intb00003.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_tipo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_tipo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00003_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00003.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00003_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE intb00003.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_sec IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_sec: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00003_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00003.cod_n_s" column
-#+
-#+ @param p_cod_n_s - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00003_cod_n_s_checkColumnConstraints(p_cod_n_s)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n_s LIKE intb00003.cod_n_s
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00003_cod_n_s_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00003.cod_grupo_s" column
-#+
-#+ @param p_cod_grupo_s - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00003_cod_grupo_s_checkColumnConstraints(p_cod_grupo_s)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo_s LIKE intb00003.cod_grupo_s
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00003_cod_grupo_s_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00003.cod_tipo_s" column
-#+
-#+ @param p_cod_tipo_s - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00003_cod_tipo_s_checkColumnConstraints(p_cod_tipo_s)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo_s LIKE intb00003.cod_tipo_s
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00003_cod_tipo_s_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00003.cod_sec_s" column
-#+
-#+ @param p_cod_sec_s - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00003_cod_sec_s_checkColumnConstraints(p_cod_sec_s)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec_s LIKE intb00003.cod_sec_s
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00003_cod_sec_s_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00003.cod_uso_s" column
-#+
-#+ @param p_cod_uso_s - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00003_cod_uso_s_checkColumnConstraints(p_cod_uso_s)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_uso_s LIKE intb00003.cod_uso_s
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00003_cod_uso_s_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00003.status_t" column
-#+
-#+ @param p_status_t - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00003_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE intb00003.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00003_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00003.us_crea" column
-#+
-#+ @param p_us_crea - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00003_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE intb00003.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00003_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00003.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00003_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE intb00003.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00003_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00003.us_mod" column
-#+
-#+ @param p_us_mod - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00003_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE intb00003.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00003_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00003.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00003_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE intb00003.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00003_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00002" table
-#+
-#+ @param p_data - a row data LIKE intb00002.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00002_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE intb00002.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_intb00002_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00002_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00002_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00002_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00002_pto_reorden_checkColumnConstraints(p_data.pto_reorden) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00002_existencia_checkColumnConstraints(p_data.existencia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00002_cod_nab_checkColumnConstraints(p_data.cod_nab) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00002_base_checkColumnConstraints(p_data.base) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00002_bodega_checkColumnConstraints(p_data.bodega) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00002_categoria_checkColumnConstraints(p_data.categoria) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00002_dia_llegada_checkColumnConstraints(p_data.dia_llegada) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00002_gravamen_checkColumnConstraints(p_data.gravamen) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00002_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00002_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00002_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00002_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00002_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- CALL smarmotech_dbxconstraints_intb00002_pk_intb00002_checkUniqueConstraint(p_forUpdate, p_data.cod_n, p_data.cod_grupo, p_data.cod_tipo, p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00002_checkTableConstraints
-
-{}
-#+ Check the primary key uniqueness constraint on the "intb00002"
-#+
-#+ @param p_key - Primary Key
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00002_pk_intb00002_checkUniqueConstraint(p_forUpdate, p_key)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_key
- RECORD
- intb00002_cod_n LIKE intb00002.cod_n,
- intb00002_cod_grupo LIKE intb00002.cod_grupo,
- intb00002_cod_tipo LIKE intb00002.cod_tipo,
- intb00002_cod_sec LIKE intb00002.cod_sec
- END RECORD
- DEFINE l_key
- RECORD
- intb00002_cod_n LIKE intb00002.cod_n,
- intb00002_cod_grupo LIKE intb00002.cod_grupo,
- intb00002_cod_tipo LIKE intb00002.cod_tipo,
- intb00002_cod_sec LIKE intb00002.cod_sec
- END RECORD
- DEFINE l_where STRING
- DEFINE l_sqlQuery STRING
- DEFINE l_count INTEGER
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- LET l_where = "WHERE intb00002.cod_n = ?
- AND intb00002.cod_grupo = ?
- AND intb00002.cod_tipo = ?
- AND intb00002.cod_sec = ? "
-
- let l_sqlQuery = "SELECT COUNT(*), cod_n, cod_grupo, cod_tipo, cod_sec FROM intb00002 ", l_where, " GROUP BY cod_n, cod_grupo, cod_tipo, cod_sec"
-
- PREPARE cur_intb00002_pk_intb00002_checkUniqueConstraint FROM l_sqlQuery
- EXECUTE cur_intb00002_pk_intb00002_checkUniqueConstraint INTO l_count, l_key.* USING p_key.*
- FREE cur_intb00002_pk_intb00002_checkUniqueConstraint
- IF (NOT p_forUpdate AND l_count > 0) OR (p_forUpdate AND l_count > 0 AND p_key.* != l_key.*) THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_n + cod_grupo + cod_tipo + cod_sec: " || ERROR_BAM_00002) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00002_pk_intb00002_checkUniqueConstraint
-
-{}
-#+ Check constraints on the "intb00002.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00002_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE intb00002.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_n IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_n: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00002_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00002.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00002_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE intb00002.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_grupo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_grupo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00002_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00002.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00002_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE intb00002.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_tipo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_tipo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00002_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00002.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00002_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE intb00002.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_sec IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_sec: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00002_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00002.pto_reorden" column
-#+
-#+ @param p_pto_reorden - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00002_pto_reorden_checkColumnConstraints(p_pto_reorden)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_pto_reorden LIKE intb00002.pto_reorden
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00002_pto_reorden_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00002.existencia" column
-#+
-#+ @param p_existencia - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00002_existencia_checkColumnConstraints(p_existencia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_existencia LIKE intb00002.existencia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00002_existencia_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00002.cod_nab" column
-#+
-#+ @param p_cod_nab - CHAR(11) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00002_cod_nab_checkColumnConstraints(p_cod_nab)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_nab LIKE intb00002.cod_nab
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00002_cod_nab_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00002.base" column
-#+
-#+ @param p_base - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00002_base_checkColumnConstraints(p_base)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_base LIKE intb00002.base
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00002_base_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00002.bodega" column
-#+
-#+ @param p_bodega - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00002_bodega_checkColumnConstraints(p_bodega)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_bodega LIKE intb00002.bodega
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00002_bodega_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00002.categoria" column
-#+
-#+ @param p_categoria - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00002_categoria_checkColumnConstraints(p_categoria)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_categoria LIKE intb00002.categoria
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00002_categoria_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00002.dia_llegada" column
-#+
-#+ @param p_dia_llegada - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00002_dia_llegada_checkColumnConstraints(p_dia_llegada)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_dia_llegada LIKE intb00002.dia_llegada
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00002_dia_llegada_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00002.gravamen" column
-#+
-#+ @param p_gravamen - DECIMAL(5,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00002_gravamen_checkColumnConstraints(p_gravamen)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_gravamen LIKE intb00002.gravamen
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00002_gravamen_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00002.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00002_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE intb00002.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00002_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00002.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00002_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE intb00002.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00002_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00002.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00002_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE intb00002.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00002_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00002.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00002_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE intb00002.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00002_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00002.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00002_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE intb00002.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00002_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00001" table
-#+
-#+ @param p_data - a row data LIKE intb00001.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00001_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE intb00001.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_intb00001_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00001_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00001_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00001_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00001_descrip_esp_checkColumnConstraints(p_data.descrip_esp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00001_descrip_ing_checkColumnConstraints(p_data.descrip_ing) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00001_unidad_med_checkColumnConstraints(p_data.unidad_med) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00001_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00001_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00001_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00001_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00001_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00001_codid_checkColumnConstraints(p_data.codid) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00001_checkTableConstraints
-
-{}
-#+ Check constraints on the "intb00001.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00001_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE intb00001.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_n IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_n: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00001_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00001.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00001_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE intb00001.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_grupo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_grupo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00001_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00001.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00001_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE intb00001.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_tipo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_tipo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00001_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00001.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00001_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE intb00001.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_sec IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_sec: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00001_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00001.descrip_esp" column
-#+
-#+ @param p_descrip_esp - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00001_descrip_esp_checkColumnConstraints(p_descrip_esp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descrip_esp LIKE intb00001.descrip_esp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_descrip_esp IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- descrip_esp: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00001_descrip_esp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00001.descrip_ing" column
-#+
-#+ @param p_descrip_ing - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00001_descrip_ing_checkColumnConstraints(p_descrip_ing)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descrip_ing LIKE intb00001.descrip_ing
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00001_descrip_ing_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00001.unidad_med" column
-#+
-#+ @param p_unidad_med - CHAR(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00001_unidad_med_checkColumnConstraints(p_unidad_med)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_unidad_med LIKE intb00001.unidad_med
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00001_unidad_med_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00001.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00001_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE intb00001.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00001_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00001.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00001_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE intb00001.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00001_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00001.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00001_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE intb00001.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00001_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00001.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00001_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE intb00001.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00001_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00001.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00001_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE intb00001.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00001_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "intb00001.codid" column
-#+
-#+ @param p_codid - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00001_codid_checkColumnConstraints(p_codid)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codid LIKE intb00001.codid
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.intb00001_codid_checkColumnConstraints
-
-{}
-#+ Check constraints on the "inrp00002" table
-#+
-#+ @param p_data - a row data LIKE inrp00002.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_inrp00002_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE inrp00002.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_inrp00002_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_inrp00002_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_inrp00002_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_inrp00002_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_inrp00002_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_inrp00002_unidad_checkColumnConstraints(p_data.unidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_inrp00002_existencia_checkColumnConstraints(p_data.existencia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_inrp00002_costos_checkColumnConstraints(p_data.costos) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_inrp00002_total_checkColumnConstraints(p_data.total) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.inrp00002_checkTableConstraints
-
-{}
-#+ Check constraints on the "inrp00002.cod_n" column
-#+
-#+ @param p_cod_n - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_inrp00002_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE inrp00002.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.inrp00002_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "inrp00002.cod_grupo" column
-#+
-#+ @param p_cod_grupo - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_inrp00002_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE inrp00002.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.inrp00002_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "inrp00002.cod_tipo" column
-#+
-#+ @param p_cod_tipo - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_inrp00002_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE inrp00002.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.inrp00002_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "inrp00002.cod_sec" column
-#+
-#+ @param p_cod_sec - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_inrp00002_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE inrp00002.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.inrp00002_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "inrp00002.descripcion" column
-#+
-#+ @param p_descripcion - VARCHAR2(255) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_inrp00002_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE inrp00002.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.inrp00002_descripcion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "inrp00002.unidad" column
-#+
-#+ @param p_unidad - VARCHAR2(255) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_inrp00002_unidad_checkColumnConstraints(p_unidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_unidad LIKE inrp00002.unidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.inrp00002_unidad_checkColumnConstraints
-
-{}
-#+ Check constraints on the "inrp00002.existencia" column
-#+
-#+ @param p_existencia - VARCHAR2(255) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_inrp00002_existencia_checkColumnConstraints(p_existencia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_existencia LIKE inrp00002.existencia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.inrp00002_existencia_checkColumnConstraints
-
-{}
-#+ Check constraints on the "inrp00002.costos" column
-#+
-#+ @param p_costos - VARCHAR2(255) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_inrp00002_costos_checkColumnConstraints(p_costos)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_costos LIKE inrp00002.costos
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.inrp00002_costos_checkColumnConstraints
-
-{}
-#+ Check constraints on the "inrp00002.total" column
-#+
-#+ @param p_total - VARCHAR2(255) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_inrp00002_total_checkColumnConstraints(p_total)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_total LIKE inrp00002.total
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.inrp00002_total_checkColumnConstraints
-
-{}
-#+ Check constraints on the "emventas" table
-#+
-#+ @param p_data - a row data LIKE emventas.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_emventas_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE emventas.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_emventas_mes_checkColumnConstraints(p_data.mes) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_emventas_ventas_checkColumnConstraints(p_data.ventas) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_emventas_ventas_dia_checkColumnConstraints(p_data.ventas_dia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_emventas_ventas_acum_checkColumnConstraints(p_data.ventas_acum) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.emventas_checkTableConstraints
-
-{}
-#+ Check constraints on the "emventas.mes" column
-#+
-#+ @param p_mes - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_emventas_mes_checkColumnConstraints(p_mes)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mes LIKE emventas.mes
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.emventas_mes_checkColumnConstraints
-
-{}
-#+ Check constraints on the "emventas.ventas" column
-#+
-#+ @param p_ventas - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_emventas_ventas_checkColumnConstraints(p_ventas)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ventas LIKE emventas.ventas
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.emventas_ventas_checkColumnConstraints
-
-{}
-#+ Check constraints on the "emventas.ventas_dia" column
-#+
-#+ @param p_ventas_dia - DECIMAL(18,0) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_emventas_ventas_dia_checkColumnConstraints(p_ventas_dia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ventas_dia LIKE emventas.ventas_dia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.emventas_ventas_dia_checkColumnConstraints
-
-{}
-#+ Check constraints on the "emventas.ventas_acum" column
-#+
-#+ @param p_ventas_acum - DECIMAL(18,0) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_emventas_ventas_acum_checkColumnConstraints(p_ventas_acum)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ventas_acum LIKE emventas.ventas_acum
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.emventas_ventas_acum_checkColumnConstraints
-
-{}
-#+ Check constraints on the "empleados" table
-#+
-#+ @param p_data - a row data LIKE empleados.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_empleados_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE empleados.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_empleados_departamento_checkColumnConstraints(p_data.departamento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_empleados_tipo_empleado_checkColumnConstraints(p_data.tipo_empleado) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_empleados_ficha_checkColumnConstraints(p_data.ficha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_empleados_nombre_checkColumnConstraints(p_data.nombre) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_empleados_cedula_checkColumnConstraints(p_data.cedula) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_empleados_puesto_checkColumnConstraints(p_data.puesto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_empleados_fecha_nacimiento_checkColumnConstraints(p_data.fecha_nacimiento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_empleados_mes_nacimiento_checkColumnConstraints(p_data.mes_nacimiento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_empleados_fecha_entrada_checkColumnConstraints(p_data.fecha_entrada) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_empleados_fecha_nomina_checkColumnConstraints(p_data.fecha_nomina) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_empleados_ano_checkColumnConstraints(p_data.ano) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_empleados_mes_checkColumnConstraints(p_data.mes) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_empleados_tiempo_empresa_checkColumnConstraints(p_data.tiempo_empresa) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_empleados_meses_checkColumnConstraints(p_data.meses) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_empleados_movimiento_nom_checkColumnConstraints(p_data.movimiento_nom) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_empleados_sueldo_actual_checkColumnConstraints(p_data.sueldo_actual) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_empleados_valor_nomina_checkColumnConstraints(p_data.valor_nomina) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_empleados_estado_checkColumnConstraints(p_data.estado) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_empleados_nomina_checkColumnConstraints(p_data.nomina) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_empleados_fehasalida_checkColumnConstraints(p_data.fehasalida) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_empleados_clasemovimiento_checkColumnConstraints(p_data.clasemovimiento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_empleados_cuenta_checkColumnConstraints(p_data.cuenta) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_empleados_localidad_checkColumnConstraints(p_data.localidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_empleados_provincia_checkColumnConstraints(p_data.provincia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.empleados_checkTableConstraints
-
-{}
-#+ Check constraints on the "empleados.departamento" column
-#+
-#+ @param p_departamento - VARCHAR2(35) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_empleados_departamento_checkColumnConstraints(p_departamento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_departamento LIKE empleados.departamento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.empleados_departamento_checkColumnConstraints
-
-{}
-#+ Check constraints on the "empleados.tipo_empleado" column
-#+
-#+ @param p_tipo_empleado - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_empleados_tipo_empleado_checkColumnConstraints(p_tipo_empleado)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_empleado LIKE empleados.tipo_empleado
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.empleados_tipo_empleado_checkColumnConstraints
-
-{}
-#+ Check constraints on the "empleados.ficha" column
-#+
-#+ @param p_ficha - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_empleados_ficha_checkColumnConstraints(p_ficha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ficha LIKE empleados.ficha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_ficha IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- ficha: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.empleados_ficha_checkColumnConstraints
-
-{}
-#+ Check constraints on the "empleados.nombre" column
-#+
-#+ @param p_nombre - VARCHAR2(31) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_empleados_nombre_checkColumnConstraints(p_nombre)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombre LIKE empleados.nombre
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.empleados_nombre_checkColumnConstraints
-
-{}
-#+ Check constraints on the "empleados.cedula" column
-#+
-#+ @param p_cedula - CHAR(11) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_empleados_cedula_checkColumnConstraints(p_cedula)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cedula LIKE empleados.cedula
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.empleados_cedula_checkColumnConstraints
-
-{}
-#+ Check constraints on the "empleados.puesto" column
-#+
-#+ @param p_puesto - VARCHAR2(35) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_empleados_puesto_checkColumnConstraints(p_puesto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_puesto LIKE empleados.puesto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.empleados_puesto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "empleados.fecha_nacimiento" column
-#+
-#+ @param p_fecha_nacimiento - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_empleados_fecha_nacimiento_checkColumnConstraints(p_fecha_nacimiento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_nacimiento LIKE empleados.fecha_nacimiento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.empleados_fecha_nacimiento_checkColumnConstraints
-
-{}
-#+ Check constraints on the "empleados.mes_nacimiento" column
-#+
-#+ @param p_mes_nacimiento - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_empleados_mes_nacimiento_checkColumnConstraints(p_mes_nacimiento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mes_nacimiento LIKE empleados.mes_nacimiento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.empleados_mes_nacimiento_checkColumnConstraints
-
-{}
-#+ Check constraints on the "empleados.fecha_entrada" column
-#+
-#+ @param p_fecha_entrada - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_empleados_fecha_entrada_checkColumnConstraints(p_fecha_entrada)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_entrada LIKE empleados.fecha_entrada
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.empleados_fecha_entrada_checkColumnConstraints
-
-{}
-#+ Check constraints on the "empleados.fecha_nomina" column
-#+
-#+ @param p_fecha_nomina - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_empleados_fecha_nomina_checkColumnConstraints(p_fecha_nomina)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_nomina LIKE empleados.fecha_nomina
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.empleados_fecha_nomina_checkColumnConstraints
-
-{}
-#+ Check constraints on the "empleados.ano" column
-#+
-#+ @param p_ano - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_empleados_ano_checkColumnConstraints(p_ano)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ano LIKE empleados.ano
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_ano IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- ano: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.empleados_ano_checkColumnConstraints
-
-{}
-#+ Check constraints on the "empleados.mes" column
-#+
-#+ @param p_mes - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_empleados_mes_checkColumnConstraints(p_mes)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mes LIKE empleados.mes
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.empleados_mes_checkColumnConstraints
-
-{}
-#+ Check constraints on the "empleados.tiempo_empresa" column
-#+
-#+ @param p_tiempo_empresa - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_empleados_tiempo_empresa_checkColumnConstraints(p_tiempo_empresa)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tiempo_empresa LIKE empleados.tiempo_empresa
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.empleados_tiempo_empresa_checkColumnConstraints
-
-{}
-#+ Check constraints on the "empleados.meses" column
-#+
-#+ @param p_meses - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_empleados_meses_checkColumnConstraints(p_meses)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_meses LIKE empleados.meses
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.empleados_meses_checkColumnConstraints
-
-{}
-#+ Check constraints on the "empleados.movimiento_nom" column
-#+
-#+ @param p_movimiento_nom - VARCHAR2(33) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_empleados_movimiento_nom_checkColumnConstraints(p_movimiento_nom)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_movimiento_nom LIKE empleados.movimiento_nom
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.empleados_movimiento_nom_checkColumnConstraints
-
-{}
-#+ Check constraints on the "empleados.sueldo_actual" column
-#+
-#+ @param p_sueldo_actual - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_empleados_sueldo_actual_checkColumnConstraints(p_sueldo_actual)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sueldo_actual LIKE empleados.sueldo_actual
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.empleados_sueldo_actual_checkColumnConstraints
-
-{}
-#+ Check constraints on the "empleados.valor_nomina" column
-#+
-#+ @param p_valor_nomina - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_empleados_valor_nomina_checkColumnConstraints(p_valor_nomina)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valor_nomina LIKE empleados.valor_nomina
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.empleados_valor_nomina_checkColumnConstraints
-
-{}
-#+ Check constraints on the "empleados.estado" column
-#+
-#+ @param p_estado - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_empleados_estado_checkColumnConstraints(p_estado)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_estado LIKE empleados.estado
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.empleados_estado_checkColumnConstraints
-
-{}
-#+ Check constraints on the "empleados.nomina" column
-#+
-#+ @param p_nomina - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_empleados_nomina_checkColumnConstraints(p_nomina)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nomina LIKE empleados.nomina
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.empleados_nomina_checkColumnConstraints
-
-{}
-#+ Check constraints on the "empleados.fehasalida" column
-#+
-#+ @param p_fehasalida - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_empleados_fehasalida_checkColumnConstraints(p_fehasalida)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fehasalida LIKE empleados.fehasalida
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.empleados_fehasalida_checkColumnConstraints
-
-{}
-#+ Check constraints on the "empleados.clasemovimiento" column
-#+
-#+ @param p_clasemovimiento - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_empleados_clasemovimiento_checkColumnConstraints(p_clasemovimiento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_clasemovimiento LIKE empleados.clasemovimiento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.empleados_clasemovimiento_checkColumnConstraints
-
-{}
-#+ Check constraints on the "empleados.cuenta" column
-#+
-#+ @param p_cuenta - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_empleados_cuenta_checkColumnConstraints(p_cuenta)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cuenta LIKE empleados.cuenta
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.empleados_cuenta_checkColumnConstraints
-
-{}
-#+ Check constraints on the "empleados.localidad" column
-#+
-#+ @param p_localidad - VARCHAR2(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_empleados_localidad_checkColumnConstraints(p_localidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_localidad LIKE empleados.localidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.empleados_localidad_checkColumnConstraints
-
-{}
-#+ Check constraints on the "empleados.provincia" column
-#+
-#+ @param p_provincia - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_empleados_provincia_checkColumnConstraints(p_provincia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_provincia LIKE empleados.provincia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.empleados_provincia_checkColumnConstraints
-
-{}
-#+ Check constraints on the "dstb00005" table
-#+
-#+ @param p_data - a row data LIKE dstb00005.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_dstb00005_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE dstb00005.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_dstb00005_tabla_checkColumnConstraints(p_data.tabla) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dstb00005_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dstb00005_num_emp1_checkColumnConstraints(p_data.num_emp1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dstb00005_fecha_creacion_checkColumnConstraints(p_data.fecha_creacion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dstb00005_numero_act_checkColumnConstraints(p_data.numero_act) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dstb00005_campo_checkColumnConstraints(p_data.campo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dstb00005_descrip_campo_checkColumnConstraints(p_data.descrip_campo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dstb00005_tipo_checkColumnConstraints(p_data.tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dstb00005_longitud_checkColumnConstraints(p_data.longitud) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dstb00005_secuencia_checkColumnConstraints(p_data.secuencia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dstb00005_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dstb00005_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dstb00005_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dstb00005_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dstb00005_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.dstb00005_checkTableConstraints
-
-{}
-#+ Check constraints on the "dstb00005.tabla" column
-#+
-#+ @param p_tabla - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dstb00005_tabla_checkColumnConstraints(p_tabla)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tabla LIKE dstb00005.tabla
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.dstb00005_tabla_checkColumnConstraints
-
-{}
-#+ Check constraints on the "dstb00005.descripcion" column
-#+
-#+ @param p_descripcion - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dstb00005_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE dstb00005.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.dstb00005_descripcion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "dstb00005.num_emp1" column
-#+
-#+ @param p_num_emp1 - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dstb00005_num_emp1_checkColumnConstraints(p_num_emp1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_emp1 LIKE dstb00005.num_emp1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.dstb00005_num_emp1_checkColumnConstraints
-
-{}
-#+ Check constraints on the "dstb00005.fecha_creacion" column
-#+
-#+ @param p_fecha_creacion - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dstb00005_fecha_creacion_checkColumnConstraints(p_fecha_creacion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_creacion LIKE dstb00005.fecha_creacion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.dstb00005_fecha_creacion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "dstb00005.numero_act" column
-#+
-#+ @param p_numero_act - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dstb00005_numero_act_checkColumnConstraints(p_numero_act)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_numero_act LIKE dstb00005.numero_act
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.dstb00005_numero_act_checkColumnConstraints
-
-{}
-#+ Check constraints on the "dstb00005.campo" column
-#+
-#+ @param p_campo - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dstb00005_campo_checkColumnConstraints(p_campo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_campo LIKE dstb00005.campo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.dstb00005_campo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "dstb00005.descrip_campo" column
-#+
-#+ @param p_descrip_campo - CHAR(150) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dstb00005_descrip_campo_checkColumnConstraints(p_descrip_campo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descrip_campo LIKE dstb00005.descrip_campo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.dstb00005_descrip_campo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "dstb00005.tipo" column
-#+
-#+ @param p_tipo - CHAR(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dstb00005_tipo_checkColumnConstraints(p_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo LIKE dstb00005.tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.dstb00005_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "dstb00005.longitud" column
-#+
-#+ @param p_longitud - CHAR(16) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dstb00005_longitud_checkColumnConstraints(p_longitud)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_longitud LIKE dstb00005.longitud
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.dstb00005_longitud_checkColumnConstraints
-
-{}
-#+ Check constraints on the "dstb00005.secuencia" column
-#+
-#+ @param p_secuencia - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dstb00005_secuencia_checkColumnConstraints(p_secuencia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_secuencia LIKE dstb00005.secuencia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.dstb00005_secuencia_checkColumnConstraints
-
-{}
-#+ Check constraints on the "dstb00005.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dstb00005_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE dstb00005.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.dstb00005_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "dstb00005.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dstb00005_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE dstb00005.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.dstb00005_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "dstb00005.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dstb00005_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE dstb00005.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.dstb00005_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "dstb00005.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dstb00005_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE dstb00005.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.dstb00005_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "dstb00005.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dstb00005_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE dstb00005.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.dstb00005_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "dstb00004" table
-#+
-#+ @param p_data - a row data LIKE dstb00004.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_dstb00004_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE dstb00004.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_dstb00004_cod_sistema_checkColumnConstraints(p_data.cod_sistema) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dstb00004_menu1_checkColumnConstraints(p_data.menu1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dstb00004_programa_checkColumnConstraints(p_data.programa) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dstb00004_opcion_checkColumnConstraints(p_data.opcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dstb00004_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dstb00004_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dstb00004_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dstb00004_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dstb00004_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.dstb00004_checkTableConstraints
-
-{}
-#+ Check constraints on the "dstb00004.cod_sistema" column
-#+
-#+ @param p_cod_sistema - CHAR(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dstb00004_cod_sistema_checkColumnConstraints(p_cod_sistema)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sistema LIKE dstb00004.cod_sistema
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.dstb00004_cod_sistema_checkColumnConstraints
-
-{}
-#+ Check constraints on the "dstb00004.menu1" column
-#+
-#+ @param p_menu1 - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dstb00004_menu1_checkColumnConstraints(p_menu1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_menu1 LIKE dstb00004.menu1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.dstb00004_menu1_checkColumnConstraints
-
-{}
-#+ Check constraints on the "dstb00004.programa" column
-#+
-#+ @param p_programa - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dstb00004_programa_checkColumnConstraints(p_programa)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_programa LIKE dstb00004.programa
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.dstb00004_programa_checkColumnConstraints
-
-{}
-#+ Check constraints on the "dstb00004.opcion" column
-#+
-#+ @param p_opcion - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dstb00004_opcion_checkColumnConstraints(p_opcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_opcion LIKE dstb00004.opcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.dstb00004_opcion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "dstb00004.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dstb00004_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE dstb00004.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.dstb00004_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "dstb00004.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dstb00004_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE dstb00004.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.dstb00004_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "dstb00004.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dstb00004_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE dstb00004.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.dstb00004_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "dstb00004.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dstb00004_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE dstb00004.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.dstb00004_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "dstb00004.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dstb00004_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE dstb00004.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.dstb00004_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "dstb00003" table
-#+
-#+ @param p_data - a row data LIKE dstb00003.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_dstb00003_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE dstb00003.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_dstb00003_cod_sistema_checkColumnConstraints(p_data.cod_sistema) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dstb00003_desc_sistema_checkColumnConstraints(p_data.desc_sistema) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dstb00003_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dstb00003_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dstb00003_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dstb00003_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dstb00003_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.dstb00003_checkTableConstraints
-
-{}
-#+ Check constraints on the "dstb00003.cod_sistema" column
-#+
-#+ @param p_cod_sistema - CHAR(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dstb00003_cod_sistema_checkColumnConstraints(p_cod_sistema)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sistema LIKE dstb00003.cod_sistema
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.dstb00003_cod_sistema_checkColumnConstraints
-
-{}
-#+ Check constraints on the "dstb00003.desc_sistema" column
-#+
-#+ @param p_desc_sistema - CHAR(35) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dstb00003_desc_sistema_checkColumnConstraints(p_desc_sistema)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_desc_sistema LIKE dstb00003.desc_sistema
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.dstb00003_desc_sistema_checkColumnConstraints
-
-{}
-#+ Check constraints on the "dstb00003.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dstb00003_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE dstb00003.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.dstb00003_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "dstb00003.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dstb00003_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE dstb00003.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.dstb00003_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "dstb00003.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dstb00003_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE dstb00003.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.dstb00003_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "dstb00003.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dstb00003_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE dstb00003.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.dstb00003_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "dstb00003.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dstb00003_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE dstb00003.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.dstb00003_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "dstb00002" table
-#+
-#+ @param p_data - a row data LIKE dstb00002.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_dstb00002_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE dstb00002.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_dstb00002_programa_checkColumnConstraints(p_data.programa) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dstb00002_numero_act_checkColumnConstraints(p_data.numero_act) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dstb00002_linea_no_checkColumnConstraints(p_data.linea_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dstb00002_entradas_checkColumnConstraints(p_data.entradas) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dstb00002_proceso_checkColumnConstraints(p_data.proceso) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dstb00002_salida_checkColumnConstraints(p_data.salida) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dstb00002_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dstb00002_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dstb00002_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dstb00002_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dstb00002_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.dstb00002_checkTableConstraints
-
-{}
-#+ Check constraints on the "dstb00002.programa" column
-#+
-#+ @param p_programa - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dstb00002_programa_checkColumnConstraints(p_programa)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_programa LIKE dstb00002.programa
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.dstb00002_programa_checkColumnConstraints
-
-{}
-#+ Check constraints on the "dstb00002.numero_act" column
-#+
-#+ @param p_numero_act - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dstb00002_numero_act_checkColumnConstraints(p_numero_act)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_numero_act LIKE dstb00002.numero_act
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.dstb00002_numero_act_checkColumnConstraints
-
-{}
-#+ Check constraints on the "dstb00002.linea_no" column
-#+
-#+ @param p_linea_no - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dstb00002_linea_no_checkColumnConstraints(p_linea_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_linea_no LIKE dstb00002.linea_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.dstb00002_linea_no_checkColumnConstraints
-
-{}
-#+ Check constraints on the "dstb00002.entradas" column
-#+
-#+ @param p_entradas - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dstb00002_entradas_checkColumnConstraints(p_entradas)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_entradas LIKE dstb00002.entradas
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.dstb00002_entradas_checkColumnConstraints
-
-{}
-#+ Check constraints on the "dstb00002.proceso" column
-#+
-#+ @param p_proceso - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dstb00002_proceso_checkColumnConstraints(p_proceso)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_proceso LIKE dstb00002.proceso
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.dstb00002_proceso_checkColumnConstraints
-
-{}
-#+ Check constraints on the "dstb00002.salida" column
-#+
-#+ @param p_salida - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dstb00002_salida_checkColumnConstraints(p_salida)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_salida LIKE dstb00002.salida
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.dstb00002_salida_checkColumnConstraints
-
-{}
-#+ Check constraints on the "dstb00002.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dstb00002_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE dstb00002.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.dstb00002_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "dstb00002.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dstb00002_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE dstb00002.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.dstb00002_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "dstb00002.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dstb00002_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE dstb00002.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.dstb00002_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "dstb00002.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dstb00002_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE dstb00002.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.dstb00002_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "dstb00002.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dstb00002_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE dstb00002.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.dstb00002_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "dstb00001" table
-#+
-#+ @param p_data - a row data LIKE dstb00001.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_dstb00001_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE dstb00001.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_dstb00001_programa_checkColumnConstraints(p_data.programa) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dstb00001_cod_sistema_checkColumnConstraints(p_data.cod_sistema) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dstb00001_num_emp_checkColumnConstraints(p_data.num_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dstb00001_no_solicitud_checkColumnConstraints(p_data.no_solicitud) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dstb00001_fecha_creacion_checkColumnConstraints(p_data.fecha_creacion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dstb00001_fecha_modificacion_checkColumnConstraints(p_data.fecha_modificacion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dstb00001_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dstb00001_objetivo1_checkColumnConstraints(p_data.objetivo1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dstb00001_objetivo2_checkColumnConstraints(p_data.objetivo2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dstb00001_numero_act_checkColumnConstraints(p_data.numero_act) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dstb00001_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dstb00001_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dstb00001_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dstb00001_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dstb00001_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.dstb00001_checkTableConstraints
-
-{}
-#+ Check constraints on the "dstb00001.programa" column
-#+
-#+ @param p_programa - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dstb00001_programa_checkColumnConstraints(p_programa)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_programa LIKE dstb00001.programa
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.dstb00001_programa_checkColumnConstraints
-
-{}
-#+ Check constraints on the "dstb00001.cod_sistema" column
-#+
-#+ @param p_cod_sistema - CHAR(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dstb00001_cod_sistema_checkColumnConstraints(p_cod_sistema)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sistema LIKE dstb00001.cod_sistema
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.dstb00001_cod_sistema_checkColumnConstraints
-
-{}
-#+ Check constraints on the "dstb00001.num_emp" column
-#+
-#+ @param p_num_emp - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dstb00001_num_emp_checkColumnConstraints(p_num_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_emp LIKE dstb00001.num_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.dstb00001_num_emp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "dstb00001.no_solicitud" column
-#+
-#+ @param p_no_solicitud - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dstb00001_no_solicitud_checkColumnConstraints(p_no_solicitud)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_no_solicitud LIKE dstb00001.no_solicitud
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.dstb00001_no_solicitud_checkColumnConstraints
-
-{}
-#+ Check constraints on the "dstb00001.fecha_creacion" column
-#+
-#+ @param p_fecha_creacion - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dstb00001_fecha_creacion_checkColumnConstraints(p_fecha_creacion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_creacion LIKE dstb00001.fecha_creacion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.dstb00001_fecha_creacion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "dstb00001.fecha_modificacion" column
-#+
-#+ @param p_fecha_modificacion - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dstb00001_fecha_modificacion_checkColumnConstraints(p_fecha_modificacion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_modificacion LIKE dstb00001.fecha_modificacion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.dstb00001_fecha_modificacion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "dstb00001.descripcion" column
-#+
-#+ @param p_descripcion - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dstb00001_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE dstb00001.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.dstb00001_descripcion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "dstb00001.objetivo1" column
-#+
-#+ @param p_objetivo1 - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dstb00001_objetivo1_checkColumnConstraints(p_objetivo1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_objetivo1 LIKE dstb00001.objetivo1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.dstb00001_objetivo1_checkColumnConstraints
-
-{}
-#+ Check constraints on the "dstb00001.objetivo2" column
-#+
-#+ @param p_objetivo2 - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dstb00001_objetivo2_checkColumnConstraints(p_objetivo2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_objetivo2 LIKE dstb00001.objetivo2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.dstb00001_objetivo2_checkColumnConstraints
-
-{}
-#+ Check constraints on the "dstb00001.numero_act" column
-#+
-#+ @param p_numero_act - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dstb00001_numero_act_checkColumnConstraints(p_numero_act)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_numero_act LIKE dstb00001.numero_act
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.dstb00001_numero_act_checkColumnConstraints
-
-{}
-#+ Check constraints on the "dstb00001.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dstb00001_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE dstb00001.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.dstb00001_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "dstb00001.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dstb00001_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE dstb00001.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.dstb00001_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "dstb00001.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dstb00001_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE dstb00001.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.dstb00001_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "dstb00001.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dstb00001_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE dstb00001.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.dstb00001_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "dstb00001.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dstb00001_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE dstb00001.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.dstb00001_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "diatable" table
-#+
-#+ @param p_data - a row data LIKE diatable.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_diatable_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE diatable.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_diatable_dia_checkColumnConstraints(p_data.dia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_diatable_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.diatable_checkTableConstraints
-
-{}
-#+ Check constraints on the "diatable.dia" column
-#+
-#+ @param p_dia - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_diatable_dia_checkColumnConstraints(p_dia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_dia LIKE diatable.dia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.diatable_dia_checkColumnConstraints
-
-{}
-#+ Check constraints on the "diatable.descripcion" column
-#+
-#+ @param p_descripcion - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_diatable_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE diatable.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.diatable_descripcion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "dgii_rnc3" table
-#+
-#+ @param p_data - a row data LIKE dgii_rnc3.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_dgii_rnc3_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE dgii_rnc3.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_dgii_rnc3_column_0_checkColumnConstraints(p_data.column_0) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dgii_rnc3_column_1_checkColumnConstraints(p_data.column_1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dgii_rnc3_column_2_checkColumnConstraints(p_data.column_2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dgii_rnc3_column_3_checkColumnConstraints(p_data.column_3) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dgii_rnc3_column_4_checkColumnConstraints(p_data.column_4) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dgii_rnc3_column_5_checkColumnConstraints(p_data.column_5) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dgii_rnc3_column_6_checkColumnConstraints(p_data.column_6) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dgii_rnc3_column_7_checkColumnConstraints(p_data.column_7) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.dgii_rnc3_checkTableConstraints
-
-{}
-#+ Check constraints on the "dgii_rnc3.column_0" column
-#+
-#+ @param p_column_0 - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dgii_rnc3_column_0_checkColumnConstraints(p_column_0)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_column_0 LIKE dgii_rnc3.column_0
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.dgii_rnc3_column_0_checkColumnConstraints
-
-{}
-#+ Check constraints on the "dgii_rnc3.column_1" column
-#+
-#+ @param p_column_1 - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dgii_rnc3_column_1_checkColumnConstraints(p_column_1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_column_1 LIKE dgii_rnc3.column_1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.dgii_rnc3_column_1_checkColumnConstraints
-
-{}
-#+ Check constraints on the "dgii_rnc3.column_2" column
-#+
-#+ @param p_column_2 - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dgii_rnc3_column_2_checkColumnConstraints(p_column_2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_column_2 LIKE dgii_rnc3.column_2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.dgii_rnc3_column_2_checkColumnConstraints
-
-{}
-#+ Check constraints on the "dgii_rnc3.column_3" column
-#+
-#+ @param p_column_3 - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dgii_rnc3_column_3_checkColumnConstraints(p_column_3)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_column_3 LIKE dgii_rnc3.column_3
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.dgii_rnc3_column_3_checkColumnConstraints
-
-{}
-#+ Check constraints on the "dgii_rnc3.column_4" column
-#+
-#+ @param p_column_4 - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dgii_rnc3_column_4_checkColumnConstraints(p_column_4)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_column_4 LIKE dgii_rnc3.column_4
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.dgii_rnc3_column_4_checkColumnConstraints
-
-{}
-#+ Check constraints on the "dgii_rnc3.column_5" column
-#+
-#+ @param p_column_5 - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dgii_rnc3_column_5_checkColumnConstraints(p_column_5)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_column_5 LIKE dgii_rnc3.column_5
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.dgii_rnc3_column_5_checkColumnConstraints
-
-{}
-#+ Check constraints on the "dgii_rnc3.column_6" column
-#+
-#+ @param p_column_6 - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dgii_rnc3_column_6_checkColumnConstraints(p_column_6)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_column_6 LIKE dgii_rnc3.column_6
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.dgii_rnc3_column_6_checkColumnConstraints
-
-{}
-#+ Check constraints on the "dgii_rnc3.column_7" column
-#+
-#+ @param p_column_7 - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dgii_rnc3_column_7_checkColumnConstraints(p_column_7)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_column_7 LIKE dgii_rnc3.column_7
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.dgii_rnc3_column_7_checkColumnConstraints
-
-{}
-#+ Check constraints on the "dgii_rnc" table
-#+
-#+ @param p_data - a row data LIKE dgii_rnc.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_dgii_rnc_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE dgii_rnc.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_dgii_rnc_rnc_checkColumnConstraints(p_data.rnc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dgii_rnc_column1_checkColumnConstraints(p_data.column1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dgii_rnc_column2_checkColumnConstraints(p_data.column2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dgii_rnc_column3_checkColumnConstraints(p_data.column3) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dgii_rnc_column4_checkColumnConstraints(p_data.column4) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dgii_rnc_column5_checkColumnConstraints(p_data.column5) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dgii_rnc_column6_checkColumnConstraints(p_data.column6) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dgii_rnc_column7_checkColumnConstraints(p_data.column7) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dgii_rnc_column8_checkColumnConstraints(p_data.column8) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dgii_rnc_column9_checkColumnConstraints(p_data.column9) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dgii_rnc_column10_checkColumnConstraints(p_data.column10) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dgii_rnc_column11_checkColumnConstraints(p_data.column11) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.dgii_rnc_checkTableConstraints
-
-{}
-#+ Check constraints on the "dgii_rnc.rnc" column
-#+
-#+ @param p_rnc - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dgii_rnc_rnc_checkColumnConstraints(p_rnc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_rnc LIKE dgii_rnc.rnc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.dgii_rnc_rnc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "dgii_rnc.column1" column
-#+
-#+ @param p_column1 - TEXT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dgii_rnc_column1_checkColumnConstraints(p_column1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_column1 LIKE dgii_rnc.column1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.dgii_rnc_column1_checkColumnConstraints
-
-{}
-#+ Check constraints on the "dgii_rnc.column2" column
-#+
-#+ @param p_column2 - VARCHAR2(255) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dgii_rnc_column2_checkColumnConstraints(p_column2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_column2 LIKE dgii_rnc.column2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.dgii_rnc_column2_checkColumnConstraints
-
-{}
-#+ Check constraints on the "dgii_rnc.column3" column
-#+
-#+ @param p_column3 - VARCHAR2(255) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dgii_rnc_column3_checkColumnConstraints(p_column3)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_column3 LIKE dgii_rnc.column3
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.dgii_rnc_column3_checkColumnConstraints
-
-{}
-#+ Check constraints on the "dgii_rnc.column4" column
-#+
-#+ @param p_column4 - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dgii_rnc_column4_checkColumnConstraints(p_column4)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_column4 LIKE dgii_rnc.column4
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.dgii_rnc_column4_checkColumnConstraints
-
-{}
-#+ Check constraints on the "dgii_rnc.column5" column
-#+
-#+ @param p_column5 - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dgii_rnc_column5_checkColumnConstraints(p_column5)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_column5 LIKE dgii_rnc.column5
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.dgii_rnc_column5_checkColumnConstraints
-
-{}
-#+ Check constraints on the "dgii_rnc.column6" column
-#+
-#+ @param p_column6 - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dgii_rnc_column6_checkColumnConstraints(p_column6)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_column6 LIKE dgii_rnc.column6
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.dgii_rnc_column6_checkColumnConstraints
-
-{}
-#+ Check constraints on the "dgii_rnc.column7" column
-#+
-#+ @param p_column7 - VARCHAR2(255) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dgii_rnc_column7_checkColumnConstraints(p_column7)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_column7 LIKE dgii_rnc.column7
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.dgii_rnc_column7_checkColumnConstraints
-
-{}
-#+ Check constraints on the "dgii_rnc.column8" column
-#+
-#+ @param p_column8 - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dgii_rnc_column8_checkColumnConstraints(p_column8)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_column8 LIKE dgii_rnc.column8
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.dgii_rnc_column8_checkColumnConstraints
-
-{}
-#+ Check constraints on the "dgii_rnc.column9" column
-#+
-#+ @param p_column9 - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dgii_rnc_column9_checkColumnConstraints(p_column9)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_column9 LIKE dgii_rnc.column9
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.dgii_rnc_column9_checkColumnConstraints
-
-{}
-#+ Check constraints on the "dgii_rnc.column10" column
-#+
-#+ @param p_column10 - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dgii_rnc_column10_checkColumnConstraints(p_column10)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_column10 LIKE dgii_rnc.column10
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.dgii_rnc_column10_checkColumnConstraints
-
-{}
-#+ Check constraints on the "dgii_rnc.column11" column
-#+
-#+ @param p_column11 - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dgii_rnc_column11_checkColumnConstraints(p_column11)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_column11 LIKE dgii_rnc.column11
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.dgii_rnc_column11_checkColumnConstraints
-
-{}
-#+ Check constraints on the "dbocodigos20" table
-#+
-#+ @param p_data - a row data LIKE dbocodigos20.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_dbocodigos20_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE dbocodigos20.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_dbocodigos20_f1_checkColumnConstraints(p_data.f1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dbocodigos20_f2_checkColumnConstraints(p_data.f2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dbocodigos20_f3_checkColumnConstraints(p_data.f3) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dbocodigos20_f4_checkColumnConstraints(p_data.f4) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.dbocodigos20_checkTableConstraints
-
-{}
-#+ Check constraints on the "dbocodigos20.f1" column
-#+
-#+ @param p_f1 - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dbocodigos20_f1_checkColumnConstraints(p_f1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_f1 LIKE dbocodigos20.f1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.dbocodigos20_f1_checkColumnConstraints
-
-{}
-#+ Check constraints on the "dbocodigos20.f2" column
-#+
-#+ @param p_f2 - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dbocodigos20_f2_checkColumnConstraints(p_f2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_f2 LIKE dbocodigos20.f2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.dbocodigos20_f2_checkColumnConstraints
-
-{}
-#+ Check constraints on the "dbocodigos20.f3" column
-#+
-#+ @param p_f3 - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dbocodigos20_f3_checkColumnConstraints(p_f3)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_f3 LIKE dbocodigos20.f3
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.dbocodigos20_f3_checkColumnConstraints
-
-{}
-#+ Check constraints on the "dbocodigos20.f4" column
-#+
-#+ @param p_f4 - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dbocodigos20_f4_checkColumnConstraints(p_f4)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_f4 LIKE dbocodigos20.f4
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.dbocodigos20_f4_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb000log2" table
-#+
-#+ @param p_data - a row data LIKE cttb000log2.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb000log2_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cttb000log2.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cttb000log2_fecha_lq_checkColumnConstraints(p_data.fecha_lq) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb000log2_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb000log2_tipo_lq_checkColumnConstraints(p_data.tipo_lq) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb000log2_num_oc_checkColumnConstraints(p_data.num_oc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb000log2_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb000log2_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb000log2_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb000log2_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb000log2_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb000log2_costo_lq_checkColumnConstraints(p_data.costo_lq) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb000log2_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb000log2_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb000log2_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb000log2_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb000log2_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb000log2_tipo_orden_checkColumnConstraints(p_data.tipo_orden) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb000log2_programa_checkColumnConstraints(p_data.programa) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb000log2_checkTableConstraints
-
-{}
-#+ Check constraints on the "cttb000log2.fecha_lq" column
-#+
-#+ @param p_fecha_lq - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb000log2_fecha_lq_checkColumnConstraints(p_fecha_lq)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_lq LIKE cttb000log2.fecha_lq
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb000log2_fecha_lq_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb000log2.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb000log2_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE cttb000log2.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb000log2_fecha_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb000log2.tipo_lq" column
-#+
-#+ @param p_tipo_lq - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb000log2_tipo_lq_checkColumnConstraints(p_tipo_lq)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_lq LIKE cttb000log2.tipo_lq
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb000log2_tipo_lq_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb000log2.num_oc" column
-#+
-#+ @param p_num_oc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb000log2_num_oc_checkColumnConstraints(p_num_oc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_oc LIKE cttb000log2.num_oc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb000log2_num_oc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb000log2.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb000log2_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE cttb000log2.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb000log2_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb000log2.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb000log2_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE cttb000log2.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb000log2_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb000log2.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb000log2_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE cttb000log2.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb000log2_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb000log2.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb000log2_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE cttb000log2.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb000log2_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb000log2.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb000log2_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE cttb000log2.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb000log2_cantidad_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb000log2.costo_lq" column
-#+
-#+ @param p_costo_lq - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb000log2_costo_lq_checkColumnConstraints(p_costo_lq)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_costo_lq LIKE cttb000log2.costo_lq
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb000log2_costo_lq_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb000log2.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb000log2_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cttb000log2.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb000log2_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb000log2.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb000log2_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cttb000log2.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb000log2_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb000log2.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb000log2_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cttb000log2.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb000log2_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb000log2.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb000log2_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cttb000log2.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb000log2_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb000log2.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb000log2_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cttb000log2.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb000log2_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb000log2.tipo_orden" column
-#+
-#+ @param p_tipo_orden - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb000log2_tipo_orden_checkColumnConstraints(p_tipo_orden)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_orden LIKE cttb000log2.tipo_orden
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb000log2_tipo_orden_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb000log2.programa" column
-#+
-#+ @param p_programa - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb000log2_programa_checkColumnConstraints(p_programa)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_programa LIKE cttb000log2.programa
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb000log2_programa_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb000log1" table
-#+
-#+ @param p_data - a row data LIKE cttb000log1.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb000log1_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cttb000log1.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cttb000log1_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb000log1_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb000log1_programa_checkColumnConstraints(p_data.programa) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb000log1_estado_checkColumnConstraints(p_data.estado) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb000log1_checkTableConstraints
-
-{}
-#+ Check constraints on the "cttb000log1.fecha" column
-#+
-#+ @param p_fecha - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb000log1_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE cttb000log1.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb000log1_fecha_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb000log1.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb000log1_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cttb000log1.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb000log1_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb000log1.programa" column
-#+
-#+ @param p_programa - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb000log1_programa_checkColumnConstraints(p_programa)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_programa LIKE cttb000log1.programa
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb000log1_programa_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb000log1.estado" column
-#+
-#+ @param p_estado - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb000log1_estado_checkColumnConstraints(p_estado)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_estado LIKE cttb000log1.estado
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb000log1_estado_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00042" table
-#+
-#+ @param p_data - a row data LIKE cttb00042.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00042_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cttb00042.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cttb00042_num_doc_checkColumnConstraints(p_data.num_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00042_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00042_departamento_checkColumnConstraints(p_data.departamento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00042_observacion_checkColumnConstraints(p_data.observacion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00042_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00042_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00042_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00042_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00042_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00042_checkTableConstraints
-
-{}
-#+ Check constraints on the "cttb00042.num_doc" column
-#+
-#+ @param p_num_doc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00042_num_doc_checkColumnConstraints(p_num_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_doc LIKE cttb00042.num_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00042_num_doc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00042.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00042_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE cttb00042.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00042_fecha_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00042.departamento" column
-#+
-#+ @param p_departamento - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00042_departamento_checkColumnConstraints(p_departamento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_departamento LIKE cttb00042.departamento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00042_departamento_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00042.observacion" column
-#+
-#+ @param p_observacion - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00042_observacion_checkColumnConstraints(p_observacion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_observacion LIKE cttb00042.observacion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00042_observacion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00042.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00042_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cttb00042.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00042_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00042.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00042_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cttb00042.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00042_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00042.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00042_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cttb00042.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00042_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00042.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00042_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cttb00042.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00042_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00042.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00042_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cttb00042.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00042_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00041" table
-#+
-#+ @param p_data - a row data LIKE cttb00041.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00041_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cttb00041.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cttb00041_cod_prod_checkColumnConstraints(p_data.cod_prod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00041_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00041_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00041_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00041_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00041_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00041_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00041_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00041_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00041_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00041_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00041_checkTableConstraints
-
-{}
-#+ Check constraints on the "cttb00041.cod_prod" column
-#+
-#+ @param p_cod_prod - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00041_cod_prod_checkColumnConstraints(p_cod_prod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_prod LIKE cttb00041.cod_prod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00041_cod_prod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00041.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00041_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE cttb00041.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00041_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00041.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00041_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE cttb00041.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00041_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00041.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00041_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE cttb00041.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00041_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00041.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00041_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE cttb00041.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00041_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00041.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(10,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00041_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE cttb00041.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00041_cantidad_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00041.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00041_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cttb00041.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00041_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00041.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00041_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cttb00041.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00041_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00041.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00041_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cttb00041.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00041_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00041.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00041_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cttb00041.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00041_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00041.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00041_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cttb00041.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00041_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00039" table
-#+
-#+ @param p_data - a row data LIKE cttb00039.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00039_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cttb00039.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cttb00039_ano_checkColumnConstraints(p_data.ano) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00039_mes_checkColumnConstraints(p_data.mes) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00039_valor_checkColumnConstraints(p_data.valor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00039_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00039_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00039_checkTableConstraints
-
-{}
-#+ Check constraints on the "cttb00039.ano" column
-#+
-#+ @param p_ano - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00039_ano_checkColumnConstraints(p_ano)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ano LIKE cttb00039.ano
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00039_ano_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00039.mes" column
-#+
-#+ @param p_mes - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00039_mes_checkColumnConstraints(p_mes)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mes LIKE cttb00039.mes
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00039_mes_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00039.valor" column
-#+
-#+ @param p_valor - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00039_valor_checkColumnConstraints(p_valor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valor LIKE cttb00039.valor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00039_valor_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00039.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00039_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cttb00039.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00039_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00039.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00039_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cttb00039.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00039_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00038" table
-#+
-#+ @param p_data - a row data LIKE cttb00038.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00038_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cttb00038.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cttb00038_ventas_checkColumnConstraints(p_data.ventas) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00038_nomenclatura_checkColumnConstraints(p_data.nomenclatura) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00038_ano_checkColumnConstraints(p_data.ano) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00038_mes_checkColumnConstraints(p_data.mes) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00038_costo_st_checkColumnConstraints(p_data.costo_st) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00038_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00038_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00038_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00038_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00038_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00038_checkTableConstraints
-
-{}
-#+ Check constraints on the "cttb00038.ventas" column
-#+
-#+ @param p_ventas - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00038_ventas_checkColumnConstraints(p_ventas)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ventas LIKE cttb00038.ventas
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_ventas IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- ventas: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00038_ventas_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00038.nomenclatura" column
-#+
-#+ @param p_nomenclatura - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00038_nomenclatura_checkColumnConstraints(p_nomenclatura)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nomenclatura LIKE cttb00038.nomenclatura
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_nomenclatura IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- nomenclatura: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00038_nomenclatura_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00038.ano" column
-#+
-#+ @param p_ano - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00038_ano_checkColumnConstraints(p_ano)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ano LIKE cttb00038.ano
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_ano IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- ano: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00038_ano_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00038.mes" column
-#+
-#+ @param p_mes - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00038_mes_checkColumnConstraints(p_mes)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mes LIKE cttb00038.mes
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_mes IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- mes: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00038_mes_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00038.costo_st" column
-#+
-#+ @param p_costo_st - DECIMAL(12,7) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00038_costo_st_checkColumnConstraints(p_costo_st)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_costo_st LIKE cttb00038.costo_st
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_costo_st IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- costo_st: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00038_costo_st_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00038.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00038_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cttb00038.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00038_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00038.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00038_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cttb00038.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00038_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00038.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00038_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cttb00038.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00038_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00038.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00038_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cttb00038.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00038_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00038.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00038_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cttb00038.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00038_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00036" table
-#+
-#+ @param p_data - a row data LIKE cttb00036.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00036_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cttb00036.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cttb00036_ventas_checkColumnConstraints(p_data.ventas) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00036_fecha_lq_checkColumnConstraints(p_data.fecha_lq) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00036_num_oc_checkColumnConstraints(p_data.num_oc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00036_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00036_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00036_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00036_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00036_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00036_costo_lq_checkColumnConstraints(p_data.costo_lq) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00036_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00036_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00036_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00036_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00036_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00036_checkTableConstraints
-
-{}
-#+ Check constraints on the "cttb00036.ventas" column
-#+
-#+ @param p_ventas - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00036_ventas_checkColumnConstraints(p_ventas)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ventas LIKE cttb00036.ventas
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00036_ventas_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00036.fecha_lq" column
-#+
-#+ @param p_fecha_lq - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00036_fecha_lq_checkColumnConstraints(p_fecha_lq)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_lq LIKE cttb00036.fecha_lq
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00036_fecha_lq_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00036.num_oc" column
-#+
-#+ @param p_num_oc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00036_num_oc_checkColumnConstraints(p_num_oc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_oc LIKE cttb00036.num_oc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00036_num_oc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00036.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00036_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE cttb00036.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00036_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00036.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00036_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE cttb00036.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00036_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00036.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00036_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE cttb00036.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00036_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00036.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00036_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE cttb00036.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00036_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00036.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00036_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE cttb00036.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00036_cantidad_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00036.costo_lq" column
-#+
-#+ @param p_costo_lq - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00036_costo_lq_checkColumnConstraints(p_costo_lq)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_costo_lq LIKE cttb00036.costo_lq
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00036_costo_lq_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00036.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00036_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cttb00036.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00036_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00036.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00036_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cttb00036.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00036_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00036.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00036_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cttb00036.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00036_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00036.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00036_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cttb00036.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00036_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00036.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00036_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cttb00036.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00036_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00034" table
-#+
-#+ @param p_data - a row data LIKE cttb00034.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00034_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cttb00034.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cttb00034_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00034_cod_prod_checkColumnConstraints(p_data.cod_prod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00034_costo_lab_checkColumnConstraints(p_data.costo_lab) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00034_costo_ga_checkColumnConstraints(p_data.costo_ga) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00034_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00034_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00034_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00034_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00034_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00034_checkTableConstraints
-
-{}
-#+ Check constraints on the "cttb00034.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00034_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE cttb00034.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00034_fecha_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00034.cod_prod" column
-#+
-#+ @param p_cod_prod - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00034_cod_prod_checkColumnConstraints(p_cod_prod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_prod LIKE cttb00034.cod_prod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00034_cod_prod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00034.costo_lab" column
-#+
-#+ @param p_costo_lab - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00034_costo_lab_checkColumnConstraints(p_costo_lab)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_costo_lab LIKE cttb00034.costo_lab
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00034_costo_lab_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00034.costo_ga" column
-#+
-#+ @param p_costo_ga - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00034_costo_ga_checkColumnConstraints(p_costo_ga)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_costo_ga LIKE cttb00034.costo_ga
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00034_costo_ga_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00034.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00034_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cttb00034.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00034_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00034.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00034_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cttb00034.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00034_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00034.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00034_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cttb00034.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00034_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00034.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00034_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cttb00034.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00034_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00034.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00034_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cttb00034.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00034_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00033" table
-#+
-#+ @param p_data - a row data LIKE cttb00033.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00033_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cttb00033.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cttb00033_cuenta_m_checkColumnConstraints(p_data.cuenta_m) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00033_cuenta_l_checkColumnConstraints(p_data.cuenta_l) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00033_cuenta_g_checkColumnConstraints(p_data.cuenta_g) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00033_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00033_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00033_checkTableConstraints
-
-{}
-#+ Check constraints on the "cttb00033.cuenta_m" column
-#+
-#+ @param p_cuenta_m - CHAR(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00033_cuenta_m_checkColumnConstraints(p_cuenta_m)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cuenta_m LIKE cttb00033.cuenta_m
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00033_cuenta_m_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00033.cuenta_l" column
-#+
-#+ @param p_cuenta_l - CHAR(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00033_cuenta_l_checkColumnConstraints(p_cuenta_l)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cuenta_l LIKE cttb00033.cuenta_l
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00033_cuenta_l_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00033.cuenta_g" column
-#+
-#+ @param p_cuenta_g - CHAR(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00033_cuenta_g_checkColumnConstraints(p_cuenta_g)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cuenta_g LIKE cttb00033.cuenta_g
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00033_cuenta_g_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00033.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00033_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cttb00033.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00033_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00033.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00033_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cttb00033.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00033_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00032" table
-#+
-#+ @param p_data - a row data LIKE cttb00032.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00032_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cttb00032.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cttb00032_ano_checkColumnConstraints(p_data.ano) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00032_mes_checkColumnConstraints(p_data.mes) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00032_tipo_lq_checkColumnConstraints(p_data.tipo_lq) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00032_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00032_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00032_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00032_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00032_cod_sp_checkColumnConstraints(p_data.cod_sp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00032_cod_sp_sec_checkColumnConstraints(p_data.cod_sp_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00032_reporte_ent_checkColumnConstraints(p_data.reporte_ent) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00032_num_oc_checkColumnConstraints(p_data.num_oc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00032_tipo_checkColumnConstraints(p_data.tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00032_fob_checkColumnConstraints(p_data.fob) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00032_flete_checkColumnConstraints(p_data.flete) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00032_cost_flete_checkColumnConstraints(p_data.cost_flete) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00032_seguro_checkColumnConstraints(p_data.seguro) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00032_impuesto_c_checkColumnConstraints(p_data.impuesto_c) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00032_gasto_ad_checkColumnConstraints(p_data.gasto_ad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00032_prima_d_checkColumnConstraints(p_data.prima_d) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00032_cost_planta_checkColumnConstraints(p_data.cost_planta) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00032_unid_rec_checkColumnConstraints(p_data.unid_rec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00032_cost_uni_checkColumnConstraints(p_data.cost_uni) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00032_precio_std_checkColumnConstraints(p_data.precio_std) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00032_cost_std_checkColumnConstraints(p_data.cost_std) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00032_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00032_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00032_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00032_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00032_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00032_checkTableConstraints
-
-{}
-#+ Check constraints on the "cttb00032.ano" column
-#+
-#+ @param p_ano - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00032_ano_checkColumnConstraints(p_ano)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ano LIKE cttb00032.ano
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00032_ano_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00032.mes" column
-#+
-#+ @param p_mes - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00032_mes_checkColumnConstraints(p_mes)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mes LIKE cttb00032.mes
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_mes IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- mes: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00032_mes_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00032.tipo_lq" column
-#+
-#+ @param p_tipo_lq - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00032_tipo_lq_checkColumnConstraints(p_tipo_lq)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_lq LIKE cttb00032.tipo_lq
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00032_tipo_lq_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00032.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00032_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE cttb00032.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00032_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00032.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00032_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE cttb00032.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00032_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00032.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00032_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE cttb00032.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00032_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00032.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00032_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE cttb00032.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00032_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00032.cod_sp" column
-#+
-#+ @param p_cod_sp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00032_cod_sp_checkColumnConstraints(p_cod_sp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sp LIKE cttb00032.cod_sp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00032_cod_sp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00032.cod_sp_sec" column
-#+
-#+ @param p_cod_sp_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00032_cod_sp_sec_checkColumnConstraints(p_cod_sp_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sp_sec LIKE cttb00032.cod_sp_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00032_cod_sp_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00032.reporte_ent" column
-#+
-#+ @param p_reporte_ent - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00032_reporte_ent_checkColumnConstraints(p_reporte_ent)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_reporte_ent LIKE cttb00032.reporte_ent
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00032_reporte_ent_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00032.num_oc" column
-#+
-#+ @param p_num_oc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00032_num_oc_checkColumnConstraints(p_num_oc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_oc LIKE cttb00032.num_oc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00032_num_oc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00032.tipo" column
-#+
-#+ @param p_tipo - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00032_tipo_checkColumnConstraints(p_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo LIKE cttb00032.tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00032_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00032.fob" column
-#+
-#+ @param p_fob - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00032_fob_checkColumnConstraints(p_fob)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fob LIKE cttb00032.fob
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00032_fob_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00032.flete" column
-#+
-#+ @param p_flete - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00032_flete_checkColumnConstraints(p_flete)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_flete LIKE cttb00032.flete
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00032_flete_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00032.cost_flete" column
-#+
-#+ @param p_cost_flete - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00032_cost_flete_checkColumnConstraints(p_cost_flete)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cost_flete LIKE cttb00032.cost_flete
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00032_cost_flete_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00032.seguro" column
-#+
-#+ @param p_seguro - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00032_seguro_checkColumnConstraints(p_seguro)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_seguro LIKE cttb00032.seguro
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00032_seguro_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00032.impuesto_c" column
-#+
-#+ @param p_impuesto_c - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00032_impuesto_c_checkColumnConstraints(p_impuesto_c)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_impuesto_c LIKE cttb00032.impuesto_c
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00032_impuesto_c_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00032.gasto_ad" column
-#+
-#+ @param p_gasto_ad - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00032_gasto_ad_checkColumnConstraints(p_gasto_ad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_gasto_ad LIKE cttb00032.gasto_ad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00032_gasto_ad_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00032.prima_d" column
-#+
-#+ @param p_prima_d - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00032_prima_d_checkColumnConstraints(p_prima_d)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_prima_d LIKE cttb00032.prima_d
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00032_prima_d_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00032.cost_planta" column
-#+
-#+ @param p_cost_planta - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00032_cost_planta_checkColumnConstraints(p_cost_planta)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cost_planta LIKE cttb00032.cost_planta
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00032_cost_planta_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00032.unid_rec" column
-#+
-#+ @param p_unid_rec - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00032_unid_rec_checkColumnConstraints(p_unid_rec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_unid_rec LIKE cttb00032.unid_rec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00032_unid_rec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00032.cost_uni" column
-#+
-#+ @param p_cost_uni - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00032_cost_uni_checkColumnConstraints(p_cost_uni)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cost_uni LIKE cttb00032.cost_uni
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00032_cost_uni_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00032.precio_std" column
-#+
-#+ @param p_precio_std - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00032_precio_std_checkColumnConstraints(p_precio_std)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_precio_std LIKE cttb00032.precio_std
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00032_precio_std_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00032.cost_std" column
-#+
-#+ @param p_cost_std - DECIMAL(12,3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00032_cost_std_checkColumnConstraints(p_cost_std)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cost_std LIKE cttb00032.cost_std
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00032_cost_std_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00032.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00032_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cttb00032.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00032_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00032.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00032_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cttb00032.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00032_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00032.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00032_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cttb00032.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00032_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00032.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00032_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cttb00032.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00032_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00032.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00032_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cttb00032.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00032_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00029" table
-#+
-#+ @param p_data - a row data LIKE cttb00029.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00029_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cttb00029.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cttb00029_cod_prod_checkColumnConstraints(p_data.cod_prod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00029_ano_checkColumnConstraints(p_data.ano) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00029_departamento_checkColumnConstraints(p_data.departamento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00029_gasto_ind_checkColumnConstraints(p_data.gasto_ind) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00029_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00029_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00029_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00029_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00029_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00029_checkTableConstraints
-
-{}
-#+ Check constraints on the "cttb00029.cod_prod" column
-#+
-#+ @param p_cod_prod - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00029_cod_prod_checkColumnConstraints(p_cod_prod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_prod LIKE cttb00029.cod_prod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00029_cod_prod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00029.ano" column
-#+
-#+ @param p_ano - CHAR(4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00029_ano_checkColumnConstraints(p_ano)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ano LIKE cttb00029.ano
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00029_ano_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00029.departamento" column
-#+
-#+ @param p_departamento - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00029_departamento_checkColumnConstraints(p_departamento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_departamento LIKE cttb00029.departamento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00029_departamento_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00029.gasto_ind" column
-#+
-#+ @param p_gasto_ind - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00029_gasto_ind_checkColumnConstraints(p_gasto_ind)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_gasto_ind LIKE cttb00029.gasto_ind
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00029_gasto_ind_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00029.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00029_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cttb00029.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00029_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00029.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00029_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cttb00029.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00029_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00029.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00029_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cttb00029.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00029_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00029.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00029_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cttb00029.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00029_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00029.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00029_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cttb00029.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00029_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00028" table
-#+
-#+ @param p_data - a row data LIKE cttb00028.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00028_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cttb00028.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cttb00028_ano_checkColumnConstraints(p_data.ano) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00028_departamento_checkColumnConstraints(p_data.departamento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00028_cod_prod_checkColumnConstraints(p_data.cod_prod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00028_fact_hombre_checkColumnConstraints(p_data.fact_hombre) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00028_valor_labor_checkColumnConstraints(p_data.valor_labor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00028_hora_hombre_checkColumnConstraints(p_data.hora_hombre) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00028_valor_real_checkColumnConstraints(p_data.valor_real) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00028_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00028_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00028_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00028_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00028_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00028_checkTableConstraints
-
-{}
-#+ Check constraints on the "cttb00028.ano" column
-#+
-#+ @param p_ano - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00028_ano_checkColumnConstraints(p_ano)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ano LIKE cttb00028.ano
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00028_ano_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00028.departamento" column
-#+
-#+ @param p_departamento - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00028_departamento_checkColumnConstraints(p_departamento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_departamento LIKE cttb00028.departamento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00028_departamento_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00028.cod_prod" column
-#+
-#+ @param p_cod_prod - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00028_cod_prod_checkColumnConstraints(p_cod_prod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_prod LIKE cttb00028.cod_prod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00028_cod_prod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00028.fact_hombre" column
-#+
-#+ @param p_fact_hombre - DECIMAL(13,8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00028_fact_hombre_checkColumnConstraints(p_fact_hombre)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fact_hombre LIKE cttb00028.fact_hombre
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00028_fact_hombre_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00028.valor_labor" column
-#+
-#+ @param p_valor_labor - DECIMAL(13,8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00028_valor_labor_checkColumnConstraints(p_valor_labor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valor_labor LIKE cttb00028.valor_labor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00028_valor_labor_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00028.hora_hombre" column
-#+
-#+ @param p_hora_hombre - DECIMAL(13,8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00028_hora_hombre_checkColumnConstraints(p_hora_hombre)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_hora_hombre LIKE cttb00028.hora_hombre
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00028_hora_hombre_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00028.valor_real" column
-#+
-#+ @param p_valor_real - DECIMAL(13,8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00028_valor_real_checkColumnConstraints(p_valor_real)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valor_real LIKE cttb00028.valor_real
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00028_valor_real_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00028.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00028_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cttb00028.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00028_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00028.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00028_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cttb00028.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00028_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00028.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00028_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cttb00028.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00028_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00028.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00028_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cttb00028.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00028_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00028.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00028_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cttb00028.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00028_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00027" table
-#+
-#+ @param p_data - a row data LIKE cttb00027.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00027_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cttb00027.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cttb00027_ventas_checkColumnConstraints(p_data.ventas) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00027_mes_checkColumnConstraints(p_data.mes) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00027_pila_checkColumnConstraints(p_data.pila) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00027_primo_checkColumnConstraints(p_data.primo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00027_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00027_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00027_checkTableConstraints
-
-{}
-#+ Check constraints on the "cttb00027.ventas" column
-#+
-#+ @param p_ventas - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00027_ventas_checkColumnConstraints(p_ventas)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ventas LIKE cttb00027.ventas
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00027_ventas_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00027.mes" column
-#+
-#+ @param p_mes - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00027_mes_checkColumnConstraints(p_mes)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mes LIKE cttb00027.mes
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00027_mes_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00027.pila" column
-#+
-#+ @param p_pila - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00027_pila_checkColumnConstraints(p_pila)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_pila LIKE cttb00027.pila
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00027_pila_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00027.primo" column
-#+
-#+ @param p_primo - DECIMAL(12,3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00027_primo_checkColumnConstraints(p_primo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_primo LIKE cttb00027.primo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00027_primo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00027.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00027_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cttb00027.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00027_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00027.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00027_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cttb00027.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00027_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00026" table
-#+
-#+ @param p_data - a row data LIKE cttb00026.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00026_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cttb00026.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cttb00026_mes_ini_checkColumnConstraints(p_data.mes_ini) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00026_mes_fin_checkColumnConstraints(p_data.mes_fin) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00026_ano_checkColumnConstraints(p_data.ano) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00026_cod_prod_checkColumnConstraints(p_data.cod_prod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00026_costo_st_checkColumnConstraints(p_data.costo_st) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00026_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00026_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00026_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00026_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00026_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00026_checkTableConstraints
-
-{}
-#+ Check constraints on the "cttb00026.mes_ini" column
-#+
-#+ @param p_mes_ini - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00026_mes_ini_checkColumnConstraints(p_mes_ini)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mes_ini LIKE cttb00026.mes_ini
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00026_mes_ini_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00026.mes_fin" column
-#+
-#+ @param p_mes_fin - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00026_mes_fin_checkColumnConstraints(p_mes_fin)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mes_fin LIKE cttb00026.mes_fin
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00026_mes_fin_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00026.ano" column
-#+
-#+ @param p_ano - CHAR(4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00026_ano_checkColumnConstraints(p_ano)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ano LIKE cttb00026.ano
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00026_ano_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00026.cod_prod" column
-#+
-#+ @param p_cod_prod - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00026_cod_prod_checkColumnConstraints(p_cod_prod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_prod LIKE cttb00026.cod_prod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00026_cod_prod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00026.costo_st" column
-#+
-#+ @param p_costo_st - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00026_costo_st_checkColumnConstraints(p_costo_st)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_costo_st LIKE cttb00026.costo_st
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00026_costo_st_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00026.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00026_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cttb00026.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00026_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00026.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00026_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cttb00026.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00026_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00026.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00026_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cttb00026.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00026_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00026.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00026_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cttb00026.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00026_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00026.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00026_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cttb00026.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00026_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00023" table
-#+
-#+ @param p_data - a row data LIKE cttb00023.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00023_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cttb00023.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cttb00023_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00023_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00023_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00023_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00023_costo_imp_checkColumnConstraints(p_data.costo_imp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00023_costo_s_imp_checkColumnConstraints(p_data.costo_s_imp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00023_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00023_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00023_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00023_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00023_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00023_checkTableConstraints
-
-{}
-#+ Check constraints on the "cttb00023.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00023_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE cttb00023.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00023_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00023.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00023_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE cttb00023.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00023_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00023.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00023_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE cttb00023.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00023_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00023.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00023_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE cttb00023.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00023_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00023.costo_imp" column
-#+
-#+ @param p_costo_imp - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00023_costo_imp_checkColumnConstraints(p_costo_imp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_costo_imp LIKE cttb00023.costo_imp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00023_costo_imp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00023.costo_s_imp" column
-#+
-#+ @param p_costo_s_imp - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00023_costo_s_imp_checkColumnConstraints(p_costo_s_imp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_costo_s_imp LIKE cttb00023.costo_s_imp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00023_costo_s_imp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00023.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00023_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cttb00023.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00023_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00023.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00023_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cttb00023.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00023_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00023.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00023_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cttb00023.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00023_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00023.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00023_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cttb00023.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00023_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00023.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00023_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cttb00023.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00023_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00022" table
-#+
-#+ @param p_data - a row data LIKE cttb00022.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00022_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cttb00022.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cttb00022_cod_prod_checkColumnConstraints(p_data.cod_prod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00022_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00022_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00022_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00022_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00022_cant_prop_checkColumnConstraints(p_data.cant_prop) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00022_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00022_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00022_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00022_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00022_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00022_checkTableConstraints
-
-{}
-#+ Check constraints on the "cttb00022.cod_prod" column
-#+
-#+ @param p_cod_prod - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00022_cod_prod_checkColumnConstraints(p_cod_prod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_prod LIKE cttb00022.cod_prod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00022_cod_prod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00022.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00022_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE cttb00022.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00022_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00022.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00022_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE cttb00022.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00022_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00022.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00022_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE cttb00022.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00022_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00022.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00022_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE cttb00022.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00022_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00022.cant_prop" column
-#+
-#+ @param p_cant_prop - DECIMAL(10,8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00022_cant_prop_checkColumnConstraints(p_cant_prop)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cant_prop LIKE cttb00022.cant_prop
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00022_cant_prop_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00022.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00022_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cttb00022.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00022_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00022.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00022_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cttb00022.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00022_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00022.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00022_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cttb00022.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00022_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00022.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00022_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cttb00022.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00022_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00022.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00022_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cttb00022.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00022_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00021" table
-#+
-#+ @param p_data - a row data LIKE cttb00021.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00021_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cttb00021.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cttb00021_ventas_checkColumnConstraints(p_data.ventas) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00021_mes_checkColumnConstraints(p_data.mes) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00021_pila_checkColumnConstraints(p_data.pila) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00021_material_checkColumnConstraints(p_data.material) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00021_labor_checkColumnConstraints(p_data.labor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00021_gasto_checkColumnConstraints(p_data.gasto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00021_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00021_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00021_checkTableConstraints
-
-{}
-#+ Check constraints on the "cttb00021.ventas" column
-#+
-#+ @param p_ventas - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00021_ventas_checkColumnConstraints(p_ventas)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ventas LIKE cttb00021.ventas
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00021_ventas_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00021.mes" column
-#+
-#+ @param p_mes - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00021_mes_checkColumnConstraints(p_mes)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mes LIKE cttb00021.mes
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00021_mes_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00021.pila" column
-#+
-#+ @param p_pila - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00021_pila_checkColumnConstraints(p_pila)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_pila LIKE cttb00021.pila
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00021_pila_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00021.material" column
-#+
-#+ @param p_material - DECIMAL(12,3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00021_material_checkColumnConstraints(p_material)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_material LIKE cttb00021.material
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00021_material_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00021.labor" column
-#+
-#+ @param p_labor - DECIMAL(12,3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00021_labor_checkColumnConstraints(p_labor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_labor LIKE cttb00021.labor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00021_labor_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00021.gasto" column
-#+
-#+ @param p_gasto - DECIMAL(12,3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00021_gasto_checkColumnConstraints(p_gasto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_gasto LIKE cttb00021.gasto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00021_gasto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00021.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00021_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cttb00021.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00021_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00021.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00021_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cttb00021.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00021_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00018" table
-#+
-#+ @param p_data - a row data LIKE cttb00018.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00018_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cttb00018.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cttb00018_turno_checkColumnConstraints(p_data.turno) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00018_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00018_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00018_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00018_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00018_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00018_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00018_checkTableConstraints
-
-{}
-#+ Check constraints on the "cttb00018.turno" column
-#+
-#+ @param p_turno - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00018_turno_checkColumnConstraints(p_turno)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_turno LIKE cttb00018.turno
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00018_turno_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00018.descripcion" column
-#+
-#+ @param p_descripcion - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00018_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE cttb00018.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00018_descripcion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00018.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00018_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cttb00018.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00018_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00018.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00018_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cttb00018.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00018_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00018.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00018_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cttb00018.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00018_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00018.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00018_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cttb00018.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00018_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00018.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00018_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cttb00018.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00018_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00017" table
-#+
-#+ @param p_data - a row data LIKE cttb00017.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00017_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cttb00017.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cttb00017_num_doc_checkColumnConstraints(p_data.num_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00017_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00017_departamento_checkColumnConstraints(p_data.departamento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00017_emp_no_checkColumnConstraints(p_data.emp_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00017_cod_mq_checkColumnConstraints(p_data.cod_mq) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00017_detalle_checkColumnConstraints(p_data.detalle) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00017_h_directa_checkColumnConstraints(p_data.h_directa) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00017_h_indirecta_checkColumnConstraints(p_data.h_indirecta) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00017_e_directa_checkColumnConstraints(p_data.e_directa) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00017_e_indirecta_checkColumnConstraints(p_data.e_indirecta) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00017_cod_prod_checkColumnConstraints(p_data.cod_prod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00017_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00017_codigo_bloque_checkColumnConstraints(p_data.codigo_bloque) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00017_costo_lab_checkColumnConstraints(p_data.costo_lab) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00017_costo_gasto_checkColumnConstraints(p_data.costo_gasto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00017_turno_checkColumnConstraints(p_data.turno) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00017_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00017_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00017_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00017_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00017_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00017_checkTableConstraints
-
-{}
-#+ Check constraints on the "cttb00017.num_doc" column
-#+
-#+ @param p_num_doc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00017_num_doc_checkColumnConstraints(p_num_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_doc LIKE cttb00017.num_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00017_num_doc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00017.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00017_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE cttb00017.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00017_fecha_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00017.departamento" column
-#+
-#+ @param p_departamento - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00017_departamento_checkColumnConstraints(p_departamento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_departamento LIKE cttb00017.departamento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00017_departamento_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00017.emp_no" column
-#+
-#+ @param p_emp_no - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00017_emp_no_checkColumnConstraints(p_emp_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_emp_no LIKE cttb00017.emp_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00017_emp_no_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00017.cod_mq" column
-#+
-#+ @param p_cod_mq - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00017_cod_mq_checkColumnConstraints(p_cod_mq)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mq LIKE cttb00017.cod_mq
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00017_cod_mq_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00017.detalle" column
-#+
-#+ @param p_detalle - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00017_detalle_checkColumnConstraints(p_detalle)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_detalle LIKE cttb00017.detalle
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00017_detalle_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00017.h_directa" column
-#+
-#+ @param p_h_directa - DECIMAL(8,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00017_h_directa_checkColumnConstraints(p_h_directa)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_h_directa LIKE cttb00017.h_directa
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00017_h_directa_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00017.h_indirecta" column
-#+
-#+ @param p_h_indirecta - DECIMAL(8,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00017_h_indirecta_checkColumnConstraints(p_h_indirecta)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_h_indirecta LIKE cttb00017.h_indirecta
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00017_h_indirecta_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00017.e_directa" column
-#+
-#+ @param p_e_directa - DECIMAL(8,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00017_e_directa_checkColumnConstraints(p_e_directa)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_e_directa LIKE cttb00017.e_directa
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00017_e_directa_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00017.e_indirecta" column
-#+
-#+ @param p_e_indirecta - DECIMAL(8,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00017_e_indirecta_checkColumnConstraints(p_e_indirecta)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_e_indirecta LIKE cttb00017.e_indirecta
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00017_e_indirecta_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00017.cod_prod" column
-#+
-#+ @param p_cod_prod - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00017_cod_prod_checkColumnConstraints(p_cod_prod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_prod LIKE cttb00017.cod_prod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00017_cod_prod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00017.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00017_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE cttb00017.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00017_cantidad_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00017.codigo_bloque" column
-#+
-#+ @param p_codigo_bloque - CHAR(25) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00017_codigo_bloque_checkColumnConstraints(p_codigo_bloque)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codigo_bloque LIKE cttb00017.codigo_bloque
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00017_codigo_bloque_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00017.costo_lab" column
-#+
-#+ @param p_costo_lab - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00017_costo_lab_checkColumnConstraints(p_costo_lab)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_costo_lab LIKE cttb00017.costo_lab
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00017_costo_lab_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00017.costo_gasto" column
-#+
-#+ @param p_costo_gasto - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00017_costo_gasto_checkColumnConstraints(p_costo_gasto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_costo_gasto LIKE cttb00017.costo_gasto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00017_costo_gasto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00017.turno" column
-#+
-#+ @param p_turno - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00017_turno_checkColumnConstraints(p_turno)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_turno LIKE cttb00017.turno
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00017_turno_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00017.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00017_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cttb00017.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00017_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00017.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00017_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cttb00017.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00017_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00017.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00017_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cttb00017.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00017_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00017.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00017_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cttb00017.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00017_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00017.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00017_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cttb00017.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00017_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00016" table
-#+
-#+ @param p_data - a row data LIKE cttb00016.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00016_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cttb00016.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cttb00016_referencia_checkColumnConstraints(p_data.referencia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00016_numero_checkColumnConstraints(p_data.numero) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00016_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00016_checkTableConstraints
-
-{}
-#+ Check constraints on the "cttb00016.referencia" column
-#+
-#+ @param p_referencia - CHAR(25) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00016_referencia_checkColumnConstraints(p_referencia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_referencia LIKE cttb00016.referencia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00016_referencia_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00016.numero" column
-#+
-#+ @param p_numero - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00016_numero_checkColumnConstraints(p_numero)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_numero LIKE cttb00016.numero
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00016_numero_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00016.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00016_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE cttb00016.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00016_fecha_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00015" table
-#+
-#+ @param p_data - a row data LIKE cttb00015.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00015_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cttb00015.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cttb00015_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00015_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00015_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00015_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00015_mes_checkColumnConstraints(p_data.mes) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00015_ano_checkColumnConstraints(p_data.ano) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00015_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00015_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00015_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00015_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00015_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00015_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00015_checkTableConstraints
-
-{}
-#+ Check constraints on the "cttb00015.cod_n" column
-#+
-#+ @param p_cod_n - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00015_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE cttb00015.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00015_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00015.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00015_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE cttb00015.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00015_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00015.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00015_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE cttb00015.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00015_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00015.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00015_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE cttb00015.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00015_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00015.mes" column
-#+
-#+ @param p_mes - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00015_mes_checkColumnConstraints(p_mes)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mes LIKE cttb00015.mes
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00015_mes_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00015.ano" column
-#+
-#+ @param p_ano - CHAR(4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00015_ano_checkColumnConstraints(p_ano)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ano LIKE cttb00015.ano
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00015_ano_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00015.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(15,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00015_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE cttb00015.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00015_cantidad_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00015.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00015_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cttb00015.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00015_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00015.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00015_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cttb00015.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00015_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00015.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00015_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cttb00015.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00015_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00015.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00015_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cttb00015.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00015_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00015.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00015_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cttb00015.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00015_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00014" table
-#+
-#+ @param p_data - a row data LIKE cttb00014.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00014_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cttb00014.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cttb00014_cod_prod_checkColumnConstraints(p_data.cod_prod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00014_ano_checkColumnConstraints(p_data.ano) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00014_mes_checkColumnConstraints(p_data.mes) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00014_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00014_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00014_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00014_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00014_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00014_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00014_checkTableConstraints
-
-{}
-#+ Check constraints on the "cttb00014.cod_prod" column
-#+
-#+ @param p_cod_prod - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00014_cod_prod_checkColumnConstraints(p_cod_prod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_prod LIKE cttb00014.cod_prod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00014_cod_prod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00014.ano" column
-#+
-#+ @param p_ano - CHAR(4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00014_ano_checkColumnConstraints(p_ano)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ano LIKE cttb00014.ano
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00014_ano_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00014.mes" column
-#+
-#+ @param p_mes - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00014_mes_checkColumnConstraints(p_mes)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mes LIKE cttb00014.mes
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00014_mes_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00014.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(15,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00014_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE cttb00014.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00014_cantidad_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00014.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00014_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cttb00014.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00014_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00014.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00014_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cttb00014.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00014_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00014.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00014_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cttb00014.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00014_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00014.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00014_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cttb00014.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00014_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00014.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00014_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cttb00014.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00014_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00013" table
-#+
-#+ @param p_data - a row data LIKE cttb00013.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00013_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cttb00013.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cttb00013_fecha_lq_checkColumnConstraints(p_data.fecha_lq) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00013_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00013_tipo_lq_checkColumnConstraints(p_data.tipo_lq) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00013_num_oc_checkColumnConstraints(p_data.num_oc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00013_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00013_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00013_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00013_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00013_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00013_costo_lq_checkColumnConstraints(p_data.costo_lq) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00013_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00013_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00013_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00013_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00013_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00013_tipo_orden_checkColumnConstraints(p_data.tipo_orden) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00013_checkTableConstraints
-
-{}
-#+ Check constraints on the "cttb00013.fecha_lq" column
-#+
-#+ @param p_fecha_lq - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00013_fecha_lq_checkColumnConstraints(p_fecha_lq)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_lq LIKE cttb00013.fecha_lq
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00013_fecha_lq_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00013.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00013_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE cttb00013.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00013_fecha_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00013.tipo_lq" column
-#+
-#+ @param p_tipo_lq - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00013_tipo_lq_checkColumnConstraints(p_tipo_lq)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_lq LIKE cttb00013.tipo_lq
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00013_tipo_lq_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00013.num_oc" column
-#+
-#+ @param p_num_oc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00013_num_oc_checkColumnConstraints(p_num_oc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_oc LIKE cttb00013.num_oc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00013_num_oc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00013.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00013_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE cttb00013.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00013_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00013.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00013_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE cttb00013.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00013_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00013.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00013_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE cttb00013.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00013_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00013.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00013_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE cttb00013.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00013_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00013.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00013_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE cttb00013.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00013_cantidad_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00013.costo_lq" column
-#+
-#+ @param p_costo_lq - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00013_costo_lq_checkColumnConstraints(p_costo_lq)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_costo_lq LIKE cttb00013.costo_lq
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00013_costo_lq_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00013.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00013_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cttb00013.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00013_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00013.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00013_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cttb00013.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00013_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00013.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00013_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cttb00013.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00013_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00013.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00013_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cttb00013.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00013_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00013.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00013_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cttb00013.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00013_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00013.tipo_orden" column
-#+
-#+ @param p_tipo_orden - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00013_tipo_orden_checkColumnConstraints(p_tipo_orden)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_orden LIKE cttb00013.tipo_orden
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00013_tipo_orden_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00012" table
-#+
-#+ @param p_data - a row data LIKE cttb00012.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00012_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cttb00012.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cttb00012_documento_checkColumnConstraints(p_data.documento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00012_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00012_codigo_bloque_checkColumnConstraints(p_data.codigo_bloque) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00012_cod_prod_checkColumnConstraints(p_data.cod_prod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00012_ancho1_checkColumnConstraints(p_data.ancho1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00012_largo1_checkColumnConstraints(p_data.largo1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00012_espesor1_checkColumnConstraints(p_data.espesor1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00012_medida1_checkColumnConstraints(p_data.medida1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00012_ancho2_checkColumnConstraints(p_data.ancho2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00012_largo2_checkColumnConstraints(p_data.largo2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00012_espesor2_checkColumnConstraints(p_data.espesor2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00012_medida2_checkColumnConstraints(p_data.medida2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00012_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00012_checkTableConstraints
-
-{}
-#+ Check constraints on the "cttb00012.documento" column
-#+
-#+ @param p_documento - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00012_documento_checkColumnConstraints(p_documento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_documento LIKE cttb00012.documento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00012_documento_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00012.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00012_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE cttb00012.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00012_fecha_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00012.codigo_bloque" column
-#+
-#+ @param p_codigo_bloque - CHAR(15) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00012_codigo_bloque_checkColumnConstraints(p_codigo_bloque)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codigo_bloque LIKE cttb00012.codigo_bloque
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00012_codigo_bloque_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00012.cod_prod" column
-#+
-#+ @param p_cod_prod - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00012_cod_prod_checkColumnConstraints(p_cod_prod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_prod LIKE cttb00012.cod_prod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00012_cod_prod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00012.ancho1" column
-#+
-#+ @param p_ancho1 - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00012_ancho1_checkColumnConstraints(p_ancho1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ancho1 LIKE cttb00012.ancho1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00012_ancho1_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00012.largo1" column
-#+
-#+ @param p_largo1 - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00012_largo1_checkColumnConstraints(p_largo1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_largo1 LIKE cttb00012.largo1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00012_largo1_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00012.espesor1" column
-#+
-#+ @param p_espesor1 - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00012_espesor1_checkColumnConstraints(p_espesor1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_espesor1 LIKE cttb00012.espesor1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00012_espesor1_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00012.medida1" column
-#+
-#+ @param p_medida1 - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00012_medida1_checkColumnConstraints(p_medida1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_medida1 LIKE cttb00012.medida1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00012_medida1_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00012.ancho2" column
-#+
-#+ @param p_ancho2 - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00012_ancho2_checkColumnConstraints(p_ancho2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ancho2 LIKE cttb00012.ancho2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00012_ancho2_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00012.largo2" column
-#+
-#+ @param p_largo2 - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00012_largo2_checkColumnConstraints(p_largo2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_largo2 LIKE cttb00012.largo2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00012_largo2_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00012.espesor2" column
-#+
-#+ @param p_espesor2 - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00012_espesor2_checkColumnConstraints(p_espesor2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_espesor2 LIKE cttb00012.espesor2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00012_espesor2_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00012.medida2" column
-#+
-#+ @param p_medida2 - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00012_medida2_checkColumnConstraints(p_medida2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_medida2 LIKE cttb00012.medida2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00012_medida2_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00012.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00012_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE cttb00012.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00012_cantidad_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00011" table
-#+
-#+ @param p_data - a row data LIKE cttb00011.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00011_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cttb00011.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cttb00011_cod_prod_checkColumnConstraints(p_data.cod_prod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00011_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00011_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00011_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00011_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00011_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00011_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00011_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00011_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00011_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00011_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00011_checkTableConstraints
-
-{}
-#+ Check constraints on the "cttb00011.cod_prod" column
-#+
-#+ @param p_cod_prod - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00011_cod_prod_checkColumnConstraints(p_cod_prod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_prod LIKE cttb00011.cod_prod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00011_cod_prod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00011.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00011_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE cttb00011.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00011_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00011.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00011_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE cttb00011.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00011_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00011.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00011_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE cttb00011.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00011_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00011.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00011_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE cttb00011.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00011_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00011.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(10,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00011_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE cttb00011.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00011_cantidad_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00011.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00011_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cttb00011.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00011_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00011.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00011_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cttb00011.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00011_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00011.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00011_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cttb00011.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00011_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00011.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00011_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cttb00011.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00011_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00011.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00011_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cttb00011.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00011_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00010" table
-#+
-#+ @param p_data - a row data LIKE cttb00010.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00010_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cttb00010.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cttb00010_ult_num_checkColumnConstraints(p_data.ult_num) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00010_departamento_checkColumnConstraints(p_data.departamento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00010_observacion_checkColumnConstraints(p_data.observacion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00010_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00010_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00010_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00010_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00010_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00010_checkTableConstraints
-
-{}
-#+ Check constraints on the "cttb00010.ult_num" column
-#+
-#+ @param p_ult_num - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00010_ult_num_checkColumnConstraints(p_ult_num)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ult_num LIKE cttb00010.ult_num
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00010_ult_num_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00010.departamento" column
-#+
-#+ @param p_departamento - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00010_departamento_checkColumnConstraints(p_departamento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_departamento LIKE cttb00010.departamento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00010_departamento_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00010.observacion" column
-#+
-#+ @param p_observacion - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00010_observacion_checkColumnConstraints(p_observacion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_observacion LIKE cttb00010.observacion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00010_observacion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00010.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00010_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE cttb00010.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00010_fecha_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00010.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00010_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cttb00010.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00010_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00010.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00010_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cttb00010.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00010_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00010.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00010_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cttb00010.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00010_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00010.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00010_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cttb00010.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00010_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00009" table
-#+
-#+ @param p_data - a row data LIKE cttb00009.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00009_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cttb00009.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cttb00009_formula_checkColumnConstraints(p_data.formula) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00009_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00009_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00009_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00009_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00009_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00009_cod_prod_checkColumnConstraints(p_data.cod_prod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00009_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00009_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00009_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00009_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00009_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00009_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00009_checkTableConstraints
-
-{}
-#+ Check constraints on the "cttb00009.formula" column
-#+
-#+ @param p_formula - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00009_formula_checkColumnConstraints(p_formula)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_formula LIKE cttb00009.formula
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_formula IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- formula: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00009_formula_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00009.descripcion" column
-#+
-#+ @param p_descripcion - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00009_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE cttb00009.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00009_descripcion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00009.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00009_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE cttb00009.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00009_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00009.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00009_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE cttb00009.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00009_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00009.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00009_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE cttb00009.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00009_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00009.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00009_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE cttb00009.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00009_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00009.cod_prod" column
-#+
-#+ @param p_cod_prod - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00009_cod_prod_checkColumnConstraints(p_cod_prod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_prod LIKE cttb00009.cod_prod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00009_cod_prod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00009.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(12,3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00009_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE cttb00009.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00009_cantidad_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00009.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00009_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cttb00009.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00009_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00009.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00009_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cttb00009.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00009_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00009.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00009_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cttb00009.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00009_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00009.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00009_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cttb00009.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00009_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00009.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00009_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cttb00009.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00009_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00008" table
-#+
-#+ @param p_data - a row data LIKE cttb00008.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00008_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cttb00008.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cttb00008_ano_checkColumnConstraints(p_data.ano) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00008_departamento_checkColumnConstraints(p_data.departamento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00008_cod_prod_checkColumnConstraints(p_data.cod_prod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00008_fact_hombre_checkColumnConstraints(p_data.fact_hombre) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00008_valor_labor_checkColumnConstraints(p_data.valor_labor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00008_hora_hombre_checkColumnConstraints(p_data.hora_hombre) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00008_valor_real_checkColumnConstraints(p_data.valor_real) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00008_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00008_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00008_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00008_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00008_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00008_checkTableConstraints
-
-{}
-#+ Check constraints on the "cttb00008.ano" column
-#+
-#+ @param p_ano - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00008_ano_checkColumnConstraints(p_ano)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ano LIKE cttb00008.ano
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00008_ano_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00008.departamento" column
-#+
-#+ @param p_departamento - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00008_departamento_checkColumnConstraints(p_departamento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_departamento LIKE cttb00008.departamento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00008_departamento_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00008.cod_prod" column
-#+
-#+ @param p_cod_prod - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00008_cod_prod_checkColumnConstraints(p_cod_prod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_prod LIKE cttb00008.cod_prod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00008_cod_prod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00008.fact_hombre" column
-#+
-#+ @param p_fact_hombre - DECIMAL(13,8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00008_fact_hombre_checkColumnConstraints(p_fact_hombre)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fact_hombre LIKE cttb00008.fact_hombre
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00008_fact_hombre_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00008.valor_labor" column
-#+
-#+ @param p_valor_labor - DECIMAL(13,8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00008_valor_labor_checkColumnConstraints(p_valor_labor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valor_labor LIKE cttb00008.valor_labor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00008_valor_labor_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00008.hora_hombre" column
-#+
-#+ @param p_hora_hombre - DECIMAL(13,8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00008_hora_hombre_checkColumnConstraints(p_hora_hombre)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_hora_hombre LIKE cttb00008.hora_hombre
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00008_hora_hombre_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00008.valor_real" column
-#+
-#+ @param p_valor_real - DECIMAL(13,8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00008_valor_real_checkColumnConstraints(p_valor_real)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valor_real LIKE cttb00008.valor_real
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00008_valor_real_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00008.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00008_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cttb00008.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00008_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00008.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00008_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cttb00008.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00008_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00008.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00008_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cttb00008.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00008_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00008.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00008_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cttb00008.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00008_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00008.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00008_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cttb00008.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00008_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00007" table
-#+
-#+ @param p_data - a row data LIKE cttb00007.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00007_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cttb00007.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cttb00007_codigo_unidad_checkColumnConstraints(p_data.codigo_unidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00007_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00007_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00007_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00007_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00007_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00007_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00007_checkTableConstraints
-
-{}
-#+ Check constraints on the "cttb00007.codigo_unidad" column
-#+
-#+ @param p_codigo_unidad - CHAR(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00007_codigo_unidad_checkColumnConstraints(p_codigo_unidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codigo_unidad LIKE cttb00007.codigo_unidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_codigo_unidad IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- codigo_unidad: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00007_codigo_unidad_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00007.descripcion" column
-#+
-#+ @param p_descripcion - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00007_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE cttb00007.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00007_descripcion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00007.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00007_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cttb00007.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00007_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00007.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00007_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cttb00007.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00007_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00007.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00007_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cttb00007.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00007_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00007.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00007_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cttb00007.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00007_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00007.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00007_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cttb00007.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00007_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00006" table
-#+
-#+ @param p_data - a row data LIKE cttb00006.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00006_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cttb00006.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cttb00006_num_oc_checkColumnConstraints(p_data.num_oc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00006_tipo_checkColumnConstraints(p_data.tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00006_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00006_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00006_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00006_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00006_cod_prod_checkColumnConstraints(p_data.cod_prod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00006_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00006_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00006_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00006_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00006_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00006_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00006_checkTableConstraints
-
-{}
-#+ Check constraints on the "cttb00006.num_oc" column
-#+
-#+ @param p_num_oc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00006_num_oc_checkColumnConstraints(p_num_oc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_oc LIKE cttb00006.num_oc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00006_num_oc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00006.tipo" column
-#+
-#+ @param p_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00006_tipo_checkColumnConstraints(p_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo LIKE cttb00006.tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00006_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00006.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00006_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE cttb00006.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00006_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00006.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00006_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE cttb00006.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00006_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00006.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00006_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE cttb00006.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00006_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00006.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00006_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE cttb00006.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00006_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00006.cod_prod" column
-#+
-#+ @param p_cod_prod - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00006_cod_prod_checkColumnConstraints(p_cod_prod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_prod LIKE cttb00006.cod_prod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00006_cod_prod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00006.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00006_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE cttb00006.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00006_cantidad_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00006.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00006_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cttb00006.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00006_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00006.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00006_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cttb00006.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00006_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00006.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00006_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cttb00006.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00006_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00006.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00006_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cttb00006.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00006_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00006.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00006_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cttb00006.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00006_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00004" table
-#+
-#+ @param p_data - a row data LIKE cttb00004.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00004_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cttb00004.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cttb00004_fecha_inicio_costo_checkColumnConstraints(p_data.fecha_inicio_costo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00004_ano_checkColumnConstraints(p_data.ano) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00004_mes_checkColumnConstraints(p_data.mes) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00004_checkTableConstraints
-
-{}
-#+ Check constraints on the "cttb00004.fecha_inicio_costo" column
-#+
-#+ @param p_fecha_inicio_costo - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00004_fecha_inicio_costo_checkColumnConstraints(p_fecha_inicio_costo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_inicio_costo LIKE cttb00004.fecha_inicio_costo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00004_fecha_inicio_costo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00004.ano" column
-#+
-#+ @param p_ano - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00004_ano_checkColumnConstraints(p_ano)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ano LIKE cttb00004.ano
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00004_ano_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00004.mes" column
-#+
-#+ @param p_mes - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00004_mes_checkColumnConstraints(p_mes)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mes LIKE cttb00004.mes
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00004_mes_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00003" table
-#+
-#+ @param p_data - a row data LIKE cttb00003.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00003_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cttb00003.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cttb00003_num_doc_checkColumnConstraints(p_data.num_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00003_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00003_departamento_checkColumnConstraints(p_data.departamento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00003_emp_no_checkColumnConstraints(p_data.emp_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00003_cod_mq_checkColumnConstraints(p_data.cod_mq) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00003_detalle_checkColumnConstraints(p_data.detalle) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00003_h_directa_checkColumnConstraints(p_data.h_directa) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00003_h_indirecta_checkColumnConstraints(p_data.h_indirecta) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00003_e_directa_checkColumnConstraints(p_data.e_directa) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00003_e_indirecta_checkColumnConstraints(p_data.e_indirecta) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00003_cod_prod_checkColumnConstraints(p_data.cod_prod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00003_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00003_codigo_bloque_checkColumnConstraints(p_data.codigo_bloque) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00003_costo_lab_checkColumnConstraints(p_data.costo_lab) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00003_costo_gasto_checkColumnConstraints(p_data.costo_gasto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00003_turno_checkColumnConstraints(p_data.turno) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00003_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00003_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00003_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00003_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00003_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00003_checkTableConstraints
-
-{}
-#+ Check constraints on the "cttb00003.num_doc" column
-#+
-#+ @param p_num_doc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00003_num_doc_checkColumnConstraints(p_num_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_doc LIKE cttb00003.num_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_num_doc IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- num_doc: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00003_num_doc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00003.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00003_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE cttb00003.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_fecha IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- fecha: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00003_fecha_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00003.departamento" column
-#+
-#+ @param p_departamento - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00003_departamento_checkColumnConstraints(p_departamento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_departamento LIKE cttb00003.departamento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_departamento IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- departamento: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00003_departamento_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00003.emp_no" column
-#+
-#+ @param p_emp_no - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00003_emp_no_checkColumnConstraints(p_emp_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_emp_no LIKE cttb00003.emp_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00003_emp_no_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00003.cod_mq" column
-#+
-#+ @param p_cod_mq - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00003_cod_mq_checkColumnConstraints(p_cod_mq)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mq LIKE cttb00003.cod_mq
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00003_cod_mq_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00003.detalle" column
-#+
-#+ @param p_detalle - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00003_detalle_checkColumnConstraints(p_detalle)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_detalle LIKE cttb00003.detalle
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00003_detalle_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00003.h_directa" column
-#+
-#+ @param p_h_directa - DECIMAL(8,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00003_h_directa_checkColumnConstraints(p_h_directa)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_h_directa LIKE cttb00003.h_directa
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00003_h_directa_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00003.h_indirecta" column
-#+
-#+ @param p_h_indirecta - DECIMAL(8,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00003_h_indirecta_checkColumnConstraints(p_h_indirecta)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_h_indirecta LIKE cttb00003.h_indirecta
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00003_h_indirecta_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00003.e_directa" column
-#+
-#+ @param p_e_directa - DECIMAL(8,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00003_e_directa_checkColumnConstraints(p_e_directa)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_e_directa LIKE cttb00003.e_directa
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00003_e_directa_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00003.e_indirecta" column
-#+
-#+ @param p_e_indirecta - DECIMAL(8,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00003_e_indirecta_checkColumnConstraints(p_e_indirecta)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_e_indirecta LIKE cttb00003.e_indirecta
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00003_e_indirecta_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00003.cod_prod" column
-#+
-#+ @param p_cod_prod - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00003_cod_prod_checkColumnConstraints(p_cod_prod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_prod LIKE cttb00003.cod_prod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00003_cod_prod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00003.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00003_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE cttb00003.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00003_cantidad_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00003.codigo_bloque" column
-#+
-#+ @param p_codigo_bloque - CHAR(25) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00003_codigo_bloque_checkColumnConstraints(p_codigo_bloque)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codigo_bloque LIKE cttb00003.codigo_bloque
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00003_codigo_bloque_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00003.costo_lab" column
-#+
-#+ @param p_costo_lab - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00003_costo_lab_checkColumnConstraints(p_costo_lab)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_costo_lab LIKE cttb00003.costo_lab
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00003_costo_lab_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00003.costo_gasto" column
-#+
-#+ @param p_costo_gasto - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00003_costo_gasto_checkColumnConstraints(p_costo_gasto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_costo_gasto LIKE cttb00003.costo_gasto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00003_costo_gasto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00003.turno" column
-#+
-#+ @param p_turno - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00003_turno_checkColumnConstraints(p_turno)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_turno LIKE cttb00003.turno
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00003_turno_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00003.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00003_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cttb00003.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00003_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00003.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00003_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cttb00003.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00003_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00003.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00003_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cttb00003.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00003_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00003.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00003_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cttb00003.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00003_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00003.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00003_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cttb00003.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00003_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00002" table
-#+
-#+ @param p_data - a row data LIKE cttb00002.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00002_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cttb00002.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cttb00002_ano_checkColumnConstraints(p_data.ano) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00002_venta_checkColumnConstraints(p_data.venta) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00002_nomenclatura_checkColumnConstraints(p_data.nomenclatura) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00002_mes_checkColumnConstraints(p_data.mes) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00002_costo_checkColumnConstraints(p_data.costo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00002_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00002_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00002_checkTableConstraints
-
-{}
-#+ Check constraints on the "cttb00002.ano" column
-#+
-#+ @param p_ano - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00002_ano_checkColumnConstraints(p_ano)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ano LIKE cttb00002.ano
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00002_ano_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00002.venta" column
-#+
-#+ @param p_venta - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00002_venta_checkColumnConstraints(p_venta)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_venta LIKE cttb00002.venta
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00002_venta_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00002.nomenclatura" column
-#+
-#+ @param p_nomenclatura - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00002_nomenclatura_checkColumnConstraints(p_nomenclatura)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nomenclatura LIKE cttb00002.nomenclatura
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00002_nomenclatura_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00002.mes" column
-#+
-#+ @param p_mes - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00002_mes_checkColumnConstraints(p_mes)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mes LIKE cttb00002.mes
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00002_mes_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00002.costo" column
-#+
-#+ @param p_costo - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00002_costo_checkColumnConstraints(p_costo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_costo LIKE cttb00002.costo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00002_costo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00002.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00002_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cttb00002.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00002_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00002.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00002_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cttb00002.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00002_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00001" table
-#+
-#+ @param p_data - a row data LIKE cttb00001.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00001_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cttb00001.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cttb00001_cod_prod_checkColumnConstraints(p_data.cod_prod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00001_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00001_unidad_med_checkColumnConstraints(p_data.unidad_med) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00001_nomenclatura_checkColumnConstraints(p_data.nomenclatura) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00001_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00001_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00001_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00001_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00001_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00001_cod_cia_checkColumnConstraints(p_data.cod_cia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- CALL smarmotech_dbxconstraints_cttb00001_pk_cttb00001_checkUniqueConstraint(p_forUpdate, p_data.cod_prod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00001_checkTableConstraints
-
-{}
-#+ Check the primary key uniqueness constraint on the "cttb00001"
-#+
-#+ @param p_key - Primary Key
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00001_pk_cttb00001_checkUniqueConstraint(p_forUpdate, p_key)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_key
- RECORD
- cttb00001_cod_prod LIKE cttb00001.cod_prod
- END RECORD
- DEFINE l_key
- RECORD
- cttb00001_cod_prod LIKE cttb00001.cod_prod
- END RECORD
- DEFINE l_where STRING
- DEFINE l_sqlQuery STRING
- DEFINE l_count INTEGER
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- LET l_where = "WHERE cttb00001.cod_prod = ? "
-
- let l_sqlQuery = "SELECT COUNT(*), cod_prod FROM cttb00001 ", l_where, " GROUP BY cod_prod"
-
- PREPARE cur_cttb00001_pk_cttb00001_checkUniqueConstraint FROM l_sqlQuery
- EXECUTE cur_cttb00001_pk_cttb00001_checkUniqueConstraint INTO l_count, l_key.* USING p_key.*
- FREE cur_cttb00001_pk_cttb00001_checkUniqueConstraint
- IF (NOT p_forUpdate AND l_count > 0) OR (p_forUpdate AND l_count > 0 AND p_key.* != l_key.*) THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_prod: " || ERROR_BAM_00002) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00001_pk_cttb00001_checkUniqueConstraint
-
-{}
-#+ Check constraints on the "cttb00001.cod_prod" column
-#+
-#+ @param p_cod_prod - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00001_cod_prod_checkColumnConstraints(p_cod_prod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_prod LIKE cttb00001.cod_prod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_prod IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_prod: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00001_cod_prod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00001.descripcion" column
-#+
-#+ @param p_descripcion - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00001_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE cttb00001.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00001_descripcion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00001.unidad_med" column
-#+
-#+ @param p_unidad_med - CHAR(4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00001_unidad_med_checkColumnConstraints(p_unidad_med)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_unidad_med LIKE cttb00001.unidad_med
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00001_unidad_med_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00001.nomenclatura" column
-#+
-#+ @param p_nomenclatura - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00001_nomenclatura_checkColumnConstraints(p_nomenclatura)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nomenclatura LIKE cttb00001.nomenclatura
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00001_nomenclatura_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00001.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00001_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cttb00001.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00001_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00001.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00001_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cttb00001.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00001_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00001.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00001_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cttb00001.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00001_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00001.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00001_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cttb00001.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00001_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00001.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00001_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cttb00001.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00001_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cttb00001.cod_cia" column
-#+
-#+ @param p_cod_cia - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00001_cod_cia_checkColumnConstraints(p_cod_cia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_cia LIKE cttb00001.cod_cia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cttb00001_cod_cia_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cptb00007" table
-#+
-#+ @param p_data - a row data LIKE cptb00007.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00007_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cptb00007.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cptb00007_num_doc_checkColumnConstraints(p_data.num_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00007_tipo_doc_checkColumnConstraints(p_data.tipo_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00007_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00007_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cptb00007_checkTableConstraints
-
-{}
-#+ Check constraints on the "cptb00007.num_doc" column
-#+
-#+ @param p_num_doc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00007_num_doc_checkColumnConstraints(p_num_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_doc LIKE cptb00007.num_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cptb00007_num_doc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cptb00007.tipo_doc" column
-#+
-#+ @param p_tipo_doc - CHAR(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00007_tipo_doc_checkColumnConstraints(p_tipo_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_doc LIKE cptb00007.tipo_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cptb00007_tipo_doc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cptb00007.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00007_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cptb00007.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cptb00007_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cptb00007.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00007_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cptb00007.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cptb00007_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cptb00006" table
-#+
-#+ @param p_data - a row data LIKE cptb00006.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00006_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cptb00006.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cptb00006_tipo_doc_checkColumnConstraints(p_data.tipo_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00006_num_doc_checkColumnConstraints(p_data.num_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00006_cod_sp_checkColumnConstraints(p_data.cod_sp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00006_cod_sp_sec_checkColumnConstraints(p_data.cod_sp_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00006_fecha_orig_checkColumnConstraints(p_data.fecha_orig) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00006_fecha_proc_checkColumnConstraints(p_data.fecha_proc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00006_orden_no_checkColumnConstraints(p_data.orden_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00006_tipo_checkColumnConstraints(p_data.tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00006_aplica_a_checkColumnConstraints(p_data.aplica_a) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00006_cta_ctble_checkColumnConstraints(p_data.cta_ctble) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00006_valor_checkColumnConstraints(p_data.valor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00006_detalle_checkColumnConstraints(p_data.detalle) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00006_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00006_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00006_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00006_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00006_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cptb00006_checkTableConstraints
-
-{}
-#+ Check constraints on the "cptb00006.tipo_doc" column
-#+
-#+ @param p_tipo_doc - CHAR(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00006_tipo_doc_checkColumnConstraints(p_tipo_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_doc LIKE cptb00006.tipo_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cptb00006_tipo_doc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cptb00006.num_doc" column
-#+
-#+ @param p_num_doc - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00006_num_doc_checkColumnConstraints(p_num_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_doc LIKE cptb00006.num_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cptb00006_num_doc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cptb00006.cod_sp" column
-#+
-#+ @param p_cod_sp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00006_cod_sp_checkColumnConstraints(p_cod_sp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sp LIKE cptb00006.cod_sp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cptb00006_cod_sp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cptb00006.cod_sp_sec" column
-#+
-#+ @param p_cod_sp_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00006_cod_sp_sec_checkColumnConstraints(p_cod_sp_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sp_sec LIKE cptb00006.cod_sp_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cptb00006_cod_sp_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cptb00006.fecha_orig" column
-#+
-#+ @param p_fecha_orig - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00006_fecha_orig_checkColumnConstraints(p_fecha_orig)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_orig LIKE cptb00006.fecha_orig
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cptb00006_fecha_orig_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cptb00006.fecha_proc" column
-#+
-#+ @param p_fecha_proc - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00006_fecha_proc_checkColumnConstraints(p_fecha_proc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_proc LIKE cptb00006.fecha_proc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cptb00006_fecha_proc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cptb00006.orden_no" column
-#+
-#+ @param p_orden_no - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00006_orden_no_checkColumnConstraints(p_orden_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_orden_no LIKE cptb00006.orden_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cptb00006_orden_no_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cptb00006.tipo" column
-#+
-#+ @param p_tipo - CHAR(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00006_tipo_checkColumnConstraints(p_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo LIKE cptb00006.tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cptb00006_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cptb00006.aplica_a" column
-#+
-#+ @param p_aplica_a - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00006_aplica_a_checkColumnConstraints(p_aplica_a)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_aplica_a LIKE cptb00006.aplica_a
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cptb00006_aplica_a_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cptb00006.cta_ctble" column
-#+
-#+ @param p_cta_ctble - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00006_cta_ctble_checkColumnConstraints(p_cta_ctble)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cta_ctble LIKE cptb00006.cta_ctble
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cptb00006_cta_ctble_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cptb00006.valor" column
-#+
-#+ @param p_valor - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00006_valor_checkColumnConstraints(p_valor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valor LIKE cptb00006.valor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_valor IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- valor: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cptb00006_valor_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cptb00006.detalle" column
-#+
-#+ @param p_detalle - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00006_detalle_checkColumnConstraints(p_detalle)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_detalle LIKE cptb00006.detalle
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cptb00006_detalle_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cptb00006.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00006_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cptb00006.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cptb00006_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cptb00006.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00006_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cptb00006.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cptb00006_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cptb00006.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00006_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cptb00006.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cptb00006_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cptb00006.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00006_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cptb00006.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cptb00006_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cptb00006.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00006_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cptb00006.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cptb00006_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cptb00005" table
-#+
-#+ @param p_data - a row data LIKE cptb00005.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00005_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cptb00005.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cptb00005_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00005_cod_sp_checkColumnConstraints(p_data.cod_sp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00005_cod_sp_sec_checkColumnConstraints(p_data.cod_sp_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00005_factura_checkColumnConstraints(p_data.factura) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00005_cuenta_no_checkColumnConstraints(p_data.cuenta_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00005_departamento_checkColumnConstraints(p_data.departamento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00005_num_doc_checkColumnConstraints(p_data.num_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00005_cod_aux_checkColumnConstraints(p_data.cod_aux) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00005_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00005_detalles_checkColumnConstraints(p_data.detalles) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00005_debito_checkColumnConstraints(p_data.debito) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00005_credito_checkColumnConstraints(p_data.credito) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00005_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00005_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00005_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00005_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00005_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cptb00005_checkTableConstraints
-
-{}
-#+ Check constraints on the "cptb00005.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00005_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE cptb00005.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cptb00005_fecha_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cptb00005.cod_sp" column
-#+
-#+ @param p_cod_sp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00005_cod_sp_checkColumnConstraints(p_cod_sp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sp LIKE cptb00005.cod_sp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cptb00005_cod_sp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cptb00005.cod_sp_sec" column
-#+
-#+ @param p_cod_sp_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00005_cod_sp_sec_checkColumnConstraints(p_cod_sp_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sp_sec LIKE cptb00005.cod_sp_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cptb00005_cod_sp_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cptb00005.factura" column
-#+
-#+ @param p_factura - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00005_factura_checkColumnConstraints(p_factura)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_factura LIKE cptb00005.factura
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cptb00005_factura_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cptb00005.cuenta_no" column
-#+
-#+ @param p_cuenta_no - CHAR(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00005_cuenta_no_checkColumnConstraints(p_cuenta_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cuenta_no LIKE cptb00005.cuenta_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cptb00005_cuenta_no_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cptb00005.departamento" column
-#+
-#+ @param p_departamento - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00005_departamento_checkColumnConstraints(p_departamento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_departamento LIKE cptb00005.departamento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cptb00005_departamento_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cptb00005.num_doc" column
-#+
-#+ @param p_num_doc - CHAR(12) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00005_num_doc_checkColumnConstraints(p_num_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_doc LIKE cptb00005.num_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cptb00005_num_doc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cptb00005.cod_aux" column
-#+
-#+ @param p_cod_aux - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00005_cod_aux_checkColumnConstraints(p_cod_aux)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_aux LIKE cptb00005.cod_aux
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cptb00005_cod_aux_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cptb00005.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00005_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE cptb00005.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cptb00005_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cptb00005.detalles" column
-#+
-#+ @param p_detalles - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00005_detalles_checkColumnConstraints(p_detalles)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_detalles LIKE cptb00005.detalles
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cptb00005_detalles_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cptb00005.debito" column
-#+
-#+ @param p_debito - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00005_debito_checkColumnConstraints(p_debito)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_debito LIKE cptb00005.debito
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cptb00005_debito_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cptb00005.credito" column
-#+
-#+ @param p_credito - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00005_credito_checkColumnConstraints(p_credito)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_credito LIKE cptb00005.credito
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cptb00005_credito_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cptb00005.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00005_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cptb00005.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cptb00005_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cptb00005.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00005_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cptb00005.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cptb00005_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cptb00005.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00005_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cptb00005.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cptb00005_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cptb00005.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00005_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cptb00005.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cptb00005_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cptb00005.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00005_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cptb00005.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cptb00005_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cptb00003" table
-#+
-#+ @param p_data - a row data LIKE cptb00003.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00003_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cptb00003.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cptb00003_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00003_cod_sp_checkColumnConstraints(p_data.cod_sp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00003_cod_sp_sec_checkColumnConstraints(p_data.cod_sp_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00003_factura_checkColumnConstraints(p_data.factura) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00003_cuenta_no_checkColumnConstraints(p_data.cuenta_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00003_departamento_checkColumnConstraints(p_data.departamento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00003_num_doc_checkColumnConstraints(p_data.num_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00003_cod_aux_checkColumnConstraints(p_data.cod_aux) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00003_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00003_detalles_checkColumnConstraints(p_data.detalles) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00003_debito_checkColumnConstraints(p_data.debito) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00003_credito_checkColumnConstraints(p_data.credito) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00003_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00003_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00003_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00003_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00003_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cptb00003_checkTableConstraints
-
-{}
-#+ Check constraints on the "cptb00003.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00003_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE cptb00003.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cptb00003_fecha_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cptb00003.cod_sp" column
-#+
-#+ @param p_cod_sp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00003_cod_sp_checkColumnConstraints(p_cod_sp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sp LIKE cptb00003.cod_sp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cptb00003_cod_sp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cptb00003.cod_sp_sec" column
-#+
-#+ @param p_cod_sp_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00003_cod_sp_sec_checkColumnConstraints(p_cod_sp_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sp_sec LIKE cptb00003.cod_sp_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cptb00003_cod_sp_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cptb00003.factura" column
-#+
-#+ @param p_factura - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00003_factura_checkColumnConstraints(p_factura)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_factura LIKE cptb00003.factura
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cptb00003_factura_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cptb00003.cuenta_no" column
-#+
-#+ @param p_cuenta_no - CHAR(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00003_cuenta_no_checkColumnConstraints(p_cuenta_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cuenta_no LIKE cptb00003.cuenta_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cptb00003_cuenta_no_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cptb00003.departamento" column
-#+
-#+ @param p_departamento - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00003_departamento_checkColumnConstraints(p_departamento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_departamento LIKE cptb00003.departamento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cptb00003_departamento_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cptb00003.num_doc" column
-#+
-#+ @param p_num_doc - CHAR(12) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00003_num_doc_checkColumnConstraints(p_num_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_doc LIKE cptb00003.num_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cptb00003_num_doc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cptb00003.cod_aux" column
-#+
-#+ @param p_cod_aux - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00003_cod_aux_checkColumnConstraints(p_cod_aux)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_aux LIKE cptb00003.cod_aux
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cptb00003_cod_aux_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cptb00003.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00003_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE cptb00003.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cptb00003_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cptb00003.detalles" column
-#+
-#+ @param p_detalles - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00003_detalles_checkColumnConstraints(p_detalles)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_detalles LIKE cptb00003.detalles
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cptb00003_detalles_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cptb00003.debito" column
-#+
-#+ @param p_debito - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00003_debito_checkColumnConstraints(p_debito)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_debito LIKE cptb00003.debito
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cptb00003_debito_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cptb00003.credito" column
-#+
-#+ @param p_credito - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00003_credito_checkColumnConstraints(p_credito)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_credito LIKE cptb00003.credito
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cptb00003_credito_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cptb00003.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00003_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cptb00003.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cptb00003_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cptb00003.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00003_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cptb00003.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cptb00003_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cptb00003.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00003_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cptb00003.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cptb00003_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cptb00003.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00003_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cptb00003.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cptb00003_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cptb00003.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00003_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cptb00003.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cptb00003_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cptb00002" table
-#+
-#+ @param p_data - a row data LIKE cptb00002.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00002_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cptb00002.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cptb00002_cod_sp_checkColumnConstraints(p_data.cod_sp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00002_cod_sp_sec_checkColumnConstraints(p_data.cod_sp_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00002_cuenta_no_checkColumnConstraints(p_data.cuenta_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00002_num_doc_checkColumnConstraints(p_data.num_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00002_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00002_valor_checkColumnConstraints(p_data.valor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00002_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00002_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00002_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00002_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00002_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cptb00002_checkTableConstraints
-
-{}
-#+ Check constraints on the "cptb00002.cod_sp" column
-#+
-#+ @param p_cod_sp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00002_cod_sp_checkColumnConstraints(p_cod_sp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sp LIKE cptb00002.cod_sp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cptb00002_cod_sp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cptb00002.cod_sp_sec" column
-#+
-#+ @param p_cod_sp_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00002_cod_sp_sec_checkColumnConstraints(p_cod_sp_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sp_sec LIKE cptb00002.cod_sp_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cptb00002_cod_sp_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cptb00002.cuenta_no" column
-#+
-#+ @param p_cuenta_no - CHAR(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00002_cuenta_no_checkColumnConstraints(p_cuenta_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cuenta_no LIKE cptb00002.cuenta_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cptb00002_cuenta_no_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cptb00002.num_doc" column
-#+
-#+ @param p_num_doc - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00002_num_doc_checkColumnConstraints(p_num_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_doc LIKE cptb00002.num_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cptb00002_num_doc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cptb00002.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00002_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE cptb00002.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cptb00002_fecha_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cptb00002.valor" column
-#+
-#+ @param p_valor - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00002_valor_checkColumnConstraints(p_valor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valor LIKE cptb00002.valor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cptb00002_valor_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cptb00002.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00002_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cptb00002.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cptb00002_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cptb00002.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00002_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cptb00002.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cptb00002_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cptb00002.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00002_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cptb00002.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cptb00002_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cptb00002.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00002_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cptb00002.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cptb00002_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cptb00002.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00002_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cptb00002.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cptb00002_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cptb00001" table
-#+
-#+ @param p_data - a row data LIKE cptb00001.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00001_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cptb00001.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cptb00001_tipo_doc_checkColumnConstraints(p_data.tipo_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00001_num_doc_checkColumnConstraints(p_data.num_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00001_cod_sp_checkColumnConstraints(p_data.cod_sp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00001_cod_sp_sec_checkColumnConstraints(p_data.cod_sp_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00001_fecha_orig_checkColumnConstraints(p_data.fecha_orig) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00001_fecha_proc_checkColumnConstraints(p_data.fecha_proc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00001_orden_no_checkColumnConstraints(p_data.orden_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00001_tipo_checkColumnConstraints(p_data.tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00001_aplica_a_checkColumnConstraints(p_data.aplica_a) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00001_cta_ctble_checkColumnConstraints(p_data.cta_ctble) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00001_valor_checkColumnConstraints(p_data.valor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00001_detalle_checkColumnConstraints(p_data.detalle) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00001_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00001_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00001_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00001_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00001_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cptb00001_checkTableConstraints
-
-{}
-#+ Check constraints on the "cptb00001.tipo_doc" column
-#+
-#+ @param p_tipo_doc - VARCHAR2(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00001_tipo_doc_checkColumnConstraints(p_tipo_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_doc LIKE cptb00001.tipo_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cptb00001_tipo_doc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cptb00001.num_doc" column
-#+
-#+ @param p_num_doc - VARCHAR2(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00001_num_doc_checkColumnConstraints(p_num_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_doc LIKE cptb00001.num_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cptb00001_num_doc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cptb00001.cod_sp" column
-#+
-#+ @param p_cod_sp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00001_cod_sp_checkColumnConstraints(p_cod_sp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sp LIKE cptb00001.cod_sp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cptb00001_cod_sp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cptb00001.cod_sp_sec" column
-#+
-#+ @param p_cod_sp_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00001_cod_sp_sec_checkColumnConstraints(p_cod_sp_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sp_sec LIKE cptb00001.cod_sp_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cptb00001_cod_sp_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cptb00001.fecha_orig" column
-#+
-#+ @param p_fecha_orig - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00001_fecha_orig_checkColumnConstraints(p_fecha_orig)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_orig LIKE cptb00001.fecha_orig
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cptb00001_fecha_orig_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cptb00001.fecha_proc" column
-#+
-#+ @param p_fecha_proc - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00001_fecha_proc_checkColumnConstraints(p_fecha_proc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_proc LIKE cptb00001.fecha_proc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cptb00001_fecha_proc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cptb00001.orden_no" column
-#+
-#+ @param p_orden_no - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00001_orden_no_checkColumnConstraints(p_orden_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_orden_no LIKE cptb00001.orden_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cptb00001_orden_no_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cptb00001.tipo" column
-#+
-#+ @param p_tipo - VARCHAR2(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00001_tipo_checkColumnConstraints(p_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo LIKE cptb00001.tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cptb00001_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cptb00001.aplica_a" column
-#+
-#+ @param p_aplica_a - VARCHAR2(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00001_aplica_a_checkColumnConstraints(p_aplica_a)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_aplica_a LIKE cptb00001.aplica_a
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cptb00001_aplica_a_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cptb00001.cta_ctble" column
-#+
-#+ @param p_cta_ctble - VARCHAR2(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00001_cta_ctble_checkColumnConstraints(p_cta_ctble)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cta_ctble LIKE cptb00001.cta_ctble
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cptb00001_cta_ctble_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cptb00001.valor" column
-#+
-#+ @param p_valor - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00001_valor_checkColumnConstraints(p_valor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valor LIKE cptb00001.valor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_valor IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- valor: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cptb00001_valor_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cptb00001.detalle" column
-#+
-#+ @param p_detalle - VARCHAR2(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00001_detalle_checkColumnConstraints(p_detalle)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_detalle LIKE cptb00001.detalle
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cptb00001_detalle_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cptb00001.status_t" column
-#+
-#+ @param p_status_t - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00001_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cptb00001.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cptb00001_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cptb00001.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00001_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cptb00001.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cptb00001_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cptb00001.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00001_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cptb00001.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cptb00001_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cptb00001.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00001_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cptb00001.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cptb00001_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cptb00001.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00001_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cptb00001.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cptb00001_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "country" table
-#+
-#+ @param p_data - a row data LIKE country.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_country_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE country.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_country_code_checkColumnConstraints(p_data.code) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_country_codedesc_checkColumnConstraints(p_data.codedesc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.country_checkTableConstraints
-
-{}
-#+ Check constraints on the "country.code" column
-#+
-#+ @param p_code - CHAR(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_country_code_checkColumnConstraints(p_code)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_code LIKE country.code
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.country_code_checkColumnConstraints
-
-{}
-#+ Check constraints on the "country.codedesc" column
-#+
-#+ @param p_codedesc - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_country_codedesc_checkColumnConstraints(p_codedesc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codedesc LIKE country.codedesc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.country_codedesc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotizacion_detalle" table
-#+
-#+ @param p_data - a row data LIKE cotizacion_detalle.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotizacion_detalle_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cotizacion_detalle.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cotizacion_detalle_cotizacion_no_mob_checkColumnConstraints(p_data.cotizacion_no_mob) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotizacion_detalle_area_checkColumnConstraints(p_data.area) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotizacion_detalle_descripcion_area_checkColumnConstraints(p_data.descripcion_area) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotizacion_detalle_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotizacion_detalle_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotizacion_detalle_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotizacion_detalle_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotizacion_detalle_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotizacion_detalle_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotizacion_detalle_cantidad1_checkColumnConstraints(p_data.cantidad1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotizacion_detalle_precio_checkColumnConstraints(p_data.precio) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotizacion_detalle_porc_desc_checkColumnConstraints(p_data.porc_desc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotizacion_detalle_itbis_checkColumnConstraints(p_data.itbis) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotizacion_detalle_valor_checkColumnConstraints(p_data.valor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotizacion_detalle_codid_checkColumnConstraints(p_data.codid) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotizacion_detalle_cotizacion_no_checkColumnConstraints(p_data.cotizacion_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotizacion_detalle_checkTableConstraints
-
-{}
-#+ Check constraints on the "cotizacion_detalle.cotizacion_no_mob" column
-#+
-#+ @param p_cotizacion_no_mob - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotizacion_detalle_cotizacion_no_mob_checkColumnConstraints(p_cotizacion_no_mob)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cotizacion_no_mob LIKE cotizacion_detalle.cotizacion_no_mob
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotizacion_detalle_cotizacion_no_mob_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotizacion_detalle.area" column
-#+
-#+ @param p_area - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotizacion_detalle_area_checkColumnConstraints(p_area)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_area LIKE cotizacion_detalle.area
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotizacion_detalle_area_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotizacion_detalle.descripcion_area" column
-#+
-#+ @param p_descripcion_area - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotizacion_detalle_descripcion_area_checkColumnConstraints(p_descripcion_area)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion_area LIKE cotizacion_detalle.descripcion_area
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotizacion_detalle_descripcion_area_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotizacion_detalle.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotizacion_detalle_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE cotizacion_detalle.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotizacion_detalle_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotizacion_detalle.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotizacion_detalle_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE cotizacion_detalle.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotizacion_detalle_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotizacion_detalle.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotizacion_detalle_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE cotizacion_detalle.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotizacion_detalle_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotizacion_detalle.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotizacion_detalle_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE cotizacion_detalle.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotizacion_detalle_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotizacion_detalle.descripcion" column
-#+
-#+ @param p_descripcion - VARCHAR2(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotizacion_detalle_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE cotizacion_detalle.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotizacion_detalle_descripcion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotizacion_detalle.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotizacion_detalle_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE cotizacion_detalle.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotizacion_detalle_cantidad_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotizacion_detalle.cantidad1" column
-#+
-#+ @param p_cantidad1 - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotizacion_detalle_cantidad1_checkColumnConstraints(p_cantidad1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad1 LIKE cotizacion_detalle.cantidad1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotizacion_detalle_cantidad1_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotizacion_detalle.precio" column
-#+
-#+ @param p_precio - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotizacion_detalle_precio_checkColumnConstraints(p_precio)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_precio LIKE cotizacion_detalle.precio
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotizacion_detalle_precio_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotizacion_detalle.porc_desc" column
-#+
-#+ @param p_porc_desc - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotizacion_detalle_porc_desc_checkColumnConstraints(p_porc_desc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_porc_desc LIKE cotizacion_detalle.porc_desc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotizacion_detalle_porc_desc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotizacion_detalle.itbis" column
-#+
-#+ @param p_itbis - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotizacion_detalle_itbis_checkColumnConstraints(p_itbis)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_itbis LIKE cotizacion_detalle.itbis
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotizacion_detalle_itbis_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotizacion_detalle.valor" column
-#+
-#+ @param p_valor - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotizacion_detalle_valor_checkColumnConstraints(p_valor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valor LIKE cotizacion_detalle.valor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotizacion_detalle_valor_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotizacion_detalle.codid" column
-#+
-#+ @param p_codid - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotizacion_detalle_codid_checkColumnConstraints(p_codid)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codid LIKE cotizacion_detalle.codid
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotizacion_detalle_codid_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotizacion_detalle.cotizacion_no" column
-#+
-#+ @param p_cotizacion_no - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotizacion_detalle_cotizacion_no_checkColumnConstraints(p_cotizacion_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cotizacion_no LIKE cotizacion_detalle.cotizacion_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotizacion_detalle_cotizacion_no_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotizacion" table
-#+
-#+ @param p_data - a row data LIKE cotizacion.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotizacion_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cotizacion.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cotizacion_cotizacion_no_mob_checkColumnConstraints(p_data.cotizacion_no_mob) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotizacion_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotizacion_ventas_checkColumnConstraints(p_data.ventas) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotizacion_tipo_cliente_checkColumnConstraints(p_data.tipo_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotizacion_sec_cliente_checkColumnConstraints(p_data.sec_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotizacion_nombre_checkColumnConstraints(p_data.nombre) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotizacion_rnc_checkColumnConstraints(p_data.rnc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotizacion_nombre_proyecto_checkColumnConstraints(p_data.nombre_proyecto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotizacion_direccion_proyecto_checkColumnConstraints(p_data.direccion_proyecto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotizacion_direccion_cliente_checkColumnConstraints(p_data.direccion_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotizacion_cond_pago_checkColumnConstraints(p_data.cond_pago) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotizacion_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotizacion_celular_checkColumnConstraints(p_data.celular) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotizacion_email_checkColumnConstraints(p_data.email) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotizacion_prima_checkColumnConstraints(p_data.prima) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotizacion_porc_itbis_checkColumnConstraints(p_data.porc_itbis) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotizacion_sec_vend_checkColumnConstraints(p_data.sec_vend) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotizacion_total_bruto_checkColumnConstraints(p_data.total_bruto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotizacion_monto_desc_checkColumnConstraints(p_data.monto_desc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotizacion_monto_itbis_checkColumnConstraints(p_data.monto_itbis) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotizacion_total_cotizacion_checkColumnConstraints(p_data.total_cotizacion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotizacion_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotizacion_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotizacion_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotizacion_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotizacion_cotizacion_no_checkColumnConstraints(p_data.cotizacion_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotizacion_checkTableConstraints
-
-{}
-#+ Check constraints on the "cotizacion.cotizacion_no_mob" column
-#+
-#+ @param p_cotizacion_no_mob - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotizacion_cotizacion_no_mob_checkColumnConstraints(p_cotizacion_no_mob)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cotizacion_no_mob LIKE cotizacion.cotizacion_no_mob
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotizacion_cotizacion_no_mob_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotizacion.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotizacion_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE cotizacion.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotizacion_fecha_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotizacion.ventas" column
-#+
-#+ @param p_ventas - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotizacion_ventas_checkColumnConstraints(p_ventas)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ventas LIKE cotizacion.ventas
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotizacion_ventas_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotizacion.tipo_cliente" column
-#+
-#+ @param p_tipo_cliente - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotizacion_tipo_cliente_checkColumnConstraints(p_tipo_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_cliente LIKE cotizacion.tipo_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotizacion_tipo_cliente_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotizacion.sec_cliente" column
-#+
-#+ @param p_sec_cliente - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotizacion_sec_cliente_checkColumnConstraints(p_sec_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_cliente LIKE cotizacion.sec_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotizacion_sec_cliente_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotizacion.nombre" column
-#+
-#+ @param p_nombre - VARCHAR2(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotizacion_nombre_checkColumnConstraints(p_nombre)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombre LIKE cotizacion.nombre
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotizacion_nombre_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotizacion.rnc" column
-#+
-#+ @param p_rnc - VARCHAR2(11) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotizacion_rnc_checkColumnConstraints(p_rnc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_rnc LIKE cotizacion.rnc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotizacion_rnc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotizacion.nombre_proyecto" column
-#+
-#+ @param p_nombre_proyecto - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotizacion_nombre_proyecto_checkColumnConstraints(p_nombre_proyecto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombre_proyecto LIKE cotizacion.nombre_proyecto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotizacion_nombre_proyecto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotizacion.direccion_proyecto" column
-#+
-#+ @param p_direccion_proyecto - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotizacion_direccion_proyecto_checkColumnConstraints(p_direccion_proyecto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_direccion_proyecto LIKE cotizacion.direccion_proyecto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotizacion_direccion_proyecto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotizacion.direccion_cliente" column
-#+
-#+ @param p_direccion_cliente - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotizacion_direccion_cliente_checkColumnConstraints(p_direccion_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_direccion_cliente LIKE cotizacion.direccion_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotizacion_direccion_cliente_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotizacion.cond_pago" column
-#+
-#+ @param p_cond_pago - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotizacion_cond_pago_checkColumnConstraints(p_cond_pago)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cond_pago LIKE cotizacion.cond_pago
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotizacion_cond_pago_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotizacion.descripcion" column
-#+
-#+ @param p_descripcion - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotizacion_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE cotizacion.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotizacion_descripcion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotizacion.celular" column
-#+
-#+ @param p_celular - VARCHAR2(15) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotizacion_celular_checkColumnConstraints(p_celular)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_celular LIKE cotizacion.celular
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotizacion_celular_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotizacion.email" column
-#+
-#+ @param p_email - VARCHAR2(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotizacion_email_checkColumnConstraints(p_email)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_email LIKE cotizacion.email
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotizacion_email_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotizacion.prima" column
-#+
-#+ @param p_prima - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotizacion_prima_checkColumnConstraints(p_prima)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_prima LIKE cotizacion.prima
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotizacion_prima_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotizacion.porc_itbis" column
-#+
-#+ @param p_porc_itbis - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotizacion_porc_itbis_checkColumnConstraints(p_porc_itbis)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_porc_itbis LIKE cotizacion.porc_itbis
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotizacion_porc_itbis_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotizacion.sec_vend" column
-#+
-#+ @param p_sec_vend - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotizacion_sec_vend_checkColumnConstraints(p_sec_vend)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_vend LIKE cotizacion.sec_vend
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotizacion_sec_vend_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotizacion.total_bruto" column
-#+
-#+ @param p_total_bruto - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotizacion_total_bruto_checkColumnConstraints(p_total_bruto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_total_bruto LIKE cotizacion.total_bruto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotizacion_total_bruto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotizacion.monto_desc" column
-#+
-#+ @param p_monto_desc - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotizacion_monto_desc_checkColumnConstraints(p_monto_desc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_monto_desc LIKE cotizacion.monto_desc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotizacion_monto_desc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotizacion.monto_itbis" column
-#+
-#+ @param p_monto_itbis - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotizacion_monto_itbis_checkColumnConstraints(p_monto_itbis)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_monto_itbis LIKE cotizacion.monto_itbis
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotizacion_monto_itbis_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotizacion.total_cotizacion" column
-#+
-#+ @param p_total_cotizacion - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotizacion_total_cotizacion_checkColumnConstraints(p_total_cotizacion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_total_cotizacion LIKE cotizacion.total_cotizacion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotizacion_total_cotizacion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotizacion.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotizacion_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cotizacion.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotizacion_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotizacion.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotizacion_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cotizacion.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotizacion_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotizacion.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotizacion_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cotizacion.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotizacion_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotizacion.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotizacion_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cotizacion.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotizacion_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotizacion.cotizacion_no" column
-#+
-#+ @param p_cotizacion_no - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotizacion_cotizacion_no_checkColumnConstraints(p_cotizacion_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cotizacion_no LIKE cotizacion.cotizacion_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotizacion_cotizacion_no_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00038" table
-#+
-#+ @param p_data - a row data LIKE cotb00038.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00038_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cotb00038.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cotb00038_num_doc_checkColumnConstraints(p_data.num_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00038_cod_mov_checkColumnConstraints(p_data.cod_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00038_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00038_num_oc_checkColumnConstraints(p_data.num_oc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00038_cod_emb_checkColumnConstraints(p_data.cod_emb) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00038_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00038_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00038_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00038_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00038_cantidad_o_checkColumnConstraints(p_data.cantidad_o) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00038_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00038_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00038_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00038_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00038_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00038_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00038_checkTableConstraints
-
-{}
-#+ Check constraints on the "cotb00038.num_doc" column
-#+
-#+ @param p_num_doc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00038_num_doc_checkColumnConstraints(p_num_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_doc LIKE cotb00038.num_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00038_num_doc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00038.cod_mov" column
-#+
-#+ @param p_cod_mov - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00038_cod_mov_checkColumnConstraints(p_cod_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mov LIKE cotb00038.cod_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00038_cod_mov_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00038.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00038_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE cotb00038.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00038_fecha_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00038.num_oc" column
-#+
-#+ @param p_num_oc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00038_num_oc_checkColumnConstraints(p_num_oc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_oc LIKE cotb00038.num_oc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00038_num_oc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00038.cod_emb" column
-#+
-#+ @param p_cod_emb - CHAR(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00038_cod_emb_checkColumnConstraints(p_cod_emb)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_emb LIKE cotb00038.cod_emb
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00038_cod_emb_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00038.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00038_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE cotb00038.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00038_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00038.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00038_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE cotb00038.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00038_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00038.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00038_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE cotb00038.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00038_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00038.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00038_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE cotb00038.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00038_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00038.cantidad_o" column
-#+
-#+ @param p_cantidad_o - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00038_cantidad_o_checkColumnConstraints(p_cantidad_o)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad_o LIKE cotb00038.cantidad_o
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00038_cantidad_o_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00038.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00038_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE cotb00038.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00038_cantidad_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00038.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00038_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cotb00038.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00038_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00038.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00038_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cotb00038.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00038_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00038.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00038_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cotb00038.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00038_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00038.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00038_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cotb00038.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00038_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00038.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00038_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cotb00038.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00038_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00036" table
-#+
-#+ @param p_data - a row data LIKE cotb00036.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00036_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cotb00036.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cotb00036_priori_req_checkColumnConstraints(p_data.priori_req) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00036_desc_priori_checkColumnConstraints(p_data.desc_priori) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00036_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00036_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00036_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00036_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00036_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00036_checkTableConstraints
-
-{}
-#+ Check constraints on the "cotb00036.priori_req" column
-#+
-#+ @param p_priori_req - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00036_priori_req_checkColumnConstraints(p_priori_req)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_priori_req LIKE cotb00036.priori_req
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_priori_req IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- priori_req: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00036_priori_req_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00036.desc_priori" column
-#+
-#+ @param p_desc_priori - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00036_desc_priori_checkColumnConstraints(p_desc_priori)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_desc_priori LIKE cotb00036.desc_priori
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_desc_priori IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- desc_priori: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00036_desc_priori_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00036.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00036_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cotb00036.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00036_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00036.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00036_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cotb00036.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00036_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00036.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00036_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cotb00036.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00036_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00036.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00036_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cotb00036.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00036_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00036.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00036_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cotb00036.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00036_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00034" table
-#+
-#+ @param p_data - a row data LIKE cotb00034.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00034_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cotb00034.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cotb00034_num_oc_checkColumnConstraints(p_data.num_oc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00034_num_req_checkColumnConstraints(p_data.num_req) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00034_tipo_checkColumnConstraints(p_data.tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00034_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00034_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00034_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00034_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00034_num_parte_checkColumnConstraints(p_data.num_parte) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00034_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00034_precio_checkColumnConstraints(p_data.precio) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00034_cod_mon_checkColumnConstraints(p_data.cod_mon) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00034_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00034_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00034_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00034_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00034_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00034_checkTableConstraints
-
-{}
-#+ Check constraints on the "cotb00034.num_oc" column
-#+
-#+ @param p_num_oc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00034_num_oc_checkColumnConstraints(p_num_oc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_oc LIKE cotb00034.num_oc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00034_num_oc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00034.num_req" column
-#+
-#+ @param p_num_req - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00034_num_req_checkColumnConstraints(p_num_req)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_req LIKE cotb00034.num_req
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00034_num_req_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00034.tipo" column
-#+
-#+ @param p_tipo - CHAR(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00034_tipo_checkColumnConstraints(p_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo LIKE cotb00034.tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00034_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00034.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00034_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE cotb00034.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00034_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00034.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00034_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE cotb00034.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00034_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00034.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00034_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE cotb00034.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00034_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00034.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00034_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE cotb00034.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00034_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00034.num_parte" column
-#+
-#+ @param p_num_parte - CHAR(12) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00034_num_parte_checkColumnConstraints(p_num_parte)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_parte LIKE cotb00034.num_parte
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00034_num_parte_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00034.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00034_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE cotb00034.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00034_cantidad_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00034.precio" column
-#+
-#+ @param p_precio - DECIMAL(11,3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00034_precio_checkColumnConstraints(p_precio)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_precio LIKE cotb00034.precio
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00034_precio_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00034.cod_mon" column
-#+
-#+ @param p_cod_mon - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00034_cod_mon_checkColumnConstraints(p_cod_mon)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mon LIKE cotb00034.cod_mon
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00034_cod_mon_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00034.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00034_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cotb00034.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00034_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00034.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00034_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cotb00034.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00034_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00034.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00034_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cotb00034.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00034_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00034.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00034_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cotb00034.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00034_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00034.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00034_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cotb00034.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00034_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00033" table
-#+
-#+ @param p_data - a row data LIKE cotb00033.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00033_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cotb00033.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cotb00033_num_oc_checkColumnConstraints(p_data.num_oc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00033_tipo_checkColumnConstraints(p_data.tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00033_fech_oc_checkColumnConstraints(p_data.fech_oc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00033_num_pr_checkColumnConstraints(p_data.num_pr) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00033_cod_sp_checkColumnConstraints(p_data.cod_sp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00033_cod_sp_sec_checkColumnConstraints(p_data.cod_sp_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00033_term_sp_checkColumnConstraints(p_data.term_sp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00033_via_checkColumnConstraints(p_data.via) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00033_enviada_checkColumnConstraints(p_data.enviada) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00033_fech_enviada_checkColumnConstraints(p_data.fech_enviada) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00033_pago_checkColumnConstraints(p_data.pago) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00033_fech_pago_checkColumnConstraints(p_data.fech_pago) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00033_cierre_checkColumnConstraints(p_data.cierre) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00033_cod_pt_checkColumnConstraints(p_data.cod_pt) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00033_c_flete_checkColumnConstraints(p_data.c_flete) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00033_otros_g_checkColumnConstraints(p_data.otros_g) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00033_detalle_checkColumnConstraints(p_data.detalle) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00033_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00033_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00033_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00033_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00033_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00033_checkTableConstraints
-
-{}
-#+ Check constraints on the "cotb00033.num_oc" column
-#+
-#+ @param p_num_oc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00033_num_oc_checkColumnConstraints(p_num_oc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_oc LIKE cotb00033.num_oc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00033_num_oc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00033.tipo" column
-#+
-#+ @param p_tipo - CHAR(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00033_tipo_checkColumnConstraints(p_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo LIKE cotb00033.tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00033_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00033.fech_oc" column
-#+
-#+ @param p_fech_oc - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00033_fech_oc_checkColumnConstraints(p_fech_oc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_oc LIKE cotb00033.fech_oc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00033_fech_oc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00033.num_pr" column
-#+
-#+ @param p_num_pr - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00033_num_pr_checkColumnConstraints(p_num_pr)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_pr LIKE cotb00033.num_pr
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00033_num_pr_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00033.cod_sp" column
-#+
-#+ @param p_cod_sp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00033_cod_sp_checkColumnConstraints(p_cod_sp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sp LIKE cotb00033.cod_sp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00033_cod_sp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00033.cod_sp_sec" column
-#+
-#+ @param p_cod_sp_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00033_cod_sp_sec_checkColumnConstraints(p_cod_sp_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sp_sec LIKE cotb00033.cod_sp_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00033_cod_sp_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00033.term_sp" column
-#+
-#+ @param p_term_sp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00033_term_sp_checkColumnConstraints(p_term_sp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_term_sp LIKE cotb00033.term_sp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00033_term_sp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00033.via" column
-#+
-#+ @param p_via - CHAR(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00033_via_checkColumnConstraints(p_via)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_via LIKE cotb00033.via
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00033_via_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00033.enviada" column
-#+
-#+ @param p_enviada - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00033_enviada_checkColumnConstraints(p_enviada)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_enviada LIKE cotb00033.enviada
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00033_enviada_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00033.fech_enviada" column
-#+
-#+ @param p_fech_enviada - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00033_fech_enviada_checkColumnConstraints(p_fech_enviada)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_enviada LIKE cotb00033.fech_enviada
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00033_fech_enviada_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00033.pago" column
-#+
-#+ @param p_pago - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00033_pago_checkColumnConstraints(p_pago)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_pago LIKE cotb00033.pago
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00033_pago_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00033.fech_pago" column
-#+
-#+ @param p_fech_pago - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00033_fech_pago_checkColumnConstraints(p_fech_pago)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_pago LIKE cotb00033.fech_pago
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00033_fech_pago_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00033.cierre" column
-#+
-#+ @param p_cierre - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00033_cierre_checkColumnConstraints(p_cierre)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cierre LIKE cotb00033.cierre
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00033_cierre_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00033.cod_pt" column
-#+
-#+ @param p_cod_pt - CHAR(4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00033_cod_pt_checkColumnConstraints(p_cod_pt)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_pt LIKE cotb00033.cod_pt
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00033_cod_pt_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00033.c_flete" column
-#+
-#+ @param p_c_flete - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00033_c_flete_checkColumnConstraints(p_c_flete)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_c_flete LIKE cotb00033.c_flete
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00033_c_flete_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00033.otros_g" column
-#+
-#+ @param p_otros_g - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00033_otros_g_checkColumnConstraints(p_otros_g)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_otros_g LIKE cotb00033.otros_g
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00033_otros_g_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00033.detalle" column
-#+
-#+ @param p_detalle - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00033_detalle_checkColumnConstraints(p_detalle)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_detalle LIKE cotb00033.detalle
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00033_detalle_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00033.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00033_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cotb00033.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00033_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00033.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00033_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cotb00033.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00033_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00033.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00033_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cotb00033.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00033_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00033.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00033_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cotb00033.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00033_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00033.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00033_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cotb00033.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00033_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00031" table
-#+
-#+ @param p_data - a row data LIKE cotb00031.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00031_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cotb00031.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cotb00031_cod_mon_checkColumnConstraints(p_data.cod_mon) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00031_descrip_mon_checkColumnConstraints(p_data.descrip_mon) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00031_simbolo_checkColumnConstraints(p_data.simbolo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00031_tasa_cambio_checkColumnConstraints(p_data.tasa_cambio) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00031_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00031_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00031_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00031_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00031_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00031_checkTableConstraints
-
-{}
-#+ Check constraints on the "cotb00031.cod_mon" column
-#+
-#+ @param p_cod_mon - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00031_cod_mon_checkColumnConstraints(p_cod_mon)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mon LIKE cotb00031.cod_mon
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00031_cod_mon_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00031.descrip_mon" column
-#+
-#+ @param p_descrip_mon - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00031_descrip_mon_checkColumnConstraints(p_descrip_mon)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descrip_mon LIKE cotb00031.descrip_mon
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00031_descrip_mon_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00031.simbolo" column
-#+
-#+ @param p_simbolo - CHAR(4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00031_simbolo_checkColumnConstraints(p_simbolo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_simbolo LIKE cotb00031.simbolo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00031_simbolo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00031.tasa_cambio" column
-#+
-#+ @param p_tasa_cambio - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00031_tasa_cambio_checkColumnConstraints(p_tasa_cambio)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tasa_cambio LIKE cotb00031.tasa_cambio
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00031_tasa_cambio_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00031.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00031_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cotb00031.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00031_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00031.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00031_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cotb00031.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00031_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00031.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00031_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cotb00031.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00031_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00031.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00031_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cotb00031.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00031_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00031.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00031_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cotb00031.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00031_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00030" table
-#+
-#+ @param p_data - a row data LIKE cotb00030.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00030_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cotb00030.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cotb00030_num_oc_checkColumnConstraints(p_data.num_oc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00030_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00030_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00030_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00030_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00030_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00030_checkTableConstraints
-
-{}
-#+ Check constraints on the "cotb00030.num_oc" column
-#+
-#+ @param p_num_oc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00030_num_oc_checkColumnConstraints(p_num_oc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_oc LIKE cotb00030.num_oc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00030_num_oc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00030.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00030_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cotb00030.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00030_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00030.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00030_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cotb00030.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00030_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00030.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00030_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cotb00030.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00030_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00030.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00030_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cotb00030.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00030_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00030.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00030_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cotb00030.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00030_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00029" table
-#+
-#+ @param p_data - a row data LIKE cotb00029.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00029_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cotb00029.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cotb00029_num_oc_checkColumnConstraints(p_data.num_oc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00029_tipo_checkColumnConstraints(p_data.tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00029_cod_sp_checkColumnConstraints(p_data.cod_sp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00029_cod_sp_sec_checkColumnConstraints(p_data.cod_sp_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00029_ship_to_checkColumnConstraints(p_data.ship_to) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00029_n_a_b_checkColumnConstraints(p_data.n_a_b) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00029_c_i_d_checkColumnConstraints(p_data.c_i_d) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00029_c_i_d1_checkColumnConstraints(p_data.c_i_d1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00029_nota_checkColumnConstraints(p_data.nota) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00029_nota1_checkColumnConstraints(p_data.nota1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00029_desc_flete_checkColumnConstraints(p_data.desc_flete) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00029_total_flete_checkColumnConstraints(p_data.total_flete) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00029_desc_valor_checkColumnConstraints(p_data.desc_valor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00029_total_valor_checkColumnConstraints(p_data.total_valor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00029_desc_otro_checkColumnConstraints(p_data.desc_otro) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00029_total_otro_checkColumnConstraints(p_data.total_otro) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00029_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00029_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00029_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00029_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00029_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00029_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00029_checkTableConstraints
-
-{}
-#+ Check constraints on the "cotb00029.num_oc" column
-#+
-#+ @param p_num_oc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00029_num_oc_checkColumnConstraints(p_num_oc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_oc LIKE cotb00029.num_oc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00029_num_oc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00029.tipo" column
-#+
-#+ @param p_tipo - CHAR(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00029_tipo_checkColumnConstraints(p_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo LIKE cotb00029.tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00029_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00029.cod_sp" column
-#+
-#+ @param p_cod_sp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00029_cod_sp_checkColumnConstraints(p_cod_sp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sp LIKE cotb00029.cod_sp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00029_cod_sp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00029.cod_sp_sec" column
-#+
-#+ @param p_cod_sp_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00029_cod_sp_sec_checkColumnConstraints(p_cod_sp_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sp_sec LIKE cotb00029.cod_sp_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00029_cod_sp_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00029.ship_to" column
-#+
-#+ @param p_ship_to - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00029_ship_to_checkColumnConstraints(p_ship_to)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ship_to LIKE cotb00029.ship_to
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00029_ship_to_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00029.n_a_b" column
-#+
-#+ @param p_n_a_b - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00029_n_a_b_checkColumnConstraints(p_n_a_b)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_n_a_b LIKE cotb00029.n_a_b
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00029_n_a_b_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00029.c_i_d" column
-#+
-#+ @param p_c_i_d - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00029_c_i_d_checkColumnConstraints(p_c_i_d)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_c_i_d LIKE cotb00029.c_i_d
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00029_c_i_d_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00029.c_i_d1" column
-#+
-#+ @param p_c_i_d1 - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00029_c_i_d1_checkColumnConstraints(p_c_i_d1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_c_i_d1 LIKE cotb00029.c_i_d1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00029_c_i_d1_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00029.nota" column
-#+
-#+ @param p_nota - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00029_nota_checkColumnConstraints(p_nota)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nota LIKE cotb00029.nota
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00029_nota_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00029.nota1" column
-#+
-#+ @param p_nota1 - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00029_nota1_checkColumnConstraints(p_nota1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nota1 LIKE cotb00029.nota1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00029_nota1_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00029.desc_flete" column
-#+
-#+ @param p_desc_flete - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00029_desc_flete_checkColumnConstraints(p_desc_flete)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_desc_flete LIKE cotb00029.desc_flete
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00029_desc_flete_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00029.total_flete" column
-#+
-#+ @param p_total_flete - DECIMAL(18,0) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00029_total_flete_checkColumnConstraints(p_total_flete)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_total_flete LIKE cotb00029.total_flete
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00029_total_flete_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00029.desc_valor" column
-#+
-#+ @param p_desc_valor - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00029_desc_valor_checkColumnConstraints(p_desc_valor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_desc_valor LIKE cotb00029.desc_valor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00029_desc_valor_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00029.total_valor" column
-#+
-#+ @param p_total_valor - DECIMAL(18,0) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00029_total_valor_checkColumnConstraints(p_total_valor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_total_valor LIKE cotb00029.total_valor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00029_total_valor_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00029.desc_otro" column
-#+
-#+ @param p_desc_otro - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00029_desc_otro_checkColumnConstraints(p_desc_otro)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_desc_otro LIKE cotb00029.desc_otro
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00029_desc_otro_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00029.total_otro" column
-#+
-#+ @param p_total_otro - DECIMAL(18,0) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00029_total_otro_checkColumnConstraints(p_total_otro)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_total_otro LIKE cotb00029.total_otro
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00029_total_otro_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00029.descripcion" column
-#+
-#+ @param p_descripcion - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00029_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE cotb00029.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00029_descripcion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00029.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00029_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cotb00029.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00029_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00029.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00029_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cotb00029.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00029_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00029.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00029_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cotb00029.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00029_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00029.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00029_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cotb00029.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00029_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00029.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00029_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cotb00029.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00029_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00028" table
-#+
-#+ @param p_data - a row data LIKE cotb00028.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00028_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cotb00028.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cotb00028_dia_checkColumnConstraints(p_data.dia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00028_checkTableConstraints
-
-{}
-#+ Check constraints on the "cotb00028.dia" column
-#+
-#+ @param p_dia - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00028_dia_checkColumnConstraints(p_dia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_dia LIKE cotb00028.dia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00028_dia_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00027" table
-#+
-#+ @param p_data - a row data LIKE cotb00027.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00027_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cotb00027.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cotb00027_cod_embarque_checkColumnConstraints(p_data.cod_embarque) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00027_descrip_emb_checkColumnConstraints(p_data.descrip_emb) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00027_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00027_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00027_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00027_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00027_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00027_checkTableConstraints
-
-{}
-#+ Check constraints on the "cotb00027.cod_embarque" column
-#+
-#+ @param p_cod_embarque - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00027_cod_embarque_checkColumnConstraints(p_cod_embarque)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_embarque LIKE cotb00027.cod_embarque
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_embarque IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_embarque: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00027_cod_embarque_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00027.descrip_emb" column
-#+
-#+ @param p_descrip_emb - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00027_descrip_emb_checkColumnConstraints(p_descrip_emb)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descrip_emb LIKE cotb00027.descrip_emb
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00027_descrip_emb_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00027.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00027_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cotb00027.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00027_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00027.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00027_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cotb00027.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00027_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00027.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00027_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cotb00027.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00027_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00027.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00027_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cotb00027.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00027_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00027.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00027_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cotb00027.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00027_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00025" table
-#+
-#+ @param p_data - a row data LIKE cotb00025.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00025_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cotb00025.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cotb00025_num_oc_checkColumnConstraints(p_data.num_oc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00025_tipo_checkColumnConstraints(p_data.tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00025_num_req_checkColumnConstraints(p_data.num_req) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00025_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00025_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00025_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00025_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00025_fech_emb_checkColumnConstraints(p_data.fech_emb) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00025_fech_ent_checkColumnConstraints(p_data.fech_ent) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00025_fecha_a_checkColumnConstraints(p_data.fecha_a) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00025_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00025_cantidad_r_checkColumnConstraints(p_data.cantidad_r) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00025_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00025_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00025_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00025_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00025_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00025_checkTableConstraints
-
-{}
-#+ Check constraints on the "cotb00025.num_oc" column
-#+
-#+ @param p_num_oc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00025_num_oc_checkColumnConstraints(p_num_oc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_oc LIKE cotb00025.num_oc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00025_num_oc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00025.tipo" column
-#+
-#+ @param p_tipo - CHAR(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00025_tipo_checkColumnConstraints(p_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo LIKE cotb00025.tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00025_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00025.num_req" column
-#+
-#+ @param p_num_req - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00025_num_req_checkColumnConstraints(p_num_req)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_req LIKE cotb00025.num_req
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_num_req IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- num_req: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00025_num_req_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00025.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00025_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE cotb00025.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00025_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00025.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00025_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE cotb00025.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00025_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00025.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00025_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE cotb00025.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00025_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00025.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00025_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE cotb00025.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00025_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00025.fech_emb" column
-#+
-#+ @param p_fech_emb - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00025_fech_emb_checkColumnConstraints(p_fech_emb)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_emb LIKE cotb00025.fech_emb
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00025_fech_emb_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00025.fech_ent" column
-#+
-#+ @param p_fech_ent - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00025_fech_ent_checkColumnConstraints(p_fech_ent)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_ent LIKE cotb00025.fech_ent
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00025_fech_ent_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00025.fecha_a" column
-#+
-#+ @param p_fecha_a - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00025_fecha_a_checkColumnConstraints(p_fecha_a)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_a LIKE cotb00025.fecha_a
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00025_fecha_a_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00025.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00025_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE cotb00025.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00025_cantidad_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00025.cantidad_r" column
-#+
-#+ @param p_cantidad_r - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00025_cantidad_r_checkColumnConstraints(p_cantidad_r)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad_r LIKE cotb00025.cantidad_r
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00025_cantidad_r_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00025.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00025_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cotb00025.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00025_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00025.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00025_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cotb00025.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00025_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00025.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00025_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cotb00025.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00025_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00025.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00025_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cotb00025.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00025_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00025.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00025_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cotb00025.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00025_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00024" table
-#+
-#+ @param p_data - a row data LIKE cotb00024.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00024_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cotb00024.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cotb00024_term_sp_checkColumnConstraints(p_data.term_sp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00024_descrip_term_checkColumnConstraints(p_data.descrip_term) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00024_descrip_ting_checkColumnConstraints(p_data.descrip_ting) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00024_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00024_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00024_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00024_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00024_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00024_checkTableConstraints
-
-{}
-#+ Check constraints on the "cotb00024.term_sp" column
-#+
-#+ @param p_term_sp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00024_term_sp_checkColumnConstraints(p_term_sp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_term_sp LIKE cotb00024.term_sp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00024_term_sp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00024.descrip_term" column
-#+
-#+ @param p_descrip_term - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00024_descrip_term_checkColumnConstraints(p_descrip_term)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descrip_term LIKE cotb00024.descrip_term
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00024_descrip_term_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00024.descrip_ting" column
-#+
-#+ @param p_descrip_ting - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00024_descrip_ting_checkColumnConstraints(p_descrip_ting)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descrip_ting LIKE cotb00024.descrip_ting
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00024_descrip_ting_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00024.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00024_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cotb00024.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00024_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00024.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00024_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cotb00024.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00024_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00024.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00024_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cotb00024.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00024_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00024.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00024_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cotb00024.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00024_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00024.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00024_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cotb00024.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00024_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00022" table
-#+
-#+ @param p_data - a row data LIKE cotb00022.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00022_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cotb00022.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cotb00022_cod_ca_checkColumnConstraints(p_data.cod_ca) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00022_nom_ca_checkColumnConstraints(p_data.nom_ca) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00022_poliza_checkColumnConstraints(p_data.poliza) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00022_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00022_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00022_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00022_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00022_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00022_checkTableConstraints
-
-{}
-#+ Check constraints on the "cotb00022.cod_ca" column
-#+
-#+ @param p_cod_ca - CHAR(4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00022_cod_ca_checkColumnConstraints(p_cod_ca)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_ca LIKE cotb00022.cod_ca
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00022_cod_ca_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00022.nom_ca" column
-#+
-#+ @param p_nom_ca - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00022_nom_ca_checkColumnConstraints(p_nom_ca)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nom_ca LIKE cotb00022.nom_ca
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00022_nom_ca_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00022.poliza" column
-#+
-#+ @param p_poliza - CHAR(15) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00022_poliza_checkColumnConstraints(p_poliza)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_poliza LIKE cotb00022.poliza
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00022_poliza_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00022.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00022_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cotb00022.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00022_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00022.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00022_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cotb00022.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00022_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00022.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00022_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cotb00022.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00022_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00022.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00022_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cotb00022.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00022_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00022.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00022_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cotb00022.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00022_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00019" table
-#+
-#+ @param p_data - a row data LIKE cotb00019.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00019_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cotb00019.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cotb00019_cod_pt_checkColumnConstraints(p_data.cod_pt) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00019_nom_pt_checkColumnConstraints(p_data.nom_pt) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00019_cod_pais_checkColumnConstraints(p_data.cod_pais) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00019_ciudad_checkColumnConstraints(p_data.ciudad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00019_duracion_checkColumnConstraints(p_data.duracion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00019_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00019_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00019_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00019_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00019_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00019_checkTableConstraints
-
-{}
-#+ Check constraints on the "cotb00019.cod_pt" column
-#+
-#+ @param p_cod_pt - CHAR(4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00019_cod_pt_checkColumnConstraints(p_cod_pt)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_pt LIKE cotb00019.cod_pt
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00019_cod_pt_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00019.nom_pt" column
-#+
-#+ @param p_nom_pt - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00019_nom_pt_checkColumnConstraints(p_nom_pt)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nom_pt LIKE cotb00019.nom_pt
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00019_nom_pt_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00019.cod_pais" column
-#+
-#+ @param p_cod_pais - CHAR(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00019_cod_pais_checkColumnConstraints(p_cod_pais)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_pais LIKE cotb00019.cod_pais
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00019_cod_pais_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00019.ciudad" column
-#+
-#+ @param p_ciudad - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00019_ciudad_checkColumnConstraints(p_ciudad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ciudad LIKE cotb00019.ciudad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00019_ciudad_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00019.duracion" column
-#+
-#+ @param p_duracion - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00019_duracion_checkColumnConstraints(p_duracion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_duracion LIKE cotb00019.duracion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00019_duracion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00019.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00019_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cotb00019.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00019_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00019.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00019_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cotb00019.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00019_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00019.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00019_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cotb00019.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00019_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00019.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00019_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cotb00019.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00019_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00019.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00019_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cotb00019.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00019_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00018" table
-#+
-#+ @param p_data - a row data LIKE cotb00018.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00018_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cotb00018.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cotb00018_cod_pais_checkColumnConstraints(p_data.cod_pais) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00018_nom_pais_checkColumnConstraints(p_data.nom_pais) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00018_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00018_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00018_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00018_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00018_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- CALL smarmotech_dbxconstraints_cotb00018_pk_cotb00018_checkUniqueConstraint(p_forUpdate, p_data.cod_pais) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00018_checkTableConstraints
-
-{}
-#+ Check the primary key uniqueness constraint on the "cotb00018"
-#+
-#+ @param p_key - Primary Key
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00018_pk_cotb00018_checkUniqueConstraint(p_forUpdate, p_key)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_key
- RECORD
- cotb00018_cod_pais LIKE cotb00018.cod_pais
- END RECORD
- DEFINE l_key
- RECORD
- cotb00018_cod_pais LIKE cotb00018.cod_pais
- END RECORD
- DEFINE l_where STRING
- DEFINE l_sqlQuery STRING
- DEFINE l_count INTEGER
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- LET l_where = "WHERE cotb00018.cod_pais = ? "
-
- let l_sqlQuery = "SELECT COUNT(*), cod_pais FROM cotb00018 ", l_where, " GROUP BY cod_pais"
-
- PREPARE cur_cotb00018_pk_cotb00018_checkUniqueConstraint FROM l_sqlQuery
- EXECUTE cur_cotb00018_pk_cotb00018_checkUniqueConstraint INTO l_count, l_key.* USING p_key.*
- FREE cur_cotb00018_pk_cotb00018_checkUniqueConstraint
- IF (NOT p_forUpdate AND l_count > 0) OR (p_forUpdate AND l_count > 0 AND p_key.* != l_key.*) THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_pais: " || ERROR_BAM_00002) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00018_pk_cotb00018_checkUniqueConstraint
-
-{}
-#+ Check constraints on the "cotb00018.cod_pais" column
-#+
-#+ @param p_cod_pais - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00018_cod_pais_checkColumnConstraints(p_cod_pais)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_pais LIKE cotb00018.cod_pais
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_pais IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_pais: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00018_cod_pais_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00018.nom_pais" column
-#+
-#+ @param p_nom_pais - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00018_nom_pais_checkColumnConstraints(p_nom_pais)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nom_pais LIKE cotb00018.nom_pais
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00018_nom_pais_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00018.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00018_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cotb00018.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00018_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00018.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00018_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cotb00018.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00018_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00018.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00018_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cotb00018.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00018_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00018.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00018_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cotb00018.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00018_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00018.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00018_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cotb00018.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00018_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00017" table
-#+
-#+ @param p_data - a row data LIKE cotb00017.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00017_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cotb00017.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cotb00017_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00017_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00017_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00017_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00017_procedencia_checkColumnConstraints(p_data.procedencia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00017_cod_pt_checkColumnConstraints(p_data.cod_pt) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00017_via_t_checkColumnConstraints(p_data.via_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00017_seguro_checkColumnConstraints(p_data.seguro) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00017_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00017_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00017_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00017_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00017_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00017_checkTableConstraints
-
-{}
-#+ Check constraints on the "cotb00017.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00017_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE cotb00017.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00017_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00017.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00017_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE cotb00017.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00017_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00017.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00017_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE cotb00017.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00017_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00017.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00017_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE cotb00017.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00017_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00017.procedencia" column
-#+
-#+ @param p_procedencia - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00017_procedencia_checkColumnConstraints(p_procedencia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_procedencia LIKE cotb00017.procedencia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00017_procedencia_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00017.cod_pt" column
-#+
-#+ @param p_cod_pt - CHAR(4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00017_cod_pt_checkColumnConstraints(p_cod_pt)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_pt LIKE cotb00017.cod_pt
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00017_cod_pt_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00017.via_t" column
-#+
-#+ @param p_via_t - CHAR(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00017_via_t_checkColumnConstraints(p_via_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_via_t LIKE cotb00017.via_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00017_via_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00017.seguro" column
-#+
-#+ @param p_seguro - DECIMAL(5,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00017_seguro_checkColumnConstraints(p_seguro)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_seguro LIKE cotb00017.seguro
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00017_seguro_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00017.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00017_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cotb00017.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00017_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00017.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00017_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cotb00017.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00017_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00017.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00017_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cotb00017.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00017_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00017.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00017_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cotb00017.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00017_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00017.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00017_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cotb00017.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00017_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00015" table
-#+
-#+ @param p_data - a row data LIKE cotb00015.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00015_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cotb00015.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cotb00015_num_oc_checkColumnConstraints(p_data.num_oc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00015_num_req_checkColumnConstraints(p_data.num_req) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00015_tipo_checkColumnConstraints(p_data.tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00015_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00015_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00015_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00015_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00015_num_parte_checkColumnConstraints(p_data.num_parte) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00015_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00015_precio_checkColumnConstraints(p_data.precio) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00015_cod_mon_checkColumnConstraints(p_data.cod_mon) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00015_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00015_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00015_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00015_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00015_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00015_checkTableConstraints
-
-{}
-#+ Check constraints on the "cotb00015.num_oc" column
-#+
-#+ @param p_num_oc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00015_num_oc_checkColumnConstraints(p_num_oc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_oc LIKE cotb00015.num_oc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00015_num_oc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00015.num_req" column
-#+
-#+ @param p_num_req - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00015_num_req_checkColumnConstraints(p_num_req)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_req LIKE cotb00015.num_req
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00015_num_req_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00015.tipo" column
-#+
-#+ @param p_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00015_tipo_checkColumnConstraints(p_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo LIKE cotb00015.tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00015_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00015.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00015_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE cotb00015.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00015_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00015.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00015_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE cotb00015.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00015_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00015.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00015_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE cotb00015.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00015_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00015.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00015_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE cotb00015.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00015_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00015.num_parte" column
-#+
-#+ @param p_num_parte - CHAR(12) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00015_num_parte_checkColumnConstraints(p_num_parte)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_parte LIKE cotb00015.num_parte
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00015_num_parte_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00015.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00015_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE cotb00015.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00015_cantidad_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00015.precio" column
-#+
-#+ @param p_precio - DECIMAL(11,3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00015_precio_checkColumnConstraints(p_precio)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_precio LIKE cotb00015.precio
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00015_precio_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00015.cod_mon" column
-#+
-#+ @param p_cod_mon - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00015_cod_mon_checkColumnConstraints(p_cod_mon)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mon LIKE cotb00015.cod_mon
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00015_cod_mon_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00015.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00015_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cotb00015.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00015_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00015.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00015_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cotb00015.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00015_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00015.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00015_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cotb00015.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00015_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00015.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00015_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cotb00015.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00015_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00015.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00015_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cotb00015.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00015_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00014" table
-#+
-#+ @param p_data - a row data LIKE cotb00014.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00014_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cotb00014.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cotb00014_num_oc_checkColumnConstraints(p_data.num_oc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00014_tipo_checkColumnConstraints(p_data.tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00014_fech_oc_checkColumnConstraints(p_data.fech_oc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00014_num_pr_checkColumnConstraints(p_data.num_pr) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00014_cod_sp_checkColumnConstraints(p_data.cod_sp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00014_cod_sp_sec_checkColumnConstraints(p_data.cod_sp_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00014_term_sp_checkColumnConstraints(p_data.term_sp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00014_via_checkColumnConstraints(p_data.via) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00014_enviada_checkColumnConstraints(p_data.enviada) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00014_fech_enviada_checkColumnConstraints(p_data.fech_enviada) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00014_pago_checkColumnConstraints(p_data.pago) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00014_fech_pago_checkColumnConstraints(p_data.fech_pago) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00014_cierre_checkColumnConstraints(p_data.cierre) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00014_cod_pt_checkColumnConstraints(p_data.cod_pt) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00014_c_flete_checkColumnConstraints(p_data.c_flete) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00014_otros_g_checkColumnConstraints(p_data.otros_g) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00014_detalle_checkColumnConstraints(p_data.detalle) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00014_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00014_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00014_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00014_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00014_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00014_checkTableConstraints
-
-{}
-#+ Check constraints on the "cotb00014.num_oc" column
-#+
-#+ @param p_num_oc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00014_num_oc_checkColumnConstraints(p_num_oc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_oc LIKE cotb00014.num_oc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_num_oc IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- num_oc: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00014_num_oc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00014.tipo" column
-#+
-#+ @param p_tipo - CHAR(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00014_tipo_checkColumnConstraints(p_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo LIKE cotb00014.tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00014_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00014.fech_oc" column
-#+
-#+ @param p_fech_oc - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00014_fech_oc_checkColumnConstraints(p_fech_oc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_oc LIKE cotb00014.fech_oc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00014_fech_oc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00014.num_pr" column
-#+
-#+ @param p_num_pr - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00014_num_pr_checkColumnConstraints(p_num_pr)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_pr LIKE cotb00014.num_pr
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00014_num_pr_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00014.cod_sp" column
-#+
-#+ @param p_cod_sp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00014_cod_sp_checkColumnConstraints(p_cod_sp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sp LIKE cotb00014.cod_sp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00014_cod_sp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00014.cod_sp_sec" column
-#+
-#+ @param p_cod_sp_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00014_cod_sp_sec_checkColumnConstraints(p_cod_sp_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sp_sec LIKE cotb00014.cod_sp_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00014_cod_sp_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00014.term_sp" column
-#+
-#+ @param p_term_sp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00014_term_sp_checkColumnConstraints(p_term_sp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_term_sp LIKE cotb00014.term_sp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00014_term_sp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00014.via" column
-#+
-#+ @param p_via - CHAR(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00014_via_checkColumnConstraints(p_via)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_via LIKE cotb00014.via
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00014_via_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00014.enviada" column
-#+
-#+ @param p_enviada - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00014_enviada_checkColumnConstraints(p_enviada)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_enviada LIKE cotb00014.enviada
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00014_enviada_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00014.fech_enviada" column
-#+
-#+ @param p_fech_enviada - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00014_fech_enviada_checkColumnConstraints(p_fech_enviada)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_enviada LIKE cotb00014.fech_enviada
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00014_fech_enviada_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00014.pago" column
-#+
-#+ @param p_pago - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00014_pago_checkColumnConstraints(p_pago)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_pago LIKE cotb00014.pago
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00014_pago_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00014.fech_pago" column
-#+
-#+ @param p_fech_pago - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00014_fech_pago_checkColumnConstraints(p_fech_pago)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_pago LIKE cotb00014.fech_pago
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00014_fech_pago_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00014.cierre" column
-#+
-#+ @param p_cierre - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00014_cierre_checkColumnConstraints(p_cierre)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cierre LIKE cotb00014.cierre
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00014_cierre_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00014.cod_pt" column
-#+
-#+ @param p_cod_pt - CHAR(4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00014_cod_pt_checkColumnConstraints(p_cod_pt)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_pt LIKE cotb00014.cod_pt
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00014_cod_pt_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00014.c_flete" column
-#+
-#+ @param p_c_flete - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00014_c_flete_checkColumnConstraints(p_c_flete)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_c_flete LIKE cotb00014.c_flete
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00014_c_flete_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00014.otros_g" column
-#+
-#+ @param p_otros_g - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00014_otros_g_checkColumnConstraints(p_otros_g)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_otros_g LIKE cotb00014.otros_g
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00014_otros_g_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00014.detalle" column
-#+
-#+ @param p_detalle - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00014_detalle_checkColumnConstraints(p_detalle)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_detalle LIKE cotb00014.detalle
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00014_detalle_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00014.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00014_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cotb00014.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00014_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00014.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00014_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cotb00014.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00014_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00014.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00014_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cotb00014.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00014_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00014.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00014_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cotb00014.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00014_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00014.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00014_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cotb00014.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00014_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00013" table
-#+
-#+ @param p_data - a row data LIKE cotb00013.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00013_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cotb00013.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cotb00013_num_pr_checkColumnConstraints(p_data.num_pr) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00013_tipo_checkColumnConstraints(p_data.tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00013_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00013_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00013_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00013_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00013_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00013_costo_mp_checkColumnConstraints(p_data.costo_mp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00013_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00013_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00013_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00013_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00013_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00013_checkTableConstraints
-
-{}
-#+ Check constraints on the "cotb00013.num_pr" column
-#+
-#+ @param p_num_pr - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00013_num_pr_checkColumnConstraints(p_num_pr)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_pr LIKE cotb00013.num_pr
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00013_num_pr_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00013.tipo" column
-#+
-#+ @param p_tipo - CHAR(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00013_tipo_checkColumnConstraints(p_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo LIKE cotb00013.tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00013_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00013.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00013_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE cotb00013.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00013_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00013.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00013_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE cotb00013.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00013_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00013.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00013_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE cotb00013.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00013_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00013.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00013_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE cotb00013.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00013_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00013.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00013_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE cotb00013.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00013_cantidad_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00013.costo_mp" column
-#+
-#+ @param p_costo_mp - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00013_costo_mp_checkColumnConstraints(p_costo_mp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_costo_mp LIKE cotb00013.costo_mp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00013_costo_mp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00013.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00013_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cotb00013.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00013_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00013.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00013_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cotb00013.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00013_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00013.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00013_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cotb00013.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00013_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00013.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00013_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cotb00013.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00013_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00013.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00013_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cotb00013.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00013_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00012" table
-#+
-#+ @param p_data - a row data LIKE cotb00012.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00012_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cotb00012.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cotb00012_num_pr_checkColumnConstraints(p_data.num_pr) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00012_tipo_checkColumnConstraints(p_data.tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00012_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00012_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00012_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00012_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00012_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00012_costo_mp_checkColumnConstraints(p_data.costo_mp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00012_fech_emb_checkColumnConstraints(p_data.fech_emb) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00012_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00012_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00012_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00012_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00012_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00012_checkTableConstraints
-
-{}
-#+ Check constraints on the "cotb00012.num_pr" column
-#+
-#+ @param p_num_pr - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00012_num_pr_checkColumnConstraints(p_num_pr)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_pr LIKE cotb00012.num_pr
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00012_num_pr_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00012.tipo" column
-#+
-#+ @param p_tipo - CHAR(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00012_tipo_checkColumnConstraints(p_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo LIKE cotb00012.tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00012_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00012.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00012_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE cotb00012.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00012_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00012.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00012_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE cotb00012.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00012_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00012.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00012_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE cotb00012.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00012_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00012.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00012_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE cotb00012.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00012_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00012.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00012_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE cotb00012.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00012_cantidad_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00012.costo_mp" column
-#+
-#+ @param p_costo_mp - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00012_costo_mp_checkColumnConstraints(p_costo_mp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_costo_mp LIKE cotb00012.costo_mp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00012_costo_mp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00012.fech_emb" column
-#+
-#+ @param p_fech_emb - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00012_fech_emb_checkColumnConstraints(p_fech_emb)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_emb LIKE cotb00012.fech_emb
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00012_fech_emb_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00012.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00012_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cotb00012.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00012_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00012.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00012_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cotb00012.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00012_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00012.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00012_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cotb00012.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00012_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00012.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00012_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cotb00012.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00012_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00012.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00012_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cotb00012.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00012_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00011" table
-#+
-#+ @param p_data - a row data LIKE cotb00011.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00011_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cotb00011.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cotb00011_num_pr_checkColumnConstraints(p_data.num_pr) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00011_cod_sp_checkColumnConstraints(p_data.cod_sp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00011_cod_sp_sec_checkColumnConstraints(p_data.cod_sp_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00011_cod_pais_checkColumnConstraints(p_data.cod_pais) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00011_cod_pt_checkColumnConstraints(p_data.cod_pt) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00011_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00011_flete_checkColumnConstraints(p_data.flete) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00011_decl_cons_checkColumnConstraints(p_data.decl_cons) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00011_otros_imp_checkColumnConstraints(p_data.otros_imp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00011_term_sp_checkColumnConstraints(p_data.term_sp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00011_descrip_term_checkColumnConstraints(p_data.descrip_term) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00011_via_checkColumnConstraints(p_data.via) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00011_procesada_checkColumnConstraints(p_data.procesada) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00011_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00011_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00011_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00011_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00011_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00011_checkTableConstraints
-
-{}
-#+ Check constraints on the "cotb00011.num_pr" column
-#+
-#+ @param p_num_pr - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00011_num_pr_checkColumnConstraints(p_num_pr)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_pr LIKE cotb00011.num_pr
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00011_num_pr_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00011.cod_sp" column
-#+
-#+ @param p_cod_sp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00011_cod_sp_checkColumnConstraints(p_cod_sp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sp LIKE cotb00011.cod_sp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00011_cod_sp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00011.cod_sp_sec" column
-#+
-#+ @param p_cod_sp_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00011_cod_sp_sec_checkColumnConstraints(p_cod_sp_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sp_sec LIKE cotb00011.cod_sp_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00011_cod_sp_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00011.cod_pais" column
-#+
-#+ @param p_cod_pais - CHAR(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00011_cod_pais_checkColumnConstraints(p_cod_pais)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_pais LIKE cotb00011.cod_pais
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00011_cod_pais_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00011.cod_pt" column
-#+
-#+ @param p_cod_pt - CHAR(4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00011_cod_pt_checkColumnConstraints(p_cod_pt)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_pt LIKE cotb00011.cod_pt
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00011_cod_pt_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00011.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00011_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE cotb00011.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00011_fecha_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00011.flete" column
-#+
-#+ @param p_flete - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00011_flete_checkColumnConstraints(p_flete)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_flete LIKE cotb00011.flete
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00011_flete_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00011.decl_cons" column
-#+
-#+ @param p_decl_cons - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00011_decl_cons_checkColumnConstraints(p_decl_cons)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_decl_cons LIKE cotb00011.decl_cons
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00011_decl_cons_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00011.otros_imp" column
-#+
-#+ @param p_otros_imp - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00011_otros_imp_checkColumnConstraints(p_otros_imp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_otros_imp LIKE cotb00011.otros_imp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00011_otros_imp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00011.term_sp" column
-#+
-#+ @param p_term_sp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00011_term_sp_checkColumnConstraints(p_term_sp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_term_sp LIKE cotb00011.term_sp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00011_term_sp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00011.descrip_term" column
-#+
-#+ @param p_descrip_term - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00011_descrip_term_checkColumnConstraints(p_descrip_term)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descrip_term LIKE cotb00011.descrip_term
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00011_descrip_term_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00011.via" column
-#+
-#+ @param p_via - CHAR(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00011_via_checkColumnConstraints(p_via)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_via LIKE cotb00011.via
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00011_via_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00011.procesada" column
-#+
-#+ @param p_procesada - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00011_procesada_checkColumnConstraints(p_procesada)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_procesada LIKE cotb00011.procesada
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00011_procesada_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00011.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00011_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cotb00011.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00011_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00011.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00011_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cotb00011.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00011_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00011.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00011_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cotb00011.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00011_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00011.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00011_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cotb00011.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00011_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00011.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00011_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cotb00011.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00011_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00010" table
-#+
-#+ @param p_data - a row data LIKE cotb00010.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00010_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cotb00010.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cotb00010_tipo_checkColumnConstraints(p_data.tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00010_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00010_checkTableConstraints
-
-{}
-#+ Check constraints on the "cotb00010.tipo" column
-#+
-#+ @param p_tipo - CHAR(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00010_tipo_checkColumnConstraints(p_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo LIKE cotb00010.tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00010_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00010.descripcion" column
-#+
-#+ @param p_descripcion - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00010_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE cotb00010.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00010_descripcion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00008" table
-#+
-#+ @param p_data - a row data LIKE cotb00008.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00008_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cotb00008.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cotb00008_num_req_checkColumnConstraints(p_data.num_req) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00008_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00008_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00008_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00008_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00008_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00008_cod_sp_checkColumnConstraints(p_data.cod_sp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00008_cod_sp_sec_checkColumnConstraints(p_data.cod_sp_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00008_precio_checkColumnConstraints(p_data.precio) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00008_procesada_checkColumnConstraints(p_data.procesada) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00008_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00008_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00008_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00008_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00008_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00008_checkTableConstraints
-
-{}
-#+ Check constraints on the "cotb00008.num_req" column
-#+
-#+ @param p_num_req - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00008_num_req_checkColumnConstraints(p_num_req)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_req LIKE cotb00008.num_req
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00008_num_req_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00008.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00008_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE cotb00008.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00008_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00008.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00008_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE cotb00008.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00008_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00008.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00008_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE cotb00008.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00008_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00008.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00008_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE cotb00008.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00008_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00008.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00008_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE cotb00008.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00008_cantidad_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00008.cod_sp" column
-#+
-#+ @param p_cod_sp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00008_cod_sp_checkColumnConstraints(p_cod_sp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sp LIKE cotb00008.cod_sp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00008_cod_sp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00008.cod_sp_sec" column
-#+
-#+ @param p_cod_sp_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00008_cod_sp_sec_checkColumnConstraints(p_cod_sp_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sp_sec LIKE cotb00008.cod_sp_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00008_cod_sp_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00008.precio" column
-#+
-#+ @param p_precio - DECIMAL(11,3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00008_precio_checkColumnConstraints(p_precio)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_precio LIKE cotb00008.precio
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00008_precio_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00008.procesada" column
-#+
-#+ @param p_procesada - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00008_procesada_checkColumnConstraints(p_procesada)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_procesada LIKE cotb00008.procesada
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00008_procesada_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00008.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00008_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cotb00008.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00008_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00008.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00008_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cotb00008.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00008_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00008.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00008_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cotb00008.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00008_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00008.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00008_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cotb00008.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00008_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00008.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00008_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cotb00008.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00008_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00006" table
-#+
-#+ @param p_data - a row data LIKE cotb00006.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00006_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cotb00006.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cotb00006_num_req_checkColumnConstraints(p_data.num_req) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00006_fech_req_checkColumnConstraints(p_data.fech_req) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00006_departamento_checkColumnConstraints(p_data.departamento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00006_cod_emp_sec_checkColumnConstraints(p_data.cod_emp_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00006_fech_ent_checkColumnConstraints(p_data.fech_ent) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00006_uso_checkColumnConstraints(p_data.uso) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00006_prioridad_checkColumnConstraints(p_data.prioridad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00006_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00006_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00006_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00006_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00006_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00006_checkTableConstraints
-
-{}
-#+ Check constraints on the "cotb00006.num_req" column
-#+
-#+ @param p_num_req - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00006_num_req_checkColumnConstraints(p_num_req)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_req LIKE cotb00006.num_req
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_num_req IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- num_req: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00006_num_req_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00006.fech_req" column
-#+
-#+ @param p_fech_req - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00006_fech_req_checkColumnConstraints(p_fech_req)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_req LIKE cotb00006.fech_req
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00006_fech_req_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00006.departamento" column
-#+
-#+ @param p_departamento - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00006_departamento_checkColumnConstraints(p_departamento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_departamento LIKE cotb00006.departamento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00006_departamento_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00006.cod_emp_sec" column
-#+
-#+ @param p_cod_emp_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00006_cod_emp_sec_checkColumnConstraints(p_cod_emp_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_emp_sec LIKE cotb00006.cod_emp_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00006_cod_emp_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00006.fech_ent" column
-#+
-#+ @param p_fech_ent - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00006_fech_ent_checkColumnConstraints(p_fech_ent)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_ent LIKE cotb00006.fech_ent
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00006_fech_ent_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00006.uso" column
-#+
-#+ @param p_uso - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00006_uso_checkColumnConstraints(p_uso)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_uso LIKE cotb00006.uso
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00006_uso_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00006.prioridad" column
-#+
-#+ @param p_prioridad - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00006_prioridad_checkColumnConstraints(p_prioridad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_prioridad LIKE cotb00006.prioridad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00006_prioridad_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00006.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00006_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cotb00006.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00006_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00006.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00006_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cotb00006.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00006_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00006.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00006_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cotb00006.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00006_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00006.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00006_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cotb00006.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00006_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00006.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00006_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cotb00006.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00006_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00005" table
-#+
-#+ @param p_data - a row data LIKE cotb00005.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00005_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cotb00005.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cotb00005_cod_nab_checkColumnConstraints(p_data.cod_nab) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00005_descrip_esp_checkColumnConstraints(p_data.descrip_esp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00005_descrip_ing_checkColumnConstraints(p_data.descrip_ing) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00005_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00005_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00005_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00005_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00005_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00005_checkTableConstraints
-
-{}
-#+ Check constraints on the "cotb00005.cod_nab" column
-#+
-#+ @param p_cod_nab - CHAR(11) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00005_cod_nab_checkColumnConstraints(p_cod_nab)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_nab LIKE cotb00005.cod_nab
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00005_cod_nab_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00005.descrip_esp" column
-#+
-#+ @param p_descrip_esp - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00005_descrip_esp_checkColumnConstraints(p_descrip_esp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descrip_esp LIKE cotb00005.descrip_esp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00005_descrip_esp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00005.descrip_ing" column
-#+
-#+ @param p_descrip_ing - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00005_descrip_ing_checkColumnConstraints(p_descrip_ing)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descrip_ing LIKE cotb00005.descrip_ing
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00005_descrip_ing_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00005.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00005_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cotb00005.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00005_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00005.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00005_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cotb00005.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00005_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00005.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00005_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cotb00005.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00005_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00005.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00005_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cotb00005.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00005_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00005.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00005_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cotb00005.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00005_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00004" table
-#+
-#+ @param p_data - a row data LIKE cotb00004.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00004_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cotb00004.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cotb00004_cod_embarque_checkColumnConstraints(p_data.cod_embarque) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00004_cod_furg_checkColumnConstraints(p_data.cod_furg) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00004_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00004_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00004_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00004_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00004_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00004_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00004_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00004_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00004_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00004_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00004_checkTableConstraints
-
-{}
-#+ Check constraints on the "cotb00004.cod_embarque" column
-#+
-#+ @param p_cod_embarque - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00004_cod_embarque_checkColumnConstraints(p_cod_embarque)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_embarque LIKE cotb00004.cod_embarque
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00004_cod_embarque_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00004.cod_furg" column
-#+
-#+ @param p_cod_furg - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00004_cod_furg_checkColumnConstraints(p_cod_furg)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_furg LIKE cotb00004.cod_furg
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00004_cod_furg_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00004.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00004_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE cotb00004.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00004_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00004.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00004_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE cotb00004.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00004_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00004.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00004_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE cotb00004.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00004_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00004.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00004_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE cotb00004.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00004_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00004.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00004_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE cotb00004.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00004_cantidad_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00004.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00004_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cotb00004.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00004_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00004.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00004_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cotb00004.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00004_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00004.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00004_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cotb00004.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00004_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00004.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00004_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cotb00004.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00004_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00004.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00004_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cotb00004.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00004_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00003" table
-#+
-#+ @param p_data - a row data LIKE cotb00003.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00003_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cotb00003.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cotb00003_cod_furg_checkColumnConstraints(p_data.cod_furg) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00003_descrip_furg_checkColumnConstraints(p_data.descrip_furg) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00003_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00003_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00003_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00003_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00003_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00003_checkTableConstraints
-
-{}
-#+ Check constraints on the "cotb00003.cod_furg" column
-#+
-#+ @param p_cod_furg - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00003_cod_furg_checkColumnConstraints(p_cod_furg)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_furg LIKE cotb00003.cod_furg
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00003_cod_furg_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00003.descrip_furg" column
-#+
-#+ @param p_descrip_furg - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00003_descrip_furg_checkColumnConstraints(p_descrip_furg)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descrip_furg LIKE cotb00003.descrip_furg
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00003_descrip_furg_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00003.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00003_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cotb00003.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00003_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00003.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00003_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cotb00003.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00003_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00003.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00003_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cotb00003.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00003_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00003.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00003_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cotb00003.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00003_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00003.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00003_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cotb00003.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00003_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00002" table
-#+
-#+ @param p_data - a row data LIKE cotb00002.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00002_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cotb00002.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cotb00002_cod_sp_checkColumnConstraints(p_data.cod_sp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00002_cod_sp_sec_checkColumnConstraints(p_data.cod_sp_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00002_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00002_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00002_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00002_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00002_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00002_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00002_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00002_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00002_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00002_checkTableConstraints
-
-{}
-#+ Check constraints on the "cotb00002.cod_sp" column
-#+
-#+ @param p_cod_sp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00002_cod_sp_checkColumnConstraints(p_cod_sp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sp LIKE cotb00002.cod_sp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00002_cod_sp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00002.cod_sp_sec" column
-#+
-#+ @param p_cod_sp_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00002_cod_sp_sec_checkColumnConstraints(p_cod_sp_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sp_sec LIKE cotb00002.cod_sp_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00002_cod_sp_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00002.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00002_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE cotb00002.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00002_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00002.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00002_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE cotb00002.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00002_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00002.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00002_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE cotb00002.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00002_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00002.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00002_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE cotb00002.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00002_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00002.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00002_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cotb00002.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00002_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00002.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00002_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cotb00002.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00002_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00002.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00002_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cotb00002.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00002_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00002.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00002_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cotb00002.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00002_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00002.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00002_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cotb00002.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00002_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00001" table
-#+
-#+ @param p_data - a row data LIKE cotb00001.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00001_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cotb00001.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cotb00001_cod_sp_checkColumnConstraints(p_data.cod_sp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00001_cod_sp_sec_checkColumnConstraints(p_data.cod_sp_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00001_nom_sp_checkColumnConstraints(p_data.nom_sp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00001_dir_sp_checkColumnConstraints(p_data.dir_sp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00001_ciu_sp_checkColumnConstraints(p_data.ciu_sp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00001_cod_pais_checkColumnConstraints(p_data.cod_pais) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00001_tel_sp_checkColumnConstraints(p_data.tel_sp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00001_area_sp_checkColumnConstraints(p_data.area_sp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00001_fax_sp_checkColumnConstraints(p_data.fax_sp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00001_cont_sp_checkColumnConstraints(p_data.cont_sp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00001_term_sp_checkColumnConstraints(p_data.term_sp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00001_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00001_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00001_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00001_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00001_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00001_checkTableConstraints
-
-{}
-#+ Check constraints on the "cotb00001.cod_sp" column
-#+
-#+ @param p_cod_sp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00001_cod_sp_checkColumnConstraints(p_cod_sp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sp LIKE cotb00001.cod_sp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00001_cod_sp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00001.cod_sp_sec" column
-#+
-#+ @param p_cod_sp_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00001_cod_sp_sec_checkColumnConstraints(p_cod_sp_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sp_sec LIKE cotb00001.cod_sp_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00001_cod_sp_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00001.nom_sp" column
-#+
-#+ @param p_nom_sp - VARCHAR2(41) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00001_nom_sp_checkColumnConstraints(p_nom_sp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nom_sp LIKE cotb00001.nom_sp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00001_nom_sp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00001.dir_sp" column
-#+
-#+ @param p_dir_sp - VARCHAR2(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00001_dir_sp_checkColumnConstraints(p_dir_sp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_dir_sp LIKE cotb00001.dir_sp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00001_dir_sp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00001.ciu_sp" column
-#+
-#+ @param p_ciu_sp - VARCHAR2(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00001_ciu_sp_checkColumnConstraints(p_ciu_sp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ciu_sp LIKE cotb00001.ciu_sp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00001_ciu_sp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00001.cod_pais" column
-#+
-#+ @param p_cod_pais - VARCHAR2(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00001_cod_pais_checkColumnConstraints(p_cod_pais)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_pais LIKE cotb00001.cod_pais
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00001_cod_pais_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00001.tel_sp" column
-#+
-#+ @param p_tel_sp - VARCHAR2(25) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00001_tel_sp_checkColumnConstraints(p_tel_sp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tel_sp LIKE cotb00001.tel_sp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00001_tel_sp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00001.area_sp" column
-#+
-#+ @param p_area_sp - VARCHAR2(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00001_area_sp_checkColumnConstraints(p_area_sp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_area_sp LIKE cotb00001.area_sp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00001_area_sp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00001.fax_sp" column
-#+
-#+ @param p_fax_sp - VARCHAR2(25) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00001_fax_sp_checkColumnConstraints(p_fax_sp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fax_sp LIKE cotb00001.fax_sp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00001_fax_sp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00001.cont_sp" column
-#+
-#+ @param p_cont_sp - VARCHAR2(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00001_cont_sp_checkColumnConstraints(p_cont_sp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cont_sp LIKE cotb00001.cont_sp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00001_cont_sp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00001.term_sp" column
-#+
-#+ @param p_term_sp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00001_term_sp_checkColumnConstraints(p_term_sp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_term_sp LIKE cotb00001.term_sp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00001_term_sp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00001.status_t" column
-#+
-#+ @param p_status_t - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00001_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cotb00001.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00001_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00001.us_crea" column
-#+
-#+ @param p_us_crea - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00001_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cotb00001.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00001_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00001.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00001_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cotb00001.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00001_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00001.us_mod" column
-#+
-#+ @param p_us_mod - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00001_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cotb00001.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00001_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cotb00001.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00001_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cotb00001.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cotb00001_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "correos" table
-#+
-#+ @param p_data - a row data LIKE correos.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_correos_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE correos.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_correos_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_correos_emailto_checkColumnConstraints(p_data.emailto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_correos_usubject_checkColumnConstraints(p_data.usubject) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_correos_cuerpo_checkColumnConstraints(p_data.cuerpo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.correos_checkTableConstraints
-
-{}
-#+ Check constraints on the "correos.fecha" column
-#+
-#+ @param p_fecha - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_correos_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE correos.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.correos_fecha_checkColumnConstraints
-
-{}
-#+ Check constraints on the "correos.emailto" column
-#+
-#+ @param p_emailto - CHAR(150) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_correos_emailto_checkColumnConstraints(p_emailto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_emailto LIKE correos.emailto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.correos_emailto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "correos.usubject" column
-#+
-#+ @param p_usubject - CHAR(150) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_correos_usubject_checkColumnConstraints(p_usubject)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_usubject LIKE correos.usubject
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.correos_usubject_checkColumnConstraints
-
-{}
-#+ Check constraints on the "correos.cuerpo" column
-#+
-#+ @param p_cuerpo - CHAR(150) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_correos_cuerpo_checkColumnConstraints(p_cuerpo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cuerpo LIKE correos.cuerpo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.correos_cuerpo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "companias" table
-#+
-#+ @param p_data - a row data LIKE companias.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_companias_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE companias.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_companias_cod_comp_checkColumnConstraints(p_data.cod_comp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_companias_nombre_checkColumnConstraints(p_data.nombre) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_companias_rnc_checkColumnConstraints(p_data.rnc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_companias_direccion_checkColumnConstraints(p_data.direccion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_companias_telefono_checkColumnConstraints(p_data.telefono) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_companias_fax_checkColumnConstraints(p_data.fax) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_companias_administrador_checkColumnConstraints(p_data.administrador) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_companias_email_checkColumnConstraints(p_data.email) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_companias_paginaweb_checkColumnConstraints(p_data.paginaweb) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_companias_direccion1_checkColumnConstraints(p_data.direccion1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_companias_telefono1_checkColumnConstraints(p_data.telefono1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_companias_fax1_checkColumnConstraints(p_data.fax1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_companias_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_companias_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_companias_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_companias_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_companias_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_companias_codnomina_checkColumnConstraints(p_data.codnomina) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_companias_cuenta_no_inv_checkColumnConstraints(p_data.cuenta_no_inv) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_companias_logo_file_checkColumnConstraints(p_data.logo_file) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.companias_checkTableConstraints
-
-{}
-#+ Check constraints on the "companias.cod_comp" column
-#+
-#+ @param p_cod_comp - CHAR(5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_companias_cod_comp_checkColumnConstraints(p_cod_comp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_comp LIKE companias.cod_comp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_comp IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_comp: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.companias_cod_comp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "companias.nombre" column
-#+
-#+ @param p_nombre - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_companias_nombre_checkColumnConstraints(p_nombre)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombre LIKE companias.nombre
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.companias_nombre_checkColumnConstraints
-
-{}
-#+ Check constraints on the "companias.rnc" column
-#+
-#+ @param p_rnc - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_companias_rnc_checkColumnConstraints(p_rnc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_rnc LIKE companias.rnc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.companias_rnc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "companias.direccion" column
-#+
-#+ @param p_direccion - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_companias_direccion_checkColumnConstraints(p_direccion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_direccion LIKE companias.direccion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.companias_direccion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "companias.telefono" column
-#+
-#+ @param p_telefono - CHAR(15) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_companias_telefono_checkColumnConstraints(p_telefono)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_telefono LIKE companias.telefono
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.companias_telefono_checkColumnConstraints
-
-{}
-#+ Check constraints on the "companias.fax" column
-#+
-#+ @param p_fax - CHAR(15) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_companias_fax_checkColumnConstraints(p_fax)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fax LIKE companias.fax
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.companias_fax_checkColumnConstraints
-
-{}
-#+ Check constraints on the "companias.administrador" column
-#+
-#+ @param p_administrador - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_companias_administrador_checkColumnConstraints(p_administrador)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_administrador LIKE companias.administrador
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.companias_administrador_checkColumnConstraints
-
-{}
-#+ Check constraints on the "companias.email" column
-#+
-#+ @param p_email - CHAR(100) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_companias_email_checkColumnConstraints(p_email)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_email LIKE companias.email
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.companias_email_checkColumnConstraints
-
-{}
-#+ Check constraints on the "companias.paginaweb" column
-#+
-#+ @param p_paginaweb - CHAR(100) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_companias_paginaweb_checkColumnConstraints(p_paginaweb)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_paginaweb LIKE companias.paginaweb
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.companias_paginaweb_checkColumnConstraints
-
-{}
-#+ Check constraints on the "companias.direccion1" column
-#+
-#+ @param p_direccion1 - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_companias_direccion1_checkColumnConstraints(p_direccion1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_direccion1 LIKE companias.direccion1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.companias_direccion1_checkColumnConstraints
-
-{}
-#+ Check constraints on the "companias.telefono1" column
-#+
-#+ @param p_telefono1 - CHAR(15) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_companias_telefono1_checkColumnConstraints(p_telefono1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_telefono1 LIKE companias.telefono1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.companias_telefono1_checkColumnConstraints
-
-{}
-#+ Check constraints on the "companias.fax1" column
-#+
-#+ @param p_fax1 - CHAR(15) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_companias_fax1_checkColumnConstraints(p_fax1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fax1 LIKE companias.fax1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.companias_fax1_checkColumnConstraints
-
-{}
-#+ Check constraints on the "companias.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_companias_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE companias.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.companias_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "companias.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_companias_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE companias.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.companias_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "companias.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_companias_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE companias.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.companias_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "companias.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_companias_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE companias.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.companias_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "companias.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_companias_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE companias.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.companias_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "companias.codnomina" column
-#+
-#+ @param p_codnomina - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_companias_codnomina_checkColumnConstraints(p_codnomina)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codnomina LIKE companias.codnomina
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.companias_codnomina_checkColumnConstraints
-
-{}
-#+ Check constraints on the "companias.cuenta_no_inv" column
-#+
-#+ @param p_cuenta_no_inv - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_companias_cuenta_no_inv_checkColumnConstraints(p_cuenta_no_inv)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cuenta_no_inv LIKE companias.cuenta_no_inv
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.companias_cuenta_no_inv_checkColumnConstraints
-
-{}
-#+ Check constraints on the "companias.logo_file" column
-#+
-#+ @param p_logo_file - CHAR(200) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_companias_logo_file_checkColumnConstraints(p_logo_file)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_logo_file LIKE companias.logo_file
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.companias_logo_file_checkColumnConstraints
-
-{}
-#+ Check constraints on the "codigos22" table
-#+
-#+ @param p_data - a row data LIKE codigos22.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_codigos22_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE codigos22.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_codigos22_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_codigos22_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_codigos22_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_codigos22_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.codigos22_checkTableConstraints
-
-{}
-#+ Check constraints on the "codigos22.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_codigos22_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE codigos22.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.codigos22_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "codigos22.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_codigos22_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE codigos22.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.codigos22_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "codigos22.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_codigos22_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE codigos22.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.codigos22_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "codigos22.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_codigos22_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE codigos22.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.codigos22_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "codigos" table
-#+
-#+ @param p_data - a row data LIKE codigos.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_codigos_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE codigos.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_codigos_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_codigos_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_codigos_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_codigos_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.codigos_checkTableConstraints
-
-{}
-#+ Check constraints on the "codigos.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_codigos_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE codigos.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.codigos_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "codigos.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_codigos_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE codigos.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.codigos_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "codigos.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_codigos_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE codigos.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.codigos_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "codigos.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_codigos_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE codigos.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.codigos_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "codigo21" table
-#+
-#+ @param p_data - a row data LIKE codigo21.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_codigo21_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE codigo21.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_codigo21_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_codigo21_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_codigo21_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_codigo21_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.codigo21_checkTableConstraints
-
-{}
-#+ Check constraints on the "codigo21.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_codigo21_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE codigo21.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.codigo21_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "codigo21.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_codigo21_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE codigo21.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.codigo21_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "codigo21.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_codigo21_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE codigo21.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.codigo21_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "codigo21.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_codigo21_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE codigo21.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.codigo21_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "codigo20" table
-#+
-#+ @param p_data - a row data LIKE codigo20.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_codigo20_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE codigo20.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_codigo20_f1_checkColumnConstraints(p_data.f1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_codigo20_f2_checkColumnConstraints(p_data.f2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_codigo20_f3_checkColumnConstraints(p_data.f3) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_codigo20_f4_checkColumnConstraints(p_data.f4) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.codigo20_checkTableConstraints
-
-{}
-#+ Check constraints on the "codigo20.f1" column
-#+
-#+ @param p_f1 - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_codigo20_f1_checkColumnConstraints(p_f1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_f1 LIKE codigo20.f1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.codigo20_f1_checkColumnConstraints
-
-{}
-#+ Check constraints on the "codigo20.f2" column
-#+
-#+ @param p_f2 - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_codigo20_f2_checkColumnConstraints(p_f2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_f2 LIKE codigo20.f2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.codigo20_f2_checkColumnConstraints
-
-{}
-#+ Check constraints on the "codigo20.f3" column
-#+
-#+ @param p_f3 - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_codigo20_f3_checkColumnConstraints(p_f3)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_f3 LIKE codigo20.f3
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.codigo20_f3_checkColumnConstraints
-
-{}
-#+ Check constraints on the "codigo20.f4" column
-#+
-#+ @param p_f4 - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_codigo20_f4_checkColumnConstraints(p_f4)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_f4 LIKE codigo20.f4
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.codigo20_f4_checkColumnConstraints
-
-{}
-#+ Check constraints on the "chequeo" table
-#+
-#+ @param p_data - a row data LIKE chequeo.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_chequeo_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE chequeo.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_chequeo_dpto_checkColumnConstraints(p_data.dpto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_chequeo_departamento_checkColumnConstraints(p_data.departamento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_chequeo_nom_dpto_checkColumnConstraints(p_data.nom_dpto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.chequeo_checkTableConstraints
-
-{}
-#+ Check constraints on the "chequeo.dpto" column
-#+
-#+ @param p_dpto - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_chequeo_dpto_checkColumnConstraints(p_dpto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_dpto LIKE chequeo.dpto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.chequeo_dpto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "chequeo.departamento" column
-#+
-#+ @param p_departamento - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_chequeo_departamento_checkColumnConstraints(p_departamento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_departamento LIKE chequeo.departamento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.chequeo_departamento_checkColumnConstraints
-
-{}
-#+ Check constraints on the "chequeo.nom_dpto" column
-#+
-#+ @param p_nom_dpto - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_chequeo_nom_dpto_checkColumnConstraints(p_nom_dpto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nom_dpto LIKE chequeo.nom_dpto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.chequeo_nom_dpto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtbh00004" table
-#+
-#+ @param p_data - a row data LIKE cgtbh00004.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtbh00004_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cgtbh00004.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cgtbh00004_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtbh00004_tipo_checkColumnConstraints(p_data.tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtbh00004_ref_checkColumnConstraints(p_data.ref) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtbh00004_cuenta_no_checkColumnConstraints(p_data.cuenta_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtbh00004_departamento_checkColumnConstraints(p_data.departamento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtbh00004_num_doc_checkColumnConstraints(p_data.num_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtbh00004_cod_aux_checkColumnConstraints(p_data.cod_aux) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtbh00004_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtbh00004_detalles_checkColumnConstraints(p_data.detalles) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtbh00004_detalle_1_checkColumnConstraints(p_data.detalle_1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtbh00004_detalle_2_checkColumnConstraints(p_data.detalle_2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtbh00004_debito_checkColumnConstraints(p_data.debito) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtbh00004_credito_checkColumnConstraints(p_data.credito) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtbh00004_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtbh00004_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtbh00004_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtbh00004_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtbh00004_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtbh00004_checkTableConstraints
-
-{}
-#+ Check constraints on the "cgtbh00004.fecha" column
-#+
-#+ @param p_fecha - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtbh00004_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE cgtbh00004.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtbh00004_fecha_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtbh00004.tipo" column
-#+
-#+ @param p_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtbh00004_tipo_checkColumnConstraints(p_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo LIKE cgtbh00004.tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtbh00004_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtbh00004.ref" column
-#+
-#+ @param p_ref - VARCHAR2(14) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtbh00004_ref_checkColumnConstraints(p_ref)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ref LIKE cgtbh00004.ref
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_ref IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- ref: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtbh00004_ref_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtbh00004.cuenta_no" column
-#+
-#+ @param p_cuenta_no - VARCHAR2(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtbh00004_cuenta_no_checkColumnConstraints(p_cuenta_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cuenta_no LIKE cgtbh00004.cuenta_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtbh00004_cuenta_no_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtbh00004.departamento" column
-#+
-#+ @param p_departamento - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtbh00004_departamento_checkColumnConstraints(p_departamento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_departamento LIKE cgtbh00004.departamento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtbh00004_departamento_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtbh00004.num_doc" column
-#+
-#+ @param p_num_doc - VARCHAR2(12) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtbh00004_num_doc_checkColumnConstraints(p_num_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_doc LIKE cgtbh00004.num_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtbh00004_num_doc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtbh00004.cod_aux" column
-#+
-#+ @param p_cod_aux - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtbh00004_cod_aux_checkColumnConstraints(p_cod_aux)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_aux LIKE cgtbh00004.cod_aux
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtbh00004_cod_aux_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtbh00004.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtbh00004_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE cgtbh00004.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtbh00004_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtbh00004.detalles" column
-#+
-#+ @param p_detalles - VARCHAR2(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtbh00004_detalles_checkColumnConstraints(p_detalles)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_detalles LIKE cgtbh00004.detalles
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtbh00004_detalles_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtbh00004.detalle_1" column
-#+
-#+ @param p_detalle_1 - VARCHAR2(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtbh00004_detalle_1_checkColumnConstraints(p_detalle_1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_detalle_1 LIKE cgtbh00004.detalle_1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtbh00004_detalle_1_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtbh00004.detalle_2" column
-#+
-#+ @param p_detalle_2 - VARCHAR2(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtbh00004_detalle_2_checkColumnConstraints(p_detalle_2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_detalle_2 LIKE cgtbh00004.detalle_2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtbh00004_detalle_2_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtbh00004.debito" column
-#+
-#+ @param p_debito - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtbh00004_debito_checkColumnConstraints(p_debito)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_debito LIKE cgtbh00004.debito
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtbh00004_debito_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtbh00004.credito" column
-#+
-#+ @param p_credito - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtbh00004_credito_checkColumnConstraints(p_credito)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_credito LIKE cgtbh00004.credito
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtbh00004_credito_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtbh00004.status_t" column
-#+
-#+ @param p_status_t - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtbh00004_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cgtbh00004.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtbh00004_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtbh00004.us_crea" column
-#+
-#+ @param p_us_crea - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtbh00004_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cgtbh00004.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtbh00004_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtbh00004.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtbh00004_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cgtbh00004.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtbh00004_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtbh00004.us_mod" column
-#+
-#+ @param p_us_mod - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtbh00004_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cgtbh00004.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtbh00004_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtbh00004.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtbh00004_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cgtbh00004.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtbh00004_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb04" table
-#+
-#+ @param p_data - a row data LIKE cgtb04.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb04_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cgtb04.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cgtb04_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb04_tipo_checkColumnConstraints(p_data.tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb04_ref_checkColumnConstraints(p_data.ref) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb04_cuenta_no_checkColumnConstraints(p_data.cuenta_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb04_departamento_checkColumnConstraints(p_data.departamento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb04_num_doc_checkColumnConstraints(p_data.num_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb04_cod_aux_checkColumnConstraints(p_data.cod_aux) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb04_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb04_detalles_checkColumnConstraints(p_data.detalles) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb04_detalle_1_checkColumnConstraints(p_data.detalle_1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb04_detalle_2_checkColumnConstraints(p_data.detalle_2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb04_debito_checkColumnConstraints(p_data.debito) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb04_credito_checkColumnConstraints(p_data.credito) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb04_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb04_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb04_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb04_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb04_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb04_checkTableConstraints
-
-{}
-#+ Check constraints on the "cgtb04.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb04_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE cgtb04.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb04_fecha_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb04.tipo" column
-#+
-#+ @param p_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb04_tipo_checkColumnConstraints(p_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo LIKE cgtb04.tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb04_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb04.ref" column
-#+
-#+ @param p_ref - CHAR(14) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb04_ref_checkColumnConstraints(p_ref)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ref LIKE cgtb04.ref
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_ref IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- ref: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb04_ref_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb04.cuenta_no" column
-#+
-#+ @param p_cuenta_no - CHAR(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb04_cuenta_no_checkColumnConstraints(p_cuenta_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cuenta_no LIKE cgtb04.cuenta_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb04_cuenta_no_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb04.departamento" column
-#+
-#+ @param p_departamento - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb04_departamento_checkColumnConstraints(p_departamento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_departamento LIKE cgtb04.departamento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb04_departamento_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb04.num_doc" column
-#+
-#+ @param p_num_doc - CHAR(12) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb04_num_doc_checkColumnConstraints(p_num_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_doc LIKE cgtb04.num_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb04_num_doc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb04.cod_aux" column
-#+
-#+ @param p_cod_aux - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb04_cod_aux_checkColumnConstraints(p_cod_aux)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_aux LIKE cgtb04.cod_aux
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb04_cod_aux_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb04.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb04_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE cgtb04.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb04_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb04.detalles" column
-#+
-#+ @param p_detalles - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb04_detalles_checkColumnConstraints(p_detalles)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_detalles LIKE cgtb04.detalles
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb04_detalles_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb04.detalle_1" column
-#+
-#+ @param p_detalle_1 - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb04_detalle_1_checkColumnConstraints(p_detalle_1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_detalle_1 LIKE cgtb04.detalle_1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb04_detalle_1_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb04.detalle_2" column
-#+
-#+ @param p_detalle_2 - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb04_detalle_2_checkColumnConstraints(p_detalle_2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_detalle_2 LIKE cgtb04.detalle_2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb04_detalle_2_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb04.debito" column
-#+
-#+ @param p_debito - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb04_debito_checkColumnConstraints(p_debito)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_debito LIKE cgtb04.debito
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb04_debito_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb04.credito" column
-#+
-#+ @param p_credito - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb04_credito_checkColumnConstraints(p_credito)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_credito LIKE cgtb04.credito
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb04_credito_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb04.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb04_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cgtb04.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb04_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb04.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb04_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cgtb04.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb04_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb04.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb04_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cgtb04.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb04_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb04.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb04_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cgtb04.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb04_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb04.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb04_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cgtb04.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb04_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00084" table
-#+
-#+ @param p_data - a row data LIKE cgtb00084.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00084_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cgtb00084.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cgtb00084_ventas_checkColumnConstraints(p_data.ventas) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00084_tipo_cliente_checkColumnConstraints(p_data.tipo_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00084_ano_checkColumnConstraints(p_data.ano) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00084_mes_checkColumnConstraints(p_data.mes) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00084_tasa_checkColumnConstraints(p_data.tasa) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00084_checkTableConstraints
-
-{}
-#+ Check constraints on the "cgtb00084.ventas" column
-#+
-#+ @param p_ventas - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00084_ventas_checkColumnConstraints(p_ventas)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ventas LIKE cgtb00084.ventas
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00084_ventas_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00084.tipo_cliente" column
-#+
-#+ @param p_tipo_cliente - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00084_tipo_cliente_checkColumnConstraints(p_tipo_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_cliente LIKE cgtb00084.tipo_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00084_tipo_cliente_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00084.ano" column
-#+
-#+ @param p_ano - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00084_ano_checkColumnConstraints(p_ano)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ano LIKE cgtb00084.ano
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00084_ano_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00084.mes" column
-#+
-#+ @param p_mes - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00084_mes_checkColumnConstraints(p_mes)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mes LIKE cgtb00084.mes
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00084_mes_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00084.tasa" column
-#+
-#+ @param p_tasa - DECIMAL(12,3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00084_tasa_checkColumnConstraints(p_tasa)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tasa LIKE cgtb00084.tasa
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00084_tasa_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00083" table
-#+
-#+ @param p_data - a row data LIKE cgtb00083.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00083_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cgtb00083.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cgtb00083_primern_checkColumnConstraints(p_data.primern) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00083_descrip_n_checkColumnConstraints(p_data.descrip_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00083_aplica_a_checkColumnConstraints(p_data.aplica_a) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00083_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00083_checkTableConstraints
-
-{}
-#+ Check constraints on the "cgtb00083.primern" column
-#+
-#+ @param p_primern - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00083_primern_checkColumnConstraints(p_primern)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_primern LIKE cgtb00083.primern
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00083_primern_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00083.descrip_n" column
-#+
-#+ @param p_descrip_n - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00083_descrip_n_checkColumnConstraints(p_descrip_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descrip_n LIKE cgtb00083.descrip_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00083_descrip_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00083.aplica_a" column
-#+
-#+ @param p_aplica_a - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00083_aplica_a_checkColumnConstraints(p_aplica_a)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_aplica_a LIKE cgtb00083.aplica_a
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00083_aplica_a_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00083.descripcion" column
-#+
-#+ @param p_descripcion - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00083_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE cgtb00083.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00083_descripcion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00060" table
-#+
-#+ @param p_data - a row data LIKE cgtb00060.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00060_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cgtb00060.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cgtb00060_ano_checkColumnConstraints(p_data.ano) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00060_mes_checkColumnConstraints(p_data.mes) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00060_fecha_ini_checkColumnConstraints(p_data.fecha_ini) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00060_fecha_fin_checkColumnConstraints(p_data.fecha_fin) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00060_entrada_datos_checkColumnConstraints(p_data.entrada_datos) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00060_codigo_lote_checkColumnConstraints(p_data.codigo_lote) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00060_afecta_checkColumnConstraints(p_data.afecta) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00060_checkTableConstraints
-
-{}
-#+ Check constraints on the "cgtb00060.ano" column
-#+
-#+ @param p_ano - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00060_ano_checkColumnConstraints(p_ano)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ano LIKE cgtb00060.ano
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00060_ano_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00060.mes" column
-#+
-#+ @param p_mes - CHAR(12) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00060_mes_checkColumnConstraints(p_mes)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mes LIKE cgtb00060.mes
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00060_mes_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00060.fecha_ini" column
-#+
-#+ @param p_fecha_ini - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00060_fecha_ini_checkColumnConstraints(p_fecha_ini)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_ini LIKE cgtb00060.fecha_ini
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00060_fecha_ini_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00060.fecha_fin" column
-#+
-#+ @param p_fecha_fin - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00060_fecha_fin_checkColumnConstraints(p_fecha_fin)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_fin LIKE cgtb00060.fecha_fin
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00060_fecha_fin_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00060.entrada_datos" column
-#+
-#+ @param p_entrada_datos - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00060_entrada_datos_checkColumnConstraints(p_entrada_datos)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_entrada_datos LIKE cgtb00060.entrada_datos
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00060_entrada_datos_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00060.codigo_lote" column
-#+
-#+ @param p_codigo_lote - CHAR(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00060_codigo_lote_checkColumnConstraints(p_codigo_lote)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codigo_lote LIKE cgtb00060.codigo_lote
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00060_codigo_lote_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00060.afecta" column
-#+
-#+ @param p_afecta - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00060_afecta_checkColumnConstraints(p_afecta)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_afecta LIKE cgtb00060.afecta
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00060_afecta_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00035" table
-#+
-#+ @param p_data - a row data LIKE cgtb00035.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00035_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cgtb00035.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cgtb00035_codigo_estado_checkColumnConstraints(p_data.codigo_estado) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00035_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00035_checkTableConstraints
-
-{}
-#+ Check constraints on the "cgtb00035.codigo_estado" column
-#+
-#+ @param p_codigo_estado - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00035_codigo_estado_checkColumnConstraints(p_codigo_estado)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codigo_estado LIKE cgtb00035.codigo_estado
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00035_codigo_estado_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00035.descripcion" column
-#+
-#+ @param p_descripcion - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00035_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE cgtb00035.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00035_descripcion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00034" table
-#+
-#+ @param p_data - a row data LIKE cgtb00034.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00034_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cgtb00034.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cgtb00034_cuenta_no_checkColumnConstraints(p_data.cuenta_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00034_departamento_checkColumnConstraints(p_data.departamento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00034_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00034_sec_vend_checkColumnConstraints(p_data.sec_vend) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00034_cod_cia_checkColumnConstraints(p_data.cod_cia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00034_id_checkColumnConstraints(p_data.id) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00034_checkTableConstraints
-
-{}
-#+ Check constraints on the "cgtb00034.cuenta_no" column
-#+
-#+ @param p_cuenta_no - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00034_cuenta_no_checkColumnConstraints(p_cuenta_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cuenta_no LIKE cgtb00034.cuenta_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00034_cuenta_no_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00034.departamento" column
-#+
-#+ @param p_departamento - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00034_departamento_checkColumnConstraints(p_departamento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_departamento LIKE cgtb00034.departamento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00034_departamento_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00034.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00034_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE cgtb00034.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00034_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00034.sec_vend" column
-#+
-#+ @param p_sec_vend - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00034_sec_vend_checkColumnConstraints(p_sec_vend)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_vend LIKE cgtb00034.sec_vend
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00034_sec_vend_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00034.cod_cia" column
-#+
-#+ @param p_cod_cia - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00034_cod_cia_checkColumnConstraints(p_cod_cia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_cia LIKE cgtb00034.cod_cia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00034_cod_cia_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00034.id" column
-#+
-#+ @param p_id - CHAR(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00034_id_checkColumnConstraints(p_id)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_id LIKE cgtb00034.id
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00034_id_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00033" table
-#+
-#+ @param p_data - a row data LIKE cgtb00033.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00033_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cgtb00033.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cgtb00033_cheque_no_checkColumnConstraints(p_data.cheque_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00033_banco_checkColumnConstraints(p_data.banco) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00033_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00033_monto_checkColumnConstraints(p_data.monto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00033_portador_checkColumnConstraints(p_data.portador) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00033_cod_cro_checkColumnConstraints(p_data.cod_cro) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00033_recibido_por_checkColumnConstraints(p_data.recibido_por) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00033_cedula_checkColumnConstraints(p_data.cedula) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00033_direccion_checkColumnConstraints(p_data.direccion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00033_fecha_ent_checkColumnConstraints(p_data.fecha_ent) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00033_hora_ent_checkColumnConstraints(p_data.hora_ent) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00033_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00033_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00033_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00033_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00033_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00033_checkTableConstraints
-
-{}
-#+ Check constraints on the "cgtb00033.cheque_no" column
-#+
-#+ @param p_cheque_no - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00033_cheque_no_checkColumnConstraints(p_cheque_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cheque_no LIKE cgtb00033.cheque_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cheque_no IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cheque_no: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00033_cheque_no_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00033.banco" column
-#+
-#+ @param p_banco - CHAR(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00033_banco_checkColumnConstraints(p_banco)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_banco LIKE cgtb00033.banco
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_banco IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- banco: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00033_banco_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00033.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00033_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE cgtb00033.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00033_fecha_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00033.monto" column
-#+
-#+ @param p_monto - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00033_monto_checkColumnConstraints(p_monto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_monto LIKE cgtb00033.monto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00033_monto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00033.portador" column
-#+
-#+ @param p_portador - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00033_portador_checkColumnConstraints(p_portador)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_portador LIKE cgtb00033.portador
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00033_portador_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00033.cod_cro" column
-#+
-#+ @param p_cod_cro - CHAR(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00033_cod_cro_checkColumnConstraints(p_cod_cro)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_cro LIKE cgtb00033.cod_cro
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_cro IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_cro: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00033_cod_cro_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00033.recibido_por" column
-#+
-#+ @param p_recibido_por - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00033_recibido_por_checkColumnConstraints(p_recibido_por)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_recibido_por LIKE cgtb00033.recibido_por
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_recibido_por IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- recibido_por: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00033_recibido_por_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00033.cedula" column
-#+
-#+ @param p_cedula - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00033_cedula_checkColumnConstraints(p_cedula)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cedula LIKE cgtb00033.cedula
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cedula IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cedula: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00033_cedula_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00033.direccion" column
-#+
-#+ @param p_direccion - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00033_direccion_checkColumnConstraints(p_direccion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_direccion LIKE cgtb00033.direccion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00033_direccion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00033.fecha_ent" column
-#+
-#+ @param p_fecha_ent - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00033_fecha_ent_checkColumnConstraints(p_fecha_ent)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_ent LIKE cgtb00033.fecha_ent
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_fecha_ent IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- fecha_ent: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00033_fecha_ent_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00033.hora_ent" column
-#+
-#+ @param p_hora_ent - CHAR(5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00033_hora_ent_checkColumnConstraints(p_hora_ent)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_hora_ent LIKE cgtb00033.hora_ent
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_hora_ent IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- hora_ent: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00033_hora_ent_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00033.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00033_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cgtb00033.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00033_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00033.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00033_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cgtb00033.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00033_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00033.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00033_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cgtb00033.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00033_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00033.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00033_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cgtb00033.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00033_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00033.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00033_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cgtb00033.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00033_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00032" table
-#+
-#+ @param p_data - a row data LIKE cgtb00032.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00032_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cgtb00032.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cgtb00032_cheque_no_checkColumnConstraints(p_data.cheque_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00032_banco_checkColumnConstraints(p_data.banco) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00032_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00032_cod_cro_checkColumnConstraints(p_data.cod_cro) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00032_recibido_por_checkColumnConstraints(p_data.recibido_por) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00032_cedula_checkColumnConstraints(p_data.cedula) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00032_direccion_checkColumnConstraints(p_data.direccion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00032_fecha_ent_checkColumnConstraints(p_data.fecha_ent) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00032_hora_ent_checkColumnConstraints(p_data.hora_ent) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00032_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00032_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00032_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00032_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00032_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00032_checkTableConstraints
-
-{}
-#+ Check constraints on the "cgtb00032.cheque_no" column
-#+
-#+ @param p_cheque_no - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00032_cheque_no_checkColumnConstraints(p_cheque_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cheque_no LIKE cgtb00032.cheque_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cheque_no IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cheque_no: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00032_cheque_no_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00032.banco" column
-#+
-#+ @param p_banco - CHAR(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00032_banco_checkColumnConstraints(p_banco)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_banco LIKE cgtb00032.banco
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_banco IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- banco: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00032_banco_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00032.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00032_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE cgtb00032.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00032_fecha_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00032.cod_cro" column
-#+
-#+ @param p_cod_cro - CHAR(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00032_cod_cro_checkColumnConstraints(p_cod_cro)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_cro LIKE cgtb00032.cod_cro
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_cro IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_cro: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00032_cod_cro_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00032.recibido_por" column
-#+
-#+ @param p_recibido_por - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00032_recibido_por_checkColumnConstraints(p_recibido_por)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_recibido_por LIKE cgtb00032.recibido_por
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_recibido_por IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- recibido_por: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00032_recibido_por_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00032.cedula" column
-#+
-#+ @param p_cedula - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00032_cedula_checkColumnConstraints(p_cedula)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cedula LIKE cgtb00032.cedula
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cedula IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cedula: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00032_cedula_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00032.direccion" column
-#+
-#+ @param p_direccion - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00032_direccion_checkColumnConstraints(p_direccion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_direccion LIKE cgtb00032.direccion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00032_direccion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00032.fecha_ent" column
-#+
-#+ @param p_fecha_ent - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00032_fecha_ent_checkColumnConstraints(p_fecha_ent)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_ent LIKE cgtb00032.fecha_ent
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_fecha_ent IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- fecha_ent: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00032_fecha_ent_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00032.hora_ent" column
-#+
-#+ @param p_hora_ent - CHAR(5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00032_hora_ent_checkColumnConstraints(p_hora_ent)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_hora_ent LIKE cgtb00032.hora_ent
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_hora_ent IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- hora_ent: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00032_hora_ent_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00032.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00032_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cgtb00032.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00032_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00032.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00032_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cgtb00032.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00032_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00032.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00032_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cgtb00032.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00032_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00032.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00032_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cgtb00032.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00032_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00032.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00032_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cgtb00032.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00032_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00031" table
-#+
-#+ @param p_data - a row data LIKE cgtb00031.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00031_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cgtb00031.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cgtb00031_cod_cro_checkColumnConstraints(p_data.cod_cro) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00031_beneficiario_checkColumnConstraints(p_data.beneficiario) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00031_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00031_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00031_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00031_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00031_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00031_checkTableConstraints
-
-{}
-#+ Check constraints on the "cgtb00031.cod_cro" column
-#+
-#+ @param p_cod_cro - CHAR(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00031_cod_cro_checkColumnConstraints(p_cod_cro)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_cro LIKE cgtb00031.cod_cro
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00031_cod_cro_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00031.beneficiario" column
-#+
-#+ @param p_beneficiario - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00031_beneficiario_checkColumnConstraints(p_beneficiario)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_beneficiario LIKE cgtb00031.beneficiario
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00031_beneficiario_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00031.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00031_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cgtb00031.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00031_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00031.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00031_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cgtb00031.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00031_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00031.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00031_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cgtb00031.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00031_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00031.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00031_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cgtb00031.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00031_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00031.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00031_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cgtb00031.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00031_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00023" table
-#+
-#+ @param p_data - a row data LIKE cgtb00023.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00023_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cgtb00023.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cgtb00023_cuenta_no_checkColumnConstraints(p_data.cuenta_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00023_presupuesto_checkColumnConstraints(p_data.presupuesto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00023_ano_checkColumnConstraints(p_data.ano) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00023_mes_checkColumnConstraints(p_data.mes) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00023_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00023_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00023_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00023_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00023_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00023_checkTableConstraints
-
-{}
-#+ Check constraints on the "cgtb00023.cuenta_no" column
-#+
-#+ @param p_cuenta_no - CHAR(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00023_cuenta_no_checkColumnConstraints(p_cuenta_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cuenta_no LIKE cgtb00023.cuenta_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cuenta_no IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cuenta_no: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00023_cuenta_no_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00023.presupuesto" column
-#+
-#+ @param p_presupuesto - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00023_presupuesto_checkColumnConstraints(p_presupuesto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_presupuesto LIKE cgtb00023.presupuesto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_presupuesto IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- presupuesto: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00023_presupuesto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00023.ano" column
-#+
-#+ @param p_ano - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00023_ano_checkColumnConstraints(p_ano)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ano LIKE cgtb00023.ano
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_ano IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- ano: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00023_ano_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00023.mes" column
-#+
-#+ @param p_mes - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00023_mes_checkColumnConstraints(p_mes)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mes LIKE cgtb00023.mes
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_mes IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- mes: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00023_mes_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00023.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00023_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cgtb00023.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00023_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00023.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00023_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cgtb00023.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00023_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00023.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00023_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cgtb00023.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00023_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00023.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00023_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cgtb00023.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00023_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00023.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00023_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cgtb00023.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00023_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00018" table
-#+
-#+ @param p_data - a row data LIKE cgtb00018.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00018_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cgtb00018.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cgtb00018_tipo_checkColumnConstraints(p_data.tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00018_num_oc_checkColumnConstraints(p_data.num_oc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00018_rep_entrada_checkColumnConstraints(p_data.rep_entrada) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00018_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00018_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00018_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00018_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00018_cantidad_oc_checkColumnConstraints(p_data.cantidad_oc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00018_fob_checkColumnConstraints(p_data.fob) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00018_costo_flete_checkColumnConstraints(p_data.costo_flete) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00018_impuesto_checkColumnConstraints(p_data.impuesto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00018_otros_g_checkColumnConstraints(p_data.otros_g) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00018_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00018_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00018_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00018_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00018_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00018_checkTableConstraints
-
-{}
-#+ Check constraints on the "cgtb00018.tipo" column
-#+
-#+ @param p_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00018_tipo_checkColumnConstraints(p_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo LIKE cgtb00018.tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00018_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00018.num_oc" column
-#+
-#+ @param p_num_oc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00018_num_oc_checkColumnConstraints(p_num_oc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_oc LIKE cgtb00018.num_oc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00018_num_oc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00018.rep_entrada" column
-#+
-#+ @param p_rep_entrada - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00018_rep_entrada_checkColumnConstraints(p_rep_entrada)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_rep_entrada LIKE cgtb00018.rep_entrada
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00018_rep_entrada_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00018.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00018_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE cgtb00018.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00018_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00018.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00018_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE cgtb00018.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00018_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00018.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00018_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE cgtb00018.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00018_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00018.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00018_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE cgtb00018.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00018_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00018.cantidad_oc" column
-#+
-#+ @param p_cantidad_oc - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00018_cantidad_oc_checkColumnConstraints(p_cantidad_oc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad_oc LIKE cgtb00018.cantidad_oc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00018_cantidad_oc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00018.fob" column
-#+
-#+ @param p_fob - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00018_fob_checkColumnConstraints(p_fob)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fob LIKE cgtb00018.fob
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00018_fob_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00018.costo_flete" column
-#+
-#+ @param p_costo_flete - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00018_costo_flete_checkColumnConstraints(p_costo_flete)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_costo_flete LIKE cgtb00018.costo_flete
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00018_costo_flete_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00018.impuesto" column
-#+
-#+ @param p_impuesto - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00018_impuesto_checkColumnConstraints(p_impuesto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_impuesto LIKE cgtb00018.impuesto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00018_impuesto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00018.otros_g" column
-#+
-#+ @param p_otros_g - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00018_otros_g_checkColumnConstraints(p_otros_g)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_otros_g LIKE cgtb00018.otros_g
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00018_otros_g_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00018.status_t" column
-#+
-#+ @param p_status_t - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00018_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cgtb00018.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00018_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00018.us_crea" column
-#+
-#+ @param p_us_crea - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00018_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cgtb00018.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00018_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00018.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00018_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cgtb00018.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00018_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00018.us_mod" column
-#+
-#+ @param p_us_mod - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00018_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cgtb00018.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00018_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00018.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00018_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cgtb00018.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00018_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00017" table
-#+
-#+ @param p_data - a row data LIKE cgtb00017.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00017_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cgtb00017.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cgtb00017_tipo_checkColumnConstraints(p_data.tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00017_num_oc_checkColumnConstraints(p_data.num_oc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00017_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00017_liquidada_checkColumnConstraints(p_data.liquidada) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00017_cerrada_checkColumnConstraints(p_data.cerrada) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00017_pagada_checkColumnConstraints(p_data.pagada) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00017_rep_entrada_checkColumnConstraints(p_data.rep_entrada) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00017_factura_checkColumnConstraints(p_data.factura) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00017_prima_us_checkColumnConstraints(p_data.prima_us) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00017_cod_sp_checkColumnConstraints(p_data.cod_sp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00017_cod_sp_sec_checkColumnConstraints(p_data.cod_sp_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00017_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00017_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00017_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00017_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00017_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00017_checkTableConstraints
-
-{}
-#+ Check constraints on the "cgtb00017.tipo" column
-#+
-#+ @param p_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00017_tipo_checkColumnConstraints(p_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo LIKE cgtb00017.tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00017_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00017.num_oc" column
-#+
-#+ @param p_num_oc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00017_num_oc_checkColumnConstraints(p_num_oc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_oc LIKE cgtb00017.num_oc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00017_num_oc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00017.fecha" column
-#+
-#+ @param p_fecha - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00017_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE cgtb00017.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00017_fecha_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00017.liquidada" column
-#+
-#+ @param p_liquidada - VARCHAR2(12) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00017_liquidada_checkColumnConstraints(p_liquidada)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_liquidada LIKE cgtb00017.liquidada
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00017_liquidada_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00017.cerrada" column
-#+
-#+ @param p_cerrada - VARCHAR2(12) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00017_cerrada_checkColumnConstraints(p_cerrada)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cerrada LIKE cgtb00017.cerrada
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00017_cerrada_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00017.pagada" column
-#+
-#+ @param p_pagada - VARCHAR2(12) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00017_pagada_checkColumnConstraints(p_pagada)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_pagada LIKE cgtb00017.pagada
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00017_pagada_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00017.rep_entrada" column
-#+
-#+ @param p_rep_entrada - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00017_rep_entrada_checkColumnConstraints(p_rep_entrada)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_rep_entrada LIKE cgtb00017.rep_entrada
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00017_rep_entrada_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00017.factura" column
-#+
-#+ @param p_factura - VARCHAR2(12) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00017_factura_checkColumnConstraints(p_factura)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_factura LIKE cgtb00017.factura
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00017_factura_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00017.prima_us" column
-#+
-#+ @param p_prima_us - DECIMAL(8,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00017_prima_us_checkColumnConstraints(p_prima_us)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_prima_us LIKE cgtb00017.prima_us
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00017_prima_us_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00017.cod_sp" column
-#+
-#+ @param p_cod_sp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00017_cod_sp_checkColumnConstraints(p_cod_sp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sp LIKE cgtb00017.cod_sp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00017_cod_sp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00017.cod_sp_sec" column
-#+
-#+ @param p_cod_sp_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00017_cod_sp_sec_checkColumnConstraints(p_cod_sp_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sp_sec LIKE cgtb00017.cod_sp_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00017_cod_sp_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00017.status_t" column
-#+
-#+ @param p_status_t - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00017_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cgtb00017.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00017_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00017.us_crea" column
-#+
-#+ @param p_us_crea - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00017_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cgtb00017.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00017_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00017.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00017_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cgtb00017.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00017_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00017.us_mod" column
-#+
-#+ @param p_us_mod - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00017_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cgtb00017.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00017_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00017.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00017_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cgtb00017.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00017_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00016" table
-#+
-#+ @param p_data - a row data LIKE cgtb00016.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00016_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cgtb00016.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cgtb00016_cuenta_no_checkColumnConstraints(p_data.cuenta_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00016_estado_a_checkColumnConstraints(p_data.estado_a) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00016_estado_m_checkColumnConstraints(p_data.estado_m) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00016_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00016_debito_checkColumnConstraints(p_data.debito) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00016_credito_checkColumnConstraints(p_data.credito) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00016_balance_ant_checkColumnConstraints(p_data.balance_ant) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00016_actividad_checkColumnConstraints(p_data.actividad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00016_balance_act_checkColumnConstraints(p_data.balance_act) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00016_primern_checkColumnConstraints(p_data.primern) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00016_checkTableConstraints
-
-{}
-#+ Check constraints on the "cgtb00016.cuenta_no" column
-#+
-#+ @param p_cuenta_no - CHAR(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00016_cuenta_no_checkColumnConstraints(p_cuenta_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cuenta_no LIKE cgtb00016.cuenta_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00016_cuenta_no_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00016.estado_a" column
-#+
-#+ @param p_estado_a - CHAR(4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00016_estado_a_checkColumnConstraints(p_estado_a)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_estado_a LIKE cgtb00016.estado_a
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00016_estado_a_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00016.estado_m" column
-#+
-#+ @param p_estado_m - CHAR(4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00016_estado_m_checkColumnConstraints(p_estado_m)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_estado_m LIKE cgtb00016.estado_m
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00016_estado_m_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00016.descripcion" column
-#+
-#+ @param p_descripcion - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00016_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE cgtb00016.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00016_descripcion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00016.debito" column
-#+
-#+ @param p_debito - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00016_debito_checkColumnConstraints(p_debito)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_debito LIKE cgtb00016.debito
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00016_debito_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00016.credito" column
-#+
-#+ @param p_credito - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00016_credito_checkColumnConstraints(p_credito)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_credito LIKE cgtb00016.credito
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00016_credito_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00016.balance_ant" column
-#+
-#+ @param p_balance_ant - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00016_balance_ant_checkColumnConstraints(p_balance_ant)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_balance_ant LIKE cgtb00016.balance_ant
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00016_balance_ant_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00016.actividad" column
-#+
-#+ @param p_actividad - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00016_actividad_checkColumnConstraints(p_actividad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_actividad LIKE cgtb00016.actividad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00016_actividad_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00016.balance_act" column
-#+
-#+ @param p_balance_act - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00016_balance_act_checkColumnConstraints(p_balance_act)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_balance_act LIKE cgtb00016.balance_act
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00016_balance_act_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00016.primern" column
-#+
-#+ @param p_primern - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00016_primern_checkColumnConstraints(p_primern)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_primern LIKE cgtb00016.primern
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00016_primern_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00014" table
-#+
-#+ @param p_data - a row data LIKE cgtb00014.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00014_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cgtb00014.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cgtb00014_cuenta_no_checkColumnConstraints(p_data.cuenta_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00014_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00014_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00014_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00014_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00014_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00014_checkTableConstraints
-
-{}
-#+ Check constraints on the "cgtb00014.cuenta_no" column
-#+
-#+ @param p_cuenta_no - CHAR(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00014_cuenta_no_checkColumnConstraints(p_cuenta_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cuenta_no LIKE cgtb00014.cuenta_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00014_cuenta_no_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00014.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00014_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cgtb00014.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00014_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00014.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00014_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cgtb00014.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00014_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00014.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00014_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cgtb00014.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00014_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00014.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00014_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cgtb00014.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00014_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00014.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00014_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cgtb00014.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00014_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00012" table
-#+
-#+ @param p_data - a row data LIKE cgtb00012.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00012_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cgtb00012.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cgtb00012_cheque_no_checkColumnConstraints(p_data.cheque_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00012_cuenta_no_checkColumnConstraints(p_data.cuenta_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00012_nombre_bco_checkColumnConstraints(p_data.nombre_bco) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00012_direccion_checkColumnConstraints(p_data.direccion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00012_cuenta_bank_checkColumnConstraints(p_data.cuenta_bank) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00012_codigo_1_checkColumnConstraints(p_data.codigo_1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00012_codigo_2_checkColumnConstraints(p_data.codigo_2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00012_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00012_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00012_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00012_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00012_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00012_checkTableConstraints
-
-{}
-#+ Check constraints on the "cgtb00012.cheque_no" column
-#+
-#+ @param p_cheque_no - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00012_cheque_no_checkColumnConstraints(p_cheque_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cheque_no LIKE cgtb00012.cheque_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00012_cheque_no_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00012.cuenta_no" column
-#+
-#+ @param p_cuenta_no - VARCHAR2(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00012_cuenta_no_checkColumnConstraints(p_cuenta_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cuenta_no LIKE cgtb00012.cuenta_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00012_cuenta_no_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00012.nombre_bco" column
-#+
-#+ @param p_nombre_bco - VARCHAR2(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00012_nombre_bco_checkColumnConstraints(p_nombre_bco)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombre_bco LIKE cgtb00012.nombre_bco
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00012_nombre_bco_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00012.direccion" column
-#+
-#+ @param p_direccion - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00012_direccion_checkColumnConstraints(p_direccion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_direccion LIKE cgtb00012.direccion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00012_direccion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00012.cuenta_bank" column
-#+
-#+ @param p_cuenta_bank - VARCHAR2(14) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00012_cuenta_bank_checkColumnConstraints(p_cuenta_bank)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cuenta_bank LIKE cgtb00012.cuenta_bank
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00012_cuenta_bank_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00012.codigo_1" column
-#+
-#+ @param p_codigo_1 - VARCHAR2(7) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00012_codigo_1_checkColumnConstraints(p_codigo_1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codigo_1 LIKE cgtb00012.codigo_1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00012_codigo_1_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00012.codigo_2" column
-#+
-#+ @param p_codigo_2 - VARCHAR2(7) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00012_codigo_2_checkColumnConstraints(p_codigo_2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codigo_2 LIKE cgtb00012.codigo_2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00012_codigo_2_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00012.status_t" column
-#+
-#+ @param p_status_t - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00012_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cgtb00012.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00012_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00012.us_crea" column
-#+
-#+ @param p_us_crea - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00012_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cgtb00012.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00012_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00012.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00012_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cgtb00012.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00012_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00012.us_mod" column
-#+
-#+ @param p_us_mod - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00012_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cgtb00012.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00012_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00012.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00012_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cgtb00012.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00012_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00011" table
-#+
-#+ @param p_data - a row data LIKE cgtb00011.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00011_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cgtb00011.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cgtb00011_entrada_no_checkColumnConstraints(p_data.entrada_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00011_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00011_prog_4gl_checkColumnConstraints(p_data.prog_4gl) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00011_referencia_checkColumnConstraints(p_data.referencia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00011_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00011_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00011_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00011_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00011_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00011_checkTableConstraints
-
-{}
-#+ Check constraints on the "cgtb00011.entrada_no" column
-#+
-#+ @param p_entrada_no - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00011_entrada_no_checkColumnConstraints(p_entrada_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_entrada_no LIKE cgtb00011.entrada_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00011_entrada_no_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00011.descripcion" column
-#+
-#+ @param p_descripcion - VARCHAR2(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00011_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE cgtb00011.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00011_descripcion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00011.prog_4gl" column
-#+
-#+ @param p_prog_4gl - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00011_prog_4gl_checkColumnConstraints(p_prog_4gl)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_prog_4gl LIKE cgtb00011.prog_4gl
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00011_prog_4gl_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00011.referencia" column
-#+
-#+ @param p_referencia - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00011_referencia_checkColumnConstraints(p_referencia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_referencia LIKE cgtb00011.referencia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00011_referencia_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00011.status_t" column
-#+
-#+ @param p_status_t - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00011_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cgtb00011.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00011_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00011.us_crea" column
-#+
-#+ @param p_us_crea - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00011_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cgtb00011.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00011_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00011.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00011_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cgtb00011.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00011_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00011.us_mod" column
-#+
-#+ @param p_us_mod - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00011_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cgtb00011.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00011_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00011.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00011_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cgtb00011.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00011_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00010" table
-#+
-#+ @param p_data - a row data LIKE cgtb00010.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00010_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cgtb00010.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cgtb00010_cod_mov_checkColumnConstraints(p_data.cod_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00010_cuenta_no_checkColumnConstraints(p_data.cuenta_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00010_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00010_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00010_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00010_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00010_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00010_checkTableConstraints
-
-{}
-#+ Check constraints on the "cgtb00010.cod_mov" column
-#+
-#+ @param p_cod_mov - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00010_cod_mov_checkColumnConstraints(p_cod_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mov LIKE cgtb00010.cod_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00010_cod_mov_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00010.cuenta_no" column
-#+
-#+ @param p_cuenta_no - CHAR(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00010_cuenta_no_checkColumnConstraints(p_cuenta_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cuenta_no LIKE cgtb00010.cuenta_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00010_cuenta_no_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00010.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00010_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cgtb00010.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00010_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00010.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00010_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cgtb00010.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00010_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00010.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00010_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cgtb00010.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00010_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00010.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00010_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cgtb00010.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00010_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00010.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00010_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cgtb00010.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00010_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00009" table
-#+
-#+ @param p_data - a row data LIKE cgtb00009.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00009_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cgtb00009.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cgtb00009_cod_mov_checkColumnConstraints(p_data.cod_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00009_cuenta_no_checkColumnConstraints(p_data.cuenta_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00009_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00009_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00009_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00009_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00009_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00009_checkTableConstraints
-
-{}
-#+ Check constraints on the "cgtb00009.cod_mov" column
-#+
-#+ @param p_cod_mov - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00009_cod_mov_checkColumnConstraints(p_cod_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mov LIKE cgtb00009.cod_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00009_cod_mov_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00009.cuenta_no" column
-#+
-#+ @param p_cuenta_no - CHAR(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00009_cuenta_no_checkColumnConstraints(p_cuenta_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cuenta_no LIKE cgtb00009.cuenta_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00009_cuenta_no_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00009.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00009_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cgtb00009.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00009_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00009.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00009_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cgtb00009.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00009_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00009.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00009_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cgtb00009.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00009_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00009.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00009_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cgtb00009.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00009_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00009.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00009_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cgtb00009.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00009_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00005" table
-#+
-#+ @param p_data - a row data LIKE cgtb00005.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00005_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cgtb00005.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cgtb00005_cuenta_no_checkColumnConstraints(p_data.cuenta_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00005_cheque_no_checkColumnConstraints(p_data.cheque_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00005_num_emp_checkColumnConstraints(p_data.num_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00005_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00005_portador_checkColumnConstraints(p_data.portador) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00005_tasa_checkColumnConstraints(p_data.tasa) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00005_monto_checkColumnConstraints(p_data.monto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00005_status_impresion_checkColumnConstraints(p_data.status_impresion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00005_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00005_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00005_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00005_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00005_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00005_checkTableConstraints
-
-{}
-#+ Check constraints on the "cgtb00005.cuenta_no" column
-#+
-#+ @param p_cuenta_no - VARCHAR2(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00005_cuenta_no_checkColumnConstraints(p_cuenta_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cuenta_no LIKE cgtb00005.cuenta_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cuenta_no IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cuenta_no: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00005_cuenta_no_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00005.cheque_no" column
-#+
-#+ @param p_cheque_no - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00005_cheque_no_checkColumnConstraints(p_cheque_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cheque_no LIKE cgtb00005.cheque_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cheque_no IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cheque_no: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00005_cheque_no_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00005.num_emp" column
-#+
-#+ @param p_num_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00005_num_emp_checkColumnConstraints(p_num_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_emp LIKE cgtb00005.num_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00005_num_emp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00005.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00005_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE cgtb00005.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_fecha IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- fecha: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00005_fecha_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00005.portador" column
-#+
-#+ @param p_portador - VARCHAR2(44) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00005_portador_checkColumnConstraints(p_portador)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_portador LIKE cgtb00005.portador
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_portador IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- portador: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00005_portador_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00005.tasa" column
-#+
-#+ @param p_tasa - DECIMAL(8,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00005_tasa_checkColumnConstraints(p_tasa)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tasa LIKE cgtb00005.tasa
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00005_tasa_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00005.monto" column
-#+
-#+ @param p_monto - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00005_monto_checkColumnConstraints(p_monto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_monto LIKE cgtb00005.monto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_monto IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- monto: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00005_monto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00005.status_impresion" column
-#+
-#+ @param p_status_impresion - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00005_status_impresion_checkColumnConstraints(p_status_impresion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_impresion LIKE cgtb00005.status_impresion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00005_status_impresion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00005.status_t" column
-#+
-#+ @param p_status_t - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00005_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cgtb00005.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00005_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00005.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00005_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cgtb00005.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00005_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00005.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00005_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cgtb00005.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00005_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00005.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00005_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cgtb00005.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00005_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00005.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00005_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cgtb00005.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00005_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00004" table
-#+
-#+ @param p_data - a row data LIKE cgtb00004.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00004_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cgtb00004.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cgtb00004_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00004_tipo_checkColumnConstraints(p_data.tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00004_ref_checkColumnConstraints(p_data.ref) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00004_cuenta_no_checkColumnConstraints(p_data.cuenta_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00004_departamento_checkColumnConstraints(p_data.departamento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00004_num_doc_checkColumnConstraints(p_data.num_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00004_cod_aux_checkColumnConstraints(p_data.cod_aux) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00004_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00004_detalles_checkColumnConstraints(p_data.detalles) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00004_detalle_1_checkColumnConstraints(p_data.detalle_1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00004_detalle_2_checkColumnConstraints(p_data.detalle_2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00004_debito_checkColumnConstraints(p_data.debito) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00004_credito_checkColumnConstraints(p_data.credito) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00004_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00004_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00004_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00004_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00004_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00004_checkTableConstraints
-
-{}
-#+ Check constraints on the "cgtb00004.fecha" column
-#+
-#+ @param p_fecha - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00004_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE cgtb00004.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00004_fecha_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00004.tipo" column
-#+
-#+ @param p_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00004_tipo_checkColumnConstraints(p_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo LIKE cgtb00004.tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00004_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00004.ref" column
-#+
-#+ @param p_ref - VARCHAR2(14) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00004_ref_checkColumnConstraints(p_ref)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ref LIKE cgtb00004.ref
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_ref IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- ref: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00004_ref_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00004.cuenta_no" column
-#+
-#+ @param p_cuenta_no - VARCHAR2(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00004_cuenta_no_checkColumnConstraints(p_cuenta_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cuenta_no LIKE cgtb00004.cuenta_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00004_cuenta_no_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00004.departamento" column
-#+
-#+ @param p_departamento - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00004_departamento_checkColumnConstraints(p_departamento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_departamento LIKE cgtb00004.departamento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00004_departamento_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00004.num_doc" column
-#+
-#+ @param p_num_doc - VARCHAR2(12) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00004_num_doc_checkColumnConstraints(p_num_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_doc LIKE cgtb00004.num_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00004_num_doc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00004.cod_aux" column
-#+
-#+ @param p_cod_aux - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00004_cod_aux_checkColumnConstraints(p_cod_aux)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_aux LIKE cgtb00004.cod_aux
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00004_cod_aux_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00004.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00004_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE cgtb00004.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00004_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00004.detalles" column
-#+
-#+ @param p_detalles - VARCHAR2(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00004_detalles_checkColumnConstraints(p_detalles)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_detalles LIKE cgtb00004.detalles
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00004_detalles_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00004.detalle_1" column
-#+
-#+ @param p_detalle_1 - VARCHAR2(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00004_detalle_1_checkColumnConstraints(p_detalle_1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_detalle_1 LIKE cgtb00004.detalle_1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00004_detalle_1_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00004.detalle_2" column
-#+
-#+ @param p_detalle_2 - VARCHAR2(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00004_detalle_2_checkColumnConstraints(p_detalle_2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_detalle_2 LIKE cgtb00004.detalle_2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00004_detalle_2_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00004.debito" column
-#+
-#+ @param p_debito - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00004_debito_checkColumnConstraints(p_debito)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_debito LIKE cgtb00004.debito
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00004_debito_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00004.credito" column
-#+
-#+ @param p_credito - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00004_credito_checkColumnConstraints(p_credito)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_credito LIKE cgtb00004.credito
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00004_credito_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00004.status_t" column
-#+
-#+ @param p_status_t - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00004_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cgtb00004.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00004_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00004.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00004_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cgtb00004.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00004_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00004.fech_crea" column
-#+
-#+ @param p_fech_crea - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00004_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cgtb00004.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00004_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00004.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00004_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cgtb00004.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00004_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00004.fech_mod" column
-#+
-#+ @param p_fech_mod - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00004_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cgtb00004.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00004_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00003" table
-#+
-#+ @param p_data - a row data LIKE cgtb00003.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00003_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cgtb00003.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cgtb00003_tipo_checkColumnConstraints(p_data.tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00003_clave_checkColumnConstraints(p_data.clave) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00003_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00003_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00003_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00003_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00003_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00003_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00003_checkTableConstraints
-
-{}
-#+ Check constraints on the "cgtb00003.tipo" column
-#+
-#+ @param p_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00003_tipo_checkColumnConstraints(p_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo LIKE cgtb00003.tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00003_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00003.clave" column
-#+
-#+ @param p_clave - CHAR(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00003_clave_checkColumnConstraints(p_clave)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_clave LIKE cgtb00003.clave
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00003_clave_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00003.descripcion" column
-#+
-#+ @param p_descripcion - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00003_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE cgtb00003.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00003_descripcion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00003.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00003_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cgtb00003.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00003_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00003.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00003_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cgtb00003.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00003_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00003.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00003_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cgtb00003.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00003_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00003.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00003_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cgtb00003.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00003_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00003.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00003_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cgtb00003.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00003_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00002" table
-#+
-#+ @param p_data - a row data LIKE cgtb00002.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00002_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cgtb00002.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cgtb00002_cuenta_no_checkColumnConstraints(p_data.cuenta_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00002_departamento_checkColumnConstraints(p_data.departamento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00002_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00002_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00002_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00002_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00002_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00002_checkTableConstraints
-
-{}
-#+ Check constraints on the "cgtb00002.cuenta_no" column
-#+
-#+ @param p_cuenta_no - CHAR(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00002_cuenta_no_checkColumnConstraints(p_cuenta_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cuenta_no LIKE cgtb00002.cuenta_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00002_cuenta_no_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00002.departamento" column
-#+
-#+ @param p_departamento - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00002_departamento_checkColumnConstraints(p_departamento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_departamento LIKE cgtb00002.departamento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00002_departamento_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00002.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00002_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cgtb00002.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00002_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00002.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00002_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cgtb00002.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00002_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00002.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00002_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cgtb00002.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00002_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00002.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00002_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cgtb00002.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00002_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00002.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00002_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cgtb00002.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00002_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00001" table
-#+
-#+ @param p_data - a row data LIKE cgtb00001.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00001_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cgtb00001.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cgtb00001_cuenta_no_checkColumnConstraints(p_data.cuenta_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00001_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00001_descrip_ing_checkColumnConstraints(p_data.descrip_ing) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00001_analitico_checkColumnConstraints(p_data.analitico) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00001_cata_checkColumnConstraints(p_data.cata) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00001_depto_checkColumnConstraints(p_data.depto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00001_nivel_checkColumnConstraints(p_data.nivel) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00001_ref_checkColumnConstraints(p_data.ref) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00001_origen_checkColumnConstraints(p_data.origen) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00001_estado_a_checkColumnConstraints(p_data.estado_a) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00001_estado_m_checkColumnConstraints(p_data.estado_m) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00001_aplica_a_checkColumnConstraints(p_data.aplica_a) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00001_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00001_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00001_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00001_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00001_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00001_cuenta_resultado_checkColumnConstraints(p_data.cuenta_resultado) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00001_grupo_checkColumnConstraints(p_data.grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00001_checkTableConstraints
-
-{}
-#+ Check constraints on the "cgtb00001.cuenta_no" column
-#+
-#+ @param p_cuenta_no - VARCHAR2(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00001_cuenta_no_checkColumnConstraints(p_cuenta_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cuenta_no LIKE cgtb00001.cuenta_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00001_cuenta_no_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00001.descripcion" column
-#+
-#+ @param p_descripcion - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00001_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE cgtb00001.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00001_descripcion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00001.descrip_ing" column
-#+
-#+ @param p_descrip_ing - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00001_descrip_ing_checkColumnConstraints(p_descrip_ing)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descrip_ing LIKE cgtb00001.descrip_ing
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00001_descrip_ing_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00001.analitico" column
-#+
-#+ @param p_analitico - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00001_analitico_checkColumnConstraints(p_analitico)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_analitico LIKE cgtb00001.analitico
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00001_analitico_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00001.cata" column
-#+
-#+ @param p_cata - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00001_cata_checkColumnConstraints(p_cata)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cata LIKE cgtb00001.cata
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00001_cata_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00001.depto" column
-#+
-#+ @param p_depto - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00001_depto_checkColumnConstraints(p_depto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_depto LIKE cgtb00001.depto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00001_depto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00001.nivel" column
-#+
-#+ @param p_nivel - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00001_nivel_checkColumnConstraints(p_nivel)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nivel LIKE cgtb00001.nivel
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00001_nivel_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00001.ref" column
-#+
-#+ @param p_ref - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00001_ref_checkColumnConstraints(p_ref)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ref LIKE cgtb00001.ref
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00001_ref_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00001.origen" column
-#+
-#+ @param p_origen - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00001_origen_checkColumnConstraints(p_origen)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_origen LIKE cgtb00001.origen
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00001_origen_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00001.estado_a" column
-#+
-#+ @param p_estado_a - VARCHAR2(4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00001_estado_a_checkColumnConstraints(p_estado_a)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_estado_a LIKE cgtb00001.estado_a
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00001_estado_a_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00001.estado_m" column
-#+
-#+ @param p_estado_m - VARCHAR2(4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00001_estado_m_checkColumnConstraints(p_estado_m)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_estado_m LIKE cgtb00001.estado_m
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00001_estado_m_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00001.aplica_a" column
-#+
-#+ @param p_aplica_a - VARCHAR2(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00001_aplica_a_checkColumnConstraints(p_aplica_a)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_aplica_a LIKE cgtb00001.aplica_a
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00001_aplica_a_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00001.status_t" column
-#+
-#+ @param p_status_t - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00001_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cgtb00001.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00001_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00001.us_crea" column
-#+
-#+ @param p_us_crea - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00001_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cgtb00001.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00001_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00001.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00001_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cgtb00001.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00001_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00001.us_mod" column
-#+
-#+ @param p_us_mod - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00001_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cgtb00001.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00001_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00001.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00001_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cgtb00001.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00001_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00001.cuenta_resultado" column
-#+
-#+ @param p_cuenta_resultado - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00001_cuenta_resultado_checkColumnConstraints(p_cuenta_resultado)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cuenta_resultado LIKE cgtb00001.cuenta_resultado
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00001_cuenta_resultado_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cgtb00001.grupo" column
-#+
-#+ @param p_grupo - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00001_grupo_checkColumnConstraints(p_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_grupo LIKE cgtb00001.grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cgtb00001_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00041" table
-#+
-#+ @param p_data - a row data LIKE cctb00041.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00041_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cctb00041.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cctb00041_num_doc_checkColumnConstraints(p_data.num_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00041_tipo_doc_checkColumnConstraints(p_data.tipo_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00041_num_req_checkColumnConstraints(p_data.num_req) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00041_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00041_checkTableConstraints
-
-{}
-#+ Check constraints on the "cctb00041.num_doc" column
-#+
-#+ @param p_num_doc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00041_num_doc_checkColumnConstraints(p_num_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_doc LIKE cctb00041.num_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00041_num_doc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00041.tipo_doc" column
-#+
-#+ @param p_tipo_doc - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00041_tipo_doc_checkColumnConstraints(p_tipo_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_doc LIKE cctb00041.tipo_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00041_tipo_doc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00041.num_req" column
-#+
-#+ @param p_num_req - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00041_num_req_checkColumnConstraints(p_num_req)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_req LIKE cctb00041.num_req
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00041_num_req_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00041.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00041_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE cctb00041.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00041_fecha_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00040" table
-#+
-#+ @param p_data - a row data LIKE cctb00040.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00040_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cctb00040.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cctb00040_num_req_checkColumnConstraints(p_data.num_req) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00040_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00040_usuario_checkColumnConstraints(p_data.usuario) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00040_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00040_checkTableConstraints
-
-{}
-#+ Check constraints on the "cctb00040.num_req" column
-#+
-#+ @param p_num_req - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00040_num_req_checkColumnConstraints(p_num_req)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_req LIKE cctb00040.num_req
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_num_req IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- num_req: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00040_num_req_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00040.fecha" column
-#+
-#+ @param p_fecha - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00040_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE cctb00040.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00040_fecha_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00040.usuario" column
-#+
-#+ @param p_usuario - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00040_usuario_checkColumnConstraints(p_usuario)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_usuario LIKE cctb00040.usuario
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00040_usuario_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00040.descripcion" column
-#+
-#+ @param p_descripcion - CHAR(220) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00040_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE cctb00040.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00040_descripcion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00034" table
-#+
-#+ @param p_data - a row data LIKE cctb00034.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00034_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cctb00034.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cctb00034_id_kit_checkColumnConstraints(p_data.id_kit) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00034_num_req_checkColumnConstraints(p_data.num_req) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00034_area_checkColumnConstraints(p_data.area) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00034_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00034_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00034_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00034_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00034_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00034_precio_checkColumnConstraints(p_data.precio) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00034_checkTableConstraints
-
-{}
-#+ Check constraints on the "cctb00034.id_kit" column
-#+
-#+ @param p_id_kit - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00034_id_kit_checkColumnConstraints(p_id_kit)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_id_kit LIKE cctb00034.id_kit
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00034_id_kit_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00034.num_req" column
-#+
-#+ @param p_num_req - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00034_num_req_checkColumnConstraints(p_num_req)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_req LIKE cctb00034.num_req
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00034_num_req_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00034.area" column
-#+
-#+ @param p_area - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00034_area_checkColumnConstraints(p_area)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_area LIKE cctb00034.area
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00034_area_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00034.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00034_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE cctb00034.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00034_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00034.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00034_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE cctb00034.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00034_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00034.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00034_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE cctb00034.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00034_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00034.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00034_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE cctb00034.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00034_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00034.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00034_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE cctb00034.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00034_cantidad_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00034.precio" column
-#+
-#+ @param p_precio - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00034_precio_checkColumnConstraints(p_precio)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_precio LIKE cctb00034.precio
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00034_precio_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00033" table
-#+
-#+ @param p_data - a row data LIKE cctb00033.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00033_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cctb00033.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cctb00033_idnum_checkColumnConstraints(p_data.idnum) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00033_num_doc_checkColumnConstraints(p_data.num_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00033_num_ref_checkColumnConstraints(p_data.num_ref) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00033_aplica_a_checkColumnConstraints(p_data.aplica_a) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00033_pendiente_checkColumnConstraints(p_data.pendiente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00033_descuento_checkColumnConstraints(p_data.descuento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00033_valor_pagado_checkColumnConstraints(p_data.valor_pagado) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00033_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00033_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00033_fecha_crea_checkColumnConstraints(p_data.fecha_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00033_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00033_fecha_mod_checkColumnConstraints(p_data.fecha_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00033_checkTableConstraints
-
-{}
-#+ Check constraints on the "cctb00033.idnum" column
-#+
-#+ @param p_idnum - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00033_idnum_checkColumnConstraints(p_idnum)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_idnum LIKE cctb00033.idnum
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00033_idnum_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00033.num_doc" column
-#+
-#+ @param p_num_doc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00033_num_doc_checkColumnConstraints(p_num_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_doc LIKE cctb00033.num_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00033_num_doc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00033.num_ref" column
-#+
-#+ @param p_num_ref - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00033_num_ref_checkColumnConstraints(p_num_ref)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_ref LIKE cctb00033.num_ref
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00033_num_ref_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00033.aplica_a" column
-#+
-#+ @param p_aplica_a - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00033_aplica_a_checkColumnConstraints(p_aplica_a)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_aplica_a LIKE cctb00033.aplica_a
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00033_aplica_a_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00033.pendiente" column
-#+
-#+ @param p_pendiente - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00033_pendiente_checkColumnConstraints(p_pendiente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_pendiente LIKE cctb00033.pendiente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00033_pendiente_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00033.descuento" column
-#+
-#+ @param p_descuento - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00033_descuento_checkColumnConstraints(p_descuento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descuento LIKE cctb00033.descuento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00033_descuento_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00033.valor_pagado" column
-#+
-#+ @param p_valor_pagado - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00033_valor_pagado_checkColumnConstraints(p_valor_pagado)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valor_pagado LIKE cctb00033.valor_pagado
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00033_valor_pagado_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00033.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00033_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cctb00033.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00033_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00033.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00033_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cctb00033.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00033_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00033.fecha_crea" column
-#+
-#+ @param p_fecha_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00033_fecha_crea_checkColumnConstraints(p_fecha_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_crea LIKE cctb00033.fecha_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00033_fecha_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00033.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00033_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cctb00033.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00033_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00033.fecha_mod" column
-#+
-#+ @param p_fecha_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00033_fecha_mod_checkColumnConstraints(p_fecha_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_mod LIKE cctb00033.fecha_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00033_fecha_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00032" table
-#+
-#+ @param p_data - a row data LIKE cctb00032.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00032_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cctb00032.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cctb00032_idnum_checkColumnConstraints(p_data.idnum) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00032_num_doc_checkColumnConstraints(p_data.num_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00032_tipo_doc_checkColumnConstraints(p_data.tipo_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00032_localidad_checkColumnConstraints(p_data.localidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00032_cuenta_no_checkColumnConstraints(p_data.cuenta_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00032_depsito_checkColumnConstraints(p_data.depsito) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00032_tipo_cliente_checkColumnConstraints(p_data.tipo_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00032_sec_cliente_checkColumnConstraints(p_data.sec_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00032_sec_vend_checkColumnConstraints(p_data.sec_vend) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00032_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00032_comentario_checkColumnConstraints(p_data.comentario) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00032_valor_recibo_checkColumnConstraints(p_data.valor_recibo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00032_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00032_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00032_fecha_crea_checkColumnConstraints(p_data.fecha_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00032_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00032_fecha_mod_checkColumnConstraints(p_data.fecha_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00032_checkTableConstraints
-
-{}
-#+ Check constraints on the "cctb00032.idnum" column
-#+
-#+ @param p_idnum - SERIAL -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00032_idnum_checkColumnConstraints(p_idnum)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_idnum LIKE cctb00032.idnum
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_idnum IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- idnum: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00032_idnum_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00032.num_doc" column
-#+
-#+ @param p_num_doc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00032_num_doc_checkColumnConstraints(p_num_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_doc LIKE cctb00032.num_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00032_num_doc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00032.tipo_doc" column
-#+
-#+ @param p_tipo_doc - CHAR(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00032_tipo_doc_checkColumnConstraints(p_tipo_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_doc LIKE cctb00032.tipo_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00032_tipo_doc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00032.localidad" column
-#+
-#+ @param p_localidad - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00032_localidad_checkColumnConstraints(p_localidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_localidad LIKE cctb00032.localidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00032_localidad_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00032.cuenta_no" column
-#+
-#+ @param p_cuenta_no - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00032_cuenta_no_checkColumnConstraints(p_cuenta_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cuenta_no LIKE cctb00032.cuenta_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00032_cuenta_no_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00032.depsito" column
-#+
-#+ @param p_depsito - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00032_depsito_checkColumnConstraints(p_depsito)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_depsito LIKE cctb00032.depsito
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00032_depsito_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00032.tipo_cliente" column
-#+
-#+ @param p_tipo_cliente - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00032_tipo_cliente_checkColumnConstraints(p_tipo_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_cliente LIKE cctb00032.tipo_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00032_tipo_cliente_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00032.sec_cliente" column
-#+
-#+ @param p_sec_cliente - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00032_sec_cliente_checkColumnConstraints(p_sec_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_cliente LIKE cctb00032.sec_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00032_sec_cliente_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00032.sec_vend" column
-#+
-#+ @param p_sec_vend - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00032_sec_vend_checkColumnConstraints(p_sec_vend)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_vend LIKE cctb00032.sec_vend
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00032_sec_vend_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00032.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00032_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE cctb00032.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00032_fecha_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00032.comentario" column
-#+
-#+ @param p_comentario - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00032_comentario_checkColumnConstraints(p_comentario)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_comentario LIKE cctb00032.comentario
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00032_comentario_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00032.valor_recibo" column
-#+
-#+ @param p_valor_recibo - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00032_valor_recibo_checkColumnConstraints(p_valor_recibo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valor_recibo LIKE cctb00032.valor_recibo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00032_valor_recibo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00032.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00032_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cctb00032.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00032_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00032.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00032_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cctb00032.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00032_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00032.fecha_crea" column
-#+
-#+ @param p_fecha_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00032_fecha_crea_checkColumnConstraints(p_fecha_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_crea LIKE cctb00032.fecha_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00032_fecha_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00032.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00032_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cctb00032.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00032_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00032.fecha_mod" column
-#+
-#+ @param p_fecha_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00032_fecha_mod_checkColumnConstraints(p_fecha_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_mod LIKE cctb00032.fecha_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00032_fecha_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00031" table
-#+
-#+ @param p_data - a row data LIKE cctb00031.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00031_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cctb00031.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cctb00031_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00031_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00031_sec_vend_checkColumnConstraints(p_data.sec_vend) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00031_nombrevendedor_checkColumnConstraints(p_data.nombrevendedor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00031_tipo_cliente_checkColumnConstraints(p_data.tipo_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00031_sec_cliente_checkColumnConstraints(p_data.sec_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00031_nombrecliente_checkColumnConstraints(p_data.nombrecliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00031_num_req_checkColumnConstraints(p_data.num_req) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00031_limite_cr_checkColumnConstraints(p_data.limite_cr) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00031_monto_cotizacion_checkColumnConstraints(p_data.monto_cotizacion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00031_balance_checkColumnConstraints(p_data.balance) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00031_estado_checkColumnConstraints(p_data.estado) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00031_documento_ref_checkColumnConstraints(p_data.documento_ref) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00031_tipo_doc_ref_checkColumnConstraints(p_data.tipo_doc_ref) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00031_monto_req_checkColumnConstraints(p_data.monto_req) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00031_factura_checkColumnConstraints(p_data.factura) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00031_fecha_vence_checkColumnConstraints(p_data.fecha_vence) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00031_checkTableConstraints
-
-{}
-#+ Check constraints on the "cctb00031.fecha" column
-#+
-#+ @param p_fecha - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00031_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE cctb00031.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00031_fecha_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00031.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00031_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cctb00031.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00031_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00031.sec_vend" column
-#+
-#+ @param p_sec_vend - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00031_sec_vend_checkColumnConstraints(p_sec_vend)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_vend LIKE cctb00031.sec_vend
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00031_sec_vend_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00031.nombrevendedor" column
-#+
-#+ @param p_nombrevendedor - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00031_nombrevendedor_checkColumnConstraints(p_nombrevendedor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombrevendedor LIKE cctb00031.nombrevendedor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00031_nombrevendedor_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00031.tipo_cliente" column
-#+
-#+ @param p_tipo_cliente - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00031_tipo_cliente_checkColumnConstraints(p_tipo_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_cliente LIKE cctb00031.tipo_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00031_tipo_cliente_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00031.sec_cliente" column
-#+
-#+ @param p_sec_cliente - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00031_sec_cliente_checkColumnConstraints(p_sec_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_cliente LIKE cctb00031.sec_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00031_sec_cliente_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00031.nombrecliente" column
-#+
-#+ @param p_nombrecliente - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00031_nombrecliente_checkColumnConstraints(p_nombrecliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombrecliente LIKE cctb00031.nombrecliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00031_nombrecliente_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00031.num_req" column
-#+
-#+ @param p_num_req - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00031_num_req_checkColumnConstraints(p_num_req)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_req LIKE cctb00031.num_req
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00031_num_req_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00031.limite_cr" column
-#+
-#+ @param p_limite_cr - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00031_limite_cr_checkColumnConstraints(p_limite_cr)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_limite_cr LIKE cctb00031.limite_cr
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00031_limite_cr_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00031.monto_cotizacion" column
-#+
-#+ @param p_monto_cotizacion - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00031_monto_cotizacion_checkColumnConstraints(p_monto_cotizacion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_monto_cotizacion LIKE cctb00031.monto_cotizacion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00031_monto_cotizacion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00031.balance" column
-#+
-#+ @param p_balance - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00031_balance_checkColumnConstraints(p_balance)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_balance LIKE cctb00031.balance
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00031_balance_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00031.estado" column
-#+
-#+ @param p_estado - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00031_estado_checkColumnConstraints(p_estado)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_estado LIKE cctb00031.estado
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00031_estado_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00031.documento_ref" column
-#+
-#+ @param p_documento_ref - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00031_documento_ref_checkColumnConstraints(p_documento_ref)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_documento_ref LIKE cctb00031.documento_ref
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00031_documento_ref_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00031.tipo_doc_ref" column
-#+
-#+ @param p_tipo_doc_ref - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00031_tipo_doc_ref_checkColumnConstraints(p_tipo_doc_ref)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_doc_ref LIKE cctb00031.tipo_doc_ref
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00031_tipo_doc_ref_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00031.monto_req" column
-#+
-#+ @param p_monto_req - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00031_monto_req_checkColumnConstraints(p_monto_req)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_monto_req LIKE cctb00031.monto_req
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00031_monto_req_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00031.factura" column
-#+
-#+ @param p_factura - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00031_factura_checkColumnConstraints(p_factura)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_factura LIKE cctb00031.factura
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00031_factura_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00031.fecha_vence" column
-#+
-#+ @param p_fecha_vence - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00031_fecha_vence_checkColumnConstraints(p_fecha_vence)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_vence LIKE cctb00031.fecha_vence
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00031_fecha_vence_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00030" table
-#+
-#+ @param p_data - a row data LIKE cctb00030.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00030_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cctb00030.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cctb00030_num_req_checkColumnConstraints(p_data.num_req) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00030_etiqueta_checkColumnConstraints(p_data.etiqueta) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00030_num_oc_checkColumnConstraints(p_data.num_oc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00030_secuencia_checkColumnConstraints(p_data.secuencia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00030_area_checkColumnConstraints(p_data.area) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00030_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00030_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00030_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00030_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00030_lado_1_checkColumnConstraints(p_data.lado_1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00030_lado_2_checkColumnConstraints(p_data.lado_2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00030_lado_3_checkColumnConstraints(p_data.lado_3) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00030_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00030_medida_checkColumnConstraints(p_data.medida) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00030_cantidad_r_checkColumnConstraints(p_data.cantidad_r) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00030_medida_r_checkColumnConstraints(p_data.medida_r) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00030_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00030_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00030_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00030_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00030_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00030_checkTableConstraints
-
-{}
-#+ Check constraints on the "cctb00030.num_req" column
-#+
-#+ @param p_num_req - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00030_num_req_checkColumnConstraints(p_num_req)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_req LIKE cctb00030.num_req
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_num_req IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- num_req: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00030_num_req_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00030.etiqueta" column
-#+
-#+ @param p_etiqueta - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00030_etiqueta_checkColumnConstraints(p_etiqueta)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_etiqueta LIKE cctb00030.etiqueta
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00030_etiqueta_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00030.num_oc" column
-#+
-#+ @param p_num_oc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00030_num_oc_checkColumnConstraints(p_num_oc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_oc LIKE cctb00030.num_oc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_num_oc IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- num_oc: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00030_num_oc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00030.secuencia" column
-#+
-#+ @param p_secuencia - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00030_secuencia_checkColumnConstraints(p_secuencia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_secuencia LIKE cctb00030.secuencia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_secuencia IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- secuencia: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00030_secuencia_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00030.area" column
-#+
-#+ @param p_area - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00030_area_checkColumnConstraints(p_area)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_area LIKE cctb00030.area
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00030_area_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00030.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00030_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE cctb00030.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_n IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_n: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00030_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00030.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00030_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE cctb00030.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_grupo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_grupo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00030_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00030.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00030_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE cctb00030.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_tipo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_tipo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00030_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00030.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00030_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE cctb00030.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_sec IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_sec: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00030_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00030.lado_1" column
-#+
-#+ @param p_lado_1 - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00030_lado_1_checkColumnConstraints(p_lado_1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_lado_1 LIKE cctb00030.lado_1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00030_lado_1_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00030.lado_2" column
-#+
-#+ @param p_lado_2 - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00030_lado_2_checkColumnConstraints(p_lado_2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_lado_2 LIKE cctb00030.lado_2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00030_lado_2_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00030.lado_3" column
-#+
-#+ @param p_lado_3 - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00030_lado_3_checkColumnConstraints(p_lado_3)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_lado_3 LIKE cctb00030.lado_3
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00030_lado_3_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00030.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00030_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE cctb00030.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cantidad IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cantidad: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00030_cantidad_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00030.medida" column
-#+
-#+ @param p_medida - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00030_medida_checkColumnConstraints(p_medida)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_medida LIKE cctb00030.medida
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_medida IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- medida: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00030_medida_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00030.cantidad_r" column
-#+
-#+ @param p_cantidad_r - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00030_cantidad_r_checkColumnConstraints(p_cantidad_r)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad_r LIKE cctb00030.cantidad_r
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cantidad_r IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cantidad_r: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00030_cantidad_r_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00030.medida_r" column
-#+
-#+ @param p_medida_r - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00030_medida_r_checkColumnConstraints(p_medida_r)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_medida_r LIKE cctb00030.medida_r
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_medida_r IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- medida_r: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00030_medida_r_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00030.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00030_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cctb00030.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00030_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00030.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00030_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cctb00030.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00030_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00030.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00030_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cctb00030.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00030_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00030.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00030_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cctb00030.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00030_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00030.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00030_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cctb00030.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00030_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00029" table
-#+
-#+ @param p_data - a row data LIKE cctb00029.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00029_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cctb00029.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cctb00029_num_req_checkColumnConstraints(p_data.num_req) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00029_mensaje_checkColumnConstraints(p_data.mensaje) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00029_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00029_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00029_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00029_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00029_checkTableConstraints
-
-{}
-#+ Check constraints on the "cctb00029.num_req" column
-#+
-#+ @param p_num_req - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00029_num_req_checkColumnConstraints(p_num_req)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_req LIKE cctb00029.num_req
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_num_req IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- num_req: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00029_num_req_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00029.mensaje" column
-#+
-#+ @param p_mensaje - VARCHAR2(200) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00029_mensaje_checkColumnConstraints(p_mensaje)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mensaje LIKE cctb00029.mensaje
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00029_mensaje_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00029.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00029_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cctb00029.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00029_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00029.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00029_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cctb00029.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00029_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00029.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00029_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cctb00029.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00029_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00029.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00029_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cctb00029.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00029_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00028" table
-#+
-#+ @param p_data - a row data LIKE cctb00028.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00028_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cctb00028.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cctb00028_num_temp_req_checkColumnConstraints(p_data.num_temp_req) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00028_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00028_checkTableConstraints
-
-{}
-#+ Check constraints on the "cctb00028.num_temp_req" column
-#+
-#+ @param p_num_temp_req - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00028_num_temp_req_checkColumnConstraints(p_num_temp_req)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_temp_req LIKE cctb00028.num_temp_req
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00028_num_temp_req_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00028.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00028_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cctb00028.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00028_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00027" table
-#+
-#+ @param p_data - a row data LIKE cctb00027.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00027_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cctb00027.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cctb00027_num_req_checkColumnConstraints(p_data.num_req) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00027_etiqueta_checkColumnConstraints(p_data.etiqueta) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00027_num_oc_checkColumnConstraints(p_data.num_oc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00027_secuencia_checkColumnConstraints(p_data.secuencia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00027_area_checkColumnConstraints(p_data.area) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00027_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00027_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00027_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00027_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00027_lado_1_checkColumnConstraints(p_data.lado_1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00027_lado_2_checkColumnConstraints(p_data.lado_2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00027_lado_3_checkColumnConstraints(p_data.lado_3) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00027_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00027_medida_checkColumnConstraints(p_data.medida) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00027_cantidad_r_checkColumnConstraints(p_data.cantidad_r) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00027_medida_r_checkColumnConstraints(p_data.medida_r) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00027_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00027_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00027_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00027_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00027_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00027_checkTableConstraints
-
-{}
-#+ Check constraints on the "cctb00027.num_req" column
-#+
-#+ @param p_num_req - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00027_num_req_checkColumnConstraints(p_num_req)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_req LIKE cctb00027.num_req
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_num_req IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- num_req: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00027_num_req_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00027.etiqueta" column
-#+
-#+ @param p_etiqueta - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00027_etiqueta_checkColumnConstraints(p_etiqueta)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_etiqueta LIKE cctb00027.etiqueta
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00027_etiqueta_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00027.num_oc" column
-#+
-#+ @param p_num_oc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00027_num_oc_checkColumnConstraints(p_num_oc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_oc LIKE cctb00027.num_oc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_num_oc IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- num_oc: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00027_num_oc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00027.secuencia" column
-#+
-#+ @param p_secuencia - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00027_secuencia_checkColumnConstraints(p_secuencia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_secuencia LIKE cctb00027.secuencia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_secuencia IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- secuencia: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00027_secuencia_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00027.area" column
-#+
-#+ @param p_area - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00027_area_checkColumnConstraints(p_area)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_area LIKE cctb00027.area
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00027_area_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00027.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00027_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE cctb00027.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_n IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_n: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00027_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00027.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00027_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE cctb00027.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_grupo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_grupo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00027_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00027.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00027_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE cctb00027.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_tipo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_tipo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00027_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00027.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00027_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE cctb00027.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_sec IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_sec: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00027_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00027.lado_1" column
-#+
-#+ @param p_lado_1 - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00027_lado_1_checkColumnConstraints(p_lado_1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_lado_1 LIKE cctb00027.lado_1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00027_lado_1_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00027.lado_2" column
-#+
-#+ @param p_lado_2 - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00027_lado_2_checkColumnConstraints(p_lado_2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_lado_2 LIKE cctb00027.lado_2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00027_lado_2_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00027.lado_3" column
-#+
-#+ @param p_lado_3 - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00027_lado_3_checkColumnConstraints(p_lado_3)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_lado_3 LIKE cctb00027.lado_3
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00027_lado_3_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00027.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00027_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE cctb00027.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cantidad IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cantidad: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00027_cantidad_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00027.medida" column
-#+
-#+ @param p_medida - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00027_medida_checkColumnConstraints(p_medida)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_medida LIKE cctb00027.medida
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_medida IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- medida: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00027_medida_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00027.cantidad_r" column
-#+
-#+ @param p_cantidad_r - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00027_cantidad_r_checkColumnConstraints(p_cantidad_r)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad_r LIKE cctb00027.cantidad_r
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cantidad_r IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cantidad_r: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00027_cantidad_r_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00027.medida_r" column
-#+
-#+ @param p_medida_r - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00027_medida_r_checkColumnConstraints(p_medida_r)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_medida_r LIKE cctb00027.medida_r
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_medida_r IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- medida_r: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00027_medida_r_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00027.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00027_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cctb00027.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00027_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00027.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00027_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cctb00027.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00027_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00027.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00027_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cctb00027.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00027_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00027.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00027_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cctb00027.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00027_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00027.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00027_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cctb00027.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00027_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00026" table
-#+
-#+ @param p_data - a row data LIKE cctb00026.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00026_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cctb00026.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cctb00026_num_req_checkColumnConstraints(p_data.num_req) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00026_num_oc_checkColumnConstraints(p_data.num_oc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00026_cotizacion_no_checkColumnConstraints(p_data.cotizacion_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00026_id_checkColumnConstraints(p_data.id) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00026_area_checkColumnConstraints(p_data.area) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00026_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00026_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00026_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00026_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00026_cantidad_ord1_checkColumnConstraints(p_data.cantidad_ord1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00026_cantidad_ord_checkColumnConstraints(p_data.cantidad_ord) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00026_cantidad_1_checkColumnConstraints(p_data.cantidad_1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00026_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00026_precio_checkColumnConstraints(p_data.precio) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00026_descuento_checkColumnConstraints(p_data.descuento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00026_descvalor_checkColumnConstraints(p_data.descvalor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00026_valor_checkColumnConstraints(p_data.valor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00026_estado_checkColumnConstraints(p_data.estado) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00026_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00026_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00026_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00026_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00026_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00026_fecha_transporte_checkColumnConstraints(p_data.fecha_transporte) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00026_fecha_llegada_checkColumnConstraints(p_data.fecha_llegada) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00026_id_kit_checkColumnConstraints(p_data.id_kit) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- CALL smarmotech_dbxconstraints_cctb00026_pk_cctb00026_1_checkUniqueConstraint(p_forUpdate, p_data.num_req, p_data.num_oc, p_data.cotizacion_no, p_data.area, p_data.cod_n, p_data.cod_grupo, p_data.cod_tipo, p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00026_checkTableConstraints
-
-{}
-#+ Check the primary key uniqueness constraint on the "cctb00026"
-#+
-#+ @param p_key - Primary Key
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00026_pk_cctb00026_1_checkUniqueConstraint(p_forUpdate, p_key)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_key
- RECORD
- cctb00026_num_req LIKE cctb00026.num_req,
- cctb00026_num_oc LIKE cctb00026.num_oc,
- cctb00026_cotizacion_no LIKE cctb00026.cotizacion_no,
- cctb00026_area LIKE cctb00026.area,
- cctb00026_cod_n LIKE cctb00026.cod_n,
- cctb00026_cod_grupo LIKE cctb00026.cod_grupo,
- cctb00026_cod_tipo LIKE cctb00026.cod_tipo,
- cctb00026_cod_sec LIKE cctb00026.cod_sec
- END RECORD
- DEFINE l_key
- RECORD
- cctb00026_num_req LIKE cctb00026.num_req,
- cctb00026_num_oc LIKE cctb00026.num_oc,
- cctb00026_cotizacion_no LIKE cctb00026.cotizacion_no,
- cctb00026_area LIKE cctb00026.area,
- cctb00026_cod_n LIKE cctb00026.cod_n,
- cctb00026_cod_grupo LIKE cctb00026.cod_grupo,
- cctb00026_cod_tipo LIKE cctb00026.cod_tipo,
- cctb00026_cod_sec LIKE cctb00026.cod_sec
- END RECORD
- DEFINE l_where STRING
- DEFINE l_sqlQuery STRING
- DEFINE l_count INTEGER
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- LET l_where = "WHERE cctb00026.num_req = ?
- AND cctb00026.num_oc = ?
- AND cctb00026.cotizacion_no = ?
- AND cctb00026.area = ?
- AND cctb00026.cod_n = ?
- AND cctb00026.cod_grupo = ?
- AND cctb00026.cod_tipo = ?
- AND cctb00026.cod_sec = ? "
-
- let l_sqlQuery = "SELECT COUNT(*), num_req, num_oc, cotizacion_no, area, cod_n, cod_grupo, cod_tipo, cod_sec FROM cctb00026 ", l_where, " GROUP BY num_req, num_oc, cotizacion_no, area, cod_n, cod_grupo, cod_tipo, cod_sec"
-
- PREPARE cur_cctb00026_pk_cctb00026_1_checkUniqueConstraint FROM l_sqlQuery
- EXECUTE cur_cctb00026_pk_cctb00026_1_checkUniqueConstraint INTO l_count, l_key.* USING p_key.*
- FREE cur_cctb00026_pk_cctb00026_1_checkUniqueConstraint
- IF (NOT p_forUpdate AND l_count > 0) OR (p_forUpdate AND l_count > 0 AND p_key.* != l_key.*) THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- num_req + num_oc + cotizacion_no + area + cod_n + cod_grupo + cod_tipo + cod_sec: " || ERROR_BAM_00002) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00026_pk_cctb00026_1_checkUniqueConstraint
-
-{}
-#+ Check constraints on the "cctb00026.num_req" column
-#+
-#+ @param p_num_req - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00026_num_req_checkColumnConstraints(p_num_req)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_req LIKE cctb00026.num_req
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_num_req IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- num_req: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00026_num_req_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00026.num_oc" column
-#+
-#+ @param p_num_oc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00026_num_oc_checkColumnConstraints(p_num_oc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_oc LIKE cctb00026.num_oc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_num_oc IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- num_oc: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00026_num_oc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00026.cotizacion_no" column
-#+
-#+ @param p_cotizacion_no - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00026_cotizacion_no_checkColumnConstraints(p_cotizacion_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cotizacion_no LIKE cctb00026.cotizacion_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cotizacion_no IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cotizacion_no: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00026_cotizacion_no_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00026.id" column
-#+
-#+ @param p_id - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00026_id_checkColumnConstraints(p_id)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_id LIKE cctb00026.id
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_id IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- id: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00026_id_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00026.area" column
-#+
-#+ @param p_area - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00026_area_checkColumnConstraints(p_area)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_area LIKE cctb00026.area
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_area IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- area: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00026_area_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00026.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00026_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE cctb00026.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_n IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_n: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00026_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00026.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00026_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE cctb00026.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_grupo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_grupo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00026_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00026.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00026_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE cctb00026.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_tipo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_tipo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00026_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00026.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00026_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE cctb00026.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_sec IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_sec: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00026_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00026.cantidad_ord1" column
-#+
-#+ @param p_cantidad_ord1 - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00026_cantidad_ord1_checkColumnConstraints(p_cantidad_ord1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad_ord1 LIKE cctb00026.cantidad_ord1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00026_cantidad_ord1_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00026.cantidad_ord" column
-#+
-#+ @param p_cantidad_ord - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00026_cantidad_ord_checkColumnConstraints(p_cantidad_ord)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad_ord LIKE cctb00026.cantidad_ord
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cantidad_ord IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cantidad_ord: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00026_cantidad_ord_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00026.cantidad_1" column
-#+
-#+ @param p_cantidad_1 - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00026_cantidad_1_checkColumnConstraints(p_cantidad_1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad_1 LIKE cctb00026.cantidad_1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00026_cantidad_1_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00026.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00026_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE cctb00026.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cantidad IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cantidad: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00026_cantidad_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00026.precio" column
-#+
-#+ @param p_precio - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00026_precio_checkColumnConstraints(p_precio)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_precio LIKE cctb00026.precio
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_precio IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- precio: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00026_precio_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00026.descuento" column
-#+
-#+ @param p_descuento - DECIMAL(8,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00026_descuento_checkColumnConstraints(p_descuento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descuento LIKE cctb00026.descuento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_descuento IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- descuento: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00026_descuento_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00026.descvalor" column
-#+
-#+ @param p_descvalor - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00026_descvalor_checkColumnConstraints(p_descvalor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descvalor LIKE cctb00026.descvalor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_descvalor IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- descvalor: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00026_descvalor_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00026.valor" column
-#+
-#+ @param p_valor - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00026_valor_checkColumnConstraints(p_valor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valor LIKE cctb00026.valor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_valor IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- valor: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00026_valor_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00026.estado" column
-#+
-#+ @param p_estado - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00026_estado_checkColumnConstraints(p_estado)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_estado LIKE cctb00026.estado
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00026_estado_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00026.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00026_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cctb00026.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00026_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00026.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00026_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cctb00026.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_us_crea IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- us_crea: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00026_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00026.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00026_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cctb00026.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_fech_crea IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- fech_crea: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00026_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00026.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00026_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cctb00026.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00026_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00026.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00026_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cctb00026.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00026_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00026.fecha_transporte" column
-#+
-#+ @param p_fecha_transporte - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00026_fecha_transporte_checkColumnConstraints(p_fecha_transporte)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_transporte LIKE cctb00026.fecha_transporte
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00026_fecha_transporte_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00026.fecha_llegada" column
-#+
-#+ @param p_fecha_llegada - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00026_fecha_llegada_checkColumnConstraints(p_fecha_llegada)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_llegada LIKE cctb00026.fecha_llegada
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00026_fecha_llegada_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00026.id_kit" column
-#+
-#+ @param p_id_kit - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00026_id_kit_checkColumnConstraints(p_id_kit)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_id_kit LIKE cctb00026.id_kit
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00026_id_kit_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00025" table
-#+
-#+ @param p_data - a row data LIKE cctb00025.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00025_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cctb00025.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cctb00025_num_req_checkColumnConstraints(p_data.num_req) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00025_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00025_sec_vend_checkColumnConstraints(p_data.sec_vend) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00025_sec_vend_aprobado_checkColumnConstraints(p_data.sec_vend_aprobado) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00025_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00025_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00025_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00025_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00025_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00025_estado_checkColumnConstraints(p_data.estado) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00025_fecha_transporte_checkColumnConstraints(p_data.fecha_transporte) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00025_estado_despacho_checkColumnConstraints(p_data.estado_despacho) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00025_fecha_autorizacion_checkColumnConstraints(p_data.fecha_autorizacion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00025_monto_req_checkColumnConstraints(p_data.monto_req) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- CALL smarmotech_dbxconstraints_cctb00025_pk_cctb00025_checkUniqueConstraint(p_forUpdate, p_data.num_req) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00025_checkTableConstraints
-
-{}
-#+ Check the primary key uniqueness constraint on the "cctb00025"
-#+
-#+ @param p_key - Primary Key
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00025_pk_cctb00025_checkUniqueConstraint(p_forUpdate, p_key)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_key
- RECORD
- cctb00025_num_req LIKE cctb00025.num_req
- END RECORD
- DEFINE l_key
- RECORD
- cctb00025_num_req LIKE cctb00025.num_req
- END RECORD
- DEFINE l_where STRING
- DEFINE l_sqlQuery STRING
- DEFINE l_count INTEGER
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- LET l_where = "WHERE cctb00025.num_req = ? "
-
- let l_sqlQuery = "SELECT COUNT(*), num_req FROM cctb00025 ", l_where, " GROUP BY num_req"
-
- PREPARE cur_cctb00025_pk_cctb00025_checkUniqueConstraint FROM l_sqlQuery
- EXECUTE cur_cctb00025_pk_cctb00025_checkUniqueConstraint INTO l_count, l_key.* USING p_key.*
- FREE cur_cctb00025_pk_cctb00025_checkUniqueConstraint
- IF (NOT p_forUpdate AND l_count > 0) OR (p_forUpdate AND l_count > 0 AND p_key.* != l_key.*) THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- num_req: " || ERROR_BAM_00002) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00025_pk_cctb00025_checkUniqueConstraint
-
-{}
-#+ Check constraints on the "cctb00025.num_req" column
-#+
-#+ @param p_num_req - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00025_num_req_checkColumnConstraints(p_num_req)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_req LIKE cctb00025.num_req
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_num_req IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- num_req: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00025_num_req_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00025.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00025_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE cctb00025.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_fecha IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- fecha: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00025_fecha_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00025.sec_vend" column
-#+
-#+ @param p_sec_vend - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00025_sec_vend_checkColumnConstraints(p_sec_vend)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_vend LIKE cctb00025.sec_vend
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_sec_vend IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- sec_vend: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00025_sec_vend_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00025.sec_vend_aprobado" column
-#+
-#+ @param p_sec_vend_aprobado - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00025_sec_vend_aprobado_checkColumnConstraints(p_sec_vend_aprobado)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_vend_aprobado LIKE cctb00025.sec_vend_aprobado
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00025_sec_vend_aprobado_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00025.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00025_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cctb00025.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00025_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00025.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00025_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cctb00025.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_us_crea IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- us_crea: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00025_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00025.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00025_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cctb00025.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_fech_crea IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- fech_crea: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00025_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00025.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00025_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cctb00025.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00025_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00025.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00025_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cctb00025.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00025_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00025.estado" column
-#+
-#+ @param p_estado - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00025_estado_checkColumnConstraints(p_estado)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_estado LIKE cctb00025.estado
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00025_estado_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00025.fecha_transporte" column
-#+
-#+ @param p_fecha_transporte - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00025_fecha_transporte_checkColumnConstraints(p_fecha_transporte)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_transporte LIKE cctb00025.fecha_transporte
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00025_fecha_transporte_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00025.estado_despacho" column
-#+
-#+ @param p_estado_despacho - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00025_estado_despacho_checkColumnConstraints(p_estado_despacho)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_estado_despacho LIKE cctb00025.estado_despacho
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00025_estado_despacho_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00025.fecha_autorizacion" column
-#+
-#+ @param p_fecha_autorizacion - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00025_fecha_autorizacion_checkColumnConstraints(p_fecha_autorizacion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_autorizacion LIKE cctb00025.fecha_autorizacion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00025_fecha_autorizacion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00025.monto_req" column
-#+
-#+ @param p_monto_req - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00025_monto_req_checkColumnConstraints(p_monto_req)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_monto_req LIKE cctb00025.monto_req
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00025_monto_req_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00024" table
-#+
-#+ @param p_data - a row data LIKE cctb00024.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00024_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cctb00024.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cctb00024_status_mov_checkColumnConstraints(p_data.status_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00024_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00024_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00024_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00024_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00024_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00024_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00024_checkTableConstraints
-
-{}
-#+ Check constraints on the "cctb00024.status_mov" column
-#+
-#+ @param p_status_mov - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00024_status_mov_checkColumnConstraints(p_status_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_mov LIKE cctb00024.status_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00024_status_mov_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00024.descripcion" column
-#+
-#+ @param p_descripcion - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00024_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE cctb00024.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00024_descripcion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00024.status_t" column
-#+
-#+ @param p_status_t - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00024_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cctb00024.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00024_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00024.us_crea" column
-#+
-#+ @param p_us_crea - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00024_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cctb00024.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00024_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00024.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00024_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cctb00024.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00024_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00024.us_mod" column
-#+
-#+ @param p_us_mod - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00024_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cctb00024.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00024_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00024.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00024_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cctb00024.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00024_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00023" table
-#+
-#+ @param p_data - a row data LIKE cctb00023.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00023_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cctb00023.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cctb00023_num_doc_checkColumnConstraints(p_data.num_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00023_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00023_cod_moneda_checkColumnConstraints(p_data.cod_moneda) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00023_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00023_valor_checkColumnConstraints(p_data.valor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00023_tipo_doc_checkColumnConstraints(p_data.tipo_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00023_tasa_checkColumnConstraints(p_data.tasa) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00023_cod_cia_checkColumnConstraints(p_data.cod_cia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00023_num_trans_checkColumnConstraints(p_data.num_trans) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00023_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00023_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00023_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00023_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00023_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00023_checkTableConstraints
-
-{}
-#+ Check constraints on the "cctb00023.num_doc" column
-#+
-#+ @param p_num_doc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00023_num_doc_checkColumnConstraints(p_num_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_doc LIKE cctb00023.num_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00023_num_doc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00023.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00023_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE cctb00023.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00023_fecha_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00023.cod_moneda" column
-#+
-#+ @param p_cod_moneda - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00023_cod_moneda_checkColumnConstraints(p_cod_moneda)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_moneda LIKE cctb00023.cod_moneda
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00023_cod_moneda_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00023.cantidad" column
-#+
-#+ @param p_cantidad - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00023_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE cctb00023.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00023_cantidad_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00023.valor" column
-#+
-#+ @param p_valor - DECIMAL(18,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00023_valor_checkColumnConstraints(p_valor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valor LIKE cctb00023.valor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00023_valor_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00023.tipo_doc" column
-#+
-#+ @param p_tipo_doc - CHAR(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00023_tipo_doc_checkColumnConstraints(p_tipo_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_doc LIKE cctb00023.tipo_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00023_tipo_doc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00023.tasa" column
-#+
-#+ @param p_tasa - DECIMAL(18,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00023_tasa_checkColumnConstraints(p_tasa)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tasa LIKE cctb00023.tasa
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00023_tasa_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00023.cod_cia" column
-#+
-#+ @param p_cod_cia - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00023_cod_cia_checkColumnConstraints(p_cod_cia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_cia LIKE cctb00023.cod_cia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00023_cod_cia_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00023.num_trans" column
-#+
-#+ @param p_num_trans - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00023_num_trans_checkColumnConstraints(p_num_trans)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_trans LIKE cctb00023.num_trans
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00023_num_trans_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00023.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00023_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cctb00023.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00023_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00023.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00023_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cctb00023.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00023_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00023.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00023_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cctb00023.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00023_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00023.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00023_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cctb00023.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00023_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00023.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00023_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cctb00023.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00023_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00022" table
-#+
-#+ @param p_data - a row data LIKE cctb00022.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00022_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cctb00022.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cctb00022_cod_moneda_checkColumnConstraints(p_data.cod_moneda) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00022_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00022_valor_checkColumnConstraints(p_data.valor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00022_tipo_moneda_checkColumnConstraints(p_data.tipo_moneda) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00022_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00022_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00022_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00022_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00022_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00022_checkTableConstraints
-
-{}
-#+ Check constraints on the "cctb00022.cod_moneda" column
-#+
-#+ @param p_cod_moneda - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00022_cod_moneda_checkColumnConstraints(p_cod_moneda)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_moneda LIKE cctb00022.cod_moneda
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00022_cod_moneda_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00022.descripcion" column
-#+
-#+ @param p_descripcion - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00022_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE cctb00022.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00022_descripcion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00022.valor" column
-#+
-#+ @param p_valor - DECIMAL(18,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00022_valor_checkColumnConstraints(p_valor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valor LIKE cctb00022.valor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00022_valor_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00022.tipo_moneda" column
-#+
-#+ @param p_tipo_moneda - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00022_tipo_moneda_checkColumnConstraints(p_tipo_moneda)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_moneda LIKE cctb00022.tipo_moneda
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00022_tipo_moneda_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00022.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00022_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cctb00022.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00022_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00022.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00022_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cctb00022.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00022_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00022.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00022_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cctb00022.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00022_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00022.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00022_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cctb00022.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00022_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00022.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00022_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cctb00022.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00022_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00021" table
-#+
-#+ @param p_data - a row data LIKE cctb00021.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00021_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cctb00021.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cctb00021_cod_cia_checkColumnConstraints(p_data.cod_cia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00021_tipo_doc_checkColumnConstraints(p_data.tipo_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00021_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00021_debito_checkColumnConstraints(p_data.debito) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00021_departamento_checkColumnConstraints(p_data.departamento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00021_status_mov_checkColumnConstraints(p_data.status_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00021_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00021_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00021_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00021_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00021_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00021_secuencia_checkColumnConstraints(p_data.secuencia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00021_cxc_checkColumnConstraints(p_data.cxc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00021_credito_checkColumnConstraints(p_data.credito) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00021_checkTableConstraints
-
-{}
-#+ Check constraints on the "cctb00021.cod_cia" column
-#+
-#+ @param p_cod_cia - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00021_cod_cia_checkColumnConstraints(p_cod_cia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_cia LIKE cctb00021.cod_cia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_cia IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_cia: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00021_cod_cia_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00021.tipo_doc" column
-#+
-#+ @param p_tipo_doc - CHAR(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00021_tipo_doc_checkColumnConstraints(p_tipo_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_doc LIKE cctb00021.tipo_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_tipo_doc IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- tipo_doc: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00021_tipo_doc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00021.descripcion" column
-#+
-#+ @param p_descripcion - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00021_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE cctb00021.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00021_descripcion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00021.debito" column
-#+
-#+ @param p_debito - CHAR(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00021_debito_checkColumnConstraints(p_debito)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_debito LIKE cctb00021.debito
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00021_debito_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00021.departamento" column
-#+
-#+ @param p_departamento - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00021_departamento_checkColumnConstraints(p_departamento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_departamento LIKE cctb00021.departamento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00021_departamento_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00021.status_mov" column
-#+
-#+ @param p_status_mov - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00021_status_mov_checkColumnConstraints(p_status_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_mov LIKE cctb00021.status_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00021_status_mov_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00021.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00021_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cctb00021.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00021_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00021.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00021_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cctb00021.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00021_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00021.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00021_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cctb00021.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00021_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00021.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00021_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cctb00021.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00021_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00021.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00021_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cctb00021.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00021_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00021.secuencia" column
-#+
-#+ @param p_secuencia - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00021_secuencia_checkColumnConstraints(p_secuencia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_secuencia LIKE cctb00021.secuencia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00021_secuencia_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00021.cxc" column
-#+
-#+ @param p_cxc - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00021_cxc_checkColumnConstraints(p_cxc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cxc LIKE cctb00021.cxc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00021_cxc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00021.credito" column
-#+
-#+ @param p_credito - CHAR(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00021_credito_checkColumnConstraints(p_credito)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_credito LIKE cctb00021.credito
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00021_credito_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00020" table
-#+
-#+ @param p_data - a row data LIKE cctb00020.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00020_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cctb00020.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cctb00020_cod_cia_checkColumnConstraints(p_data.cod_cia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00020_tipo_doc_checkColumnConstraints(p_data.tipo_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00020_num_oc_checkColumnConstraints(p_data.num_oc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00020_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00020_tipo_cliente_checkColumnConstraints(p_data.tipo_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00020_sec_cliente_checkColumnConstraints(p_data.sec_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00020_factura_checkColumnConstraints(p_data.factura) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00020_tipo_tarjeta_checkColumnConstraints(p_data.tipo_tarjeta) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00020_banco_checkColumnConstraints(p_data.banco) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00020_referencia_checkColumnConstraints(p_data.referencia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00020_porc_desc_checkColumnConstraints(p_data.porc_desc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00020_valor_efectivo_checkColumnConstraints(p_data.valor_efectivo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00020_otro_valor_checkColumnConstraints(p_data.otro_valor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00020_observacion_checkColumnConstraints(p_data.observacion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00020_devuelta_checkColumnConstraints(p_data.devuelta) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00020_num_trans_checkColumnConstraints(p_data.num_trans) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00020_tipo_aplica_checkColumnConstraints(p_data.tipo_aplica) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00020_cajera_checkColumnConstraints(p_data.cajera) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00020_cobrador_checkColumnConstraints(p_data.cobrador) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00020_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00020_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00020_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00020_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00020_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00020_checkTableConstraints
-
-{}
-#+ Check constraints on the "cctb00020.cod_cia" column
-#+
-#+ @param p_cod_cia - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00020_cod_cia_checkColumnConstraints(p_cod_cia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_cia LIKE cctb00020.cod_cia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00020_cod_cia_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00020.tipo_doc" column
-#+
-#+ @param p_tipo_doc - CHAR(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00020_tipo_doc_checkColumnConstraints(p_tipo_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_doc LIKE cctb00020.tipo_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00020_tipo_doc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00020.num_oc" column
-#+
-#+ @param p_num_oc - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00020_num_oc_checkColumnConstraints(p_num_oc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_oc LIKE cctb00020.num_oc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00020_num_oc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00020.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00020_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE cctb00020.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00020_fecha_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00020.tipo_cliente" column
-#+
-#+ @param p_tipo_cliente - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00020_tipo_cliente_checkColumnConstraints(p_tipo_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_cliente LIKE cctb00020.tipo_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00020_tipo_cliente_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00020.sec_cliente" column
-#+
-#+ @param p_sec_cliente - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00020_sec_cliente_checkColumnConstraints(p_sec_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_cliente LIKE cctb00020.sec_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00020_sec_cliente_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00020.factura" column
-#+
-#+ @param p_factura - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00020_factura_checkColumnConstraints(p_factura)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_factura LIKE cctb00020.factura
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00020_factura_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00020.tipo_tarjeta" column
-#+
-#+ @param p_tipo_tarjeta - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00020_tipo_tarjeta_checkColumnConstraints(p_tipo_tarjeta)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_tarjeta LIKE cctb00020.tipo_tarjeta
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00020_tipo_tarjeta_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00020.banco" column
-#+
-#+ @param p_banco - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00020_banco_checkColumnConstraints(p_banco)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_banco LIKE cctb00020.banco
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00020_banco_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00020.referencia" column
-#+
-#+ @param p_referencia - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00020_referencia_checkColumnConstraints(p_referencia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_referencia LIKE cctb00020.referencia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00020_referencia_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00020.porc_desc" column
-#+
-#+ @param p_porc_desc - DECIMAL(18,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00020_porc_desc_checkColumnConstraints(p_porc_desc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_porc_desc LIKE cctb00020.porc_desc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00020_porc_desc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00020.valor_efectivo" column
-#+
-#+ @param p_valor_efectivo - DECIMAL(18,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00020_valor_efectivo_checkColumnConstraints(p_valor_efectivo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valor_efectivo LIKE cctb00020.valor_efectivo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00020_valor_efectivo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00020.otro_valor" column
-#+
-#+ @param p_otro_valor - DECIMAL(18,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00020_otro_valor_checkColumnConstraints(p_otro_valor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_otro_valor LIKE cctb00020.otro_valor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00020_otro_valor_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00020.observacion" column
-#+
-#+ @param p_observacion - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00020_observacion_checkColumnConstraints(p_observacion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_observacion LIKE cctb00020.observacion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00020_observacion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00020.devuelta" column
-#+
-#+ @param p_devuelta - DECIMAL(18,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00020_devuelta_checkColumnConstraints(p_devuelta)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_devuelta LIKE cctb00020.devuelta
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00020_devuelta_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00020.num_trans" column
-#+
-#+ @param p_num_trans - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00020_num_trans_checkColumnConstraints(p_num_trans)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_trans LIKE cctb00020.num_trans
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00020_num_trans_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00020.tipo_aplica" column
-#+
-#+ @param p_tipo_aplica - CHAR(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00020_tipo_aplica_checkColumnConstraints(p_tipo_aplica)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_aplica LIKE cctb00020.tipo_aplica
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00020_tipo_aplica_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00020.cajera" column
-#+
-#+ @param p_cajera - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00020_cajera_checkColumnConstraints(p_cajera)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cajera LIKE cctb00020.cajera
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00020_cajera_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00020.cobrador" column
-#+
-#+ @param p_cobrador - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00020_cobrador_checkColumnConstraints(p_cobrador)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cobrador LIKE cctb00020.cobrador
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00020_cobrador_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00020.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00020_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cctb00020.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00020_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00020.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00020_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cctb00020.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00020_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00020.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00020_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cctb00020.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00020_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00020.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00020_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cctb00020.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00020_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00020.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00020_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cctb00020.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00020_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00013" table
-#+
-#+ @param p_data - a row data LIKE cctb00013.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00013_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cctb00013.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cctb00013_tipo_negocio_checkColumnConstraints(p_data.tipo_negocio) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00013_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00013_cond_pago_checkColumnConstraints(p_data.cond_pago) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00013_porc_desc_checkColumnConstraints(p_data.porc_desc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00013_codigo_eis_checkColumnConstraints(p_data.codigo_eis) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00013_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00013_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00013_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00013_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00013_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00013_checkTableConstraints
-
-{}
-#+ Check constraints on the "cctb00013.tipo_negocio" column
-#+
-#+ @param p_tipo_negocio - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00013_tipo_negocio_checkColumnConstraints(p_tipo_negocio)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_negocio LIKE cctb00013.tipo_negocio
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00013_tipo_negocio_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00013.descripcion" column
-#+
-#+ @param p_descripcion - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00013_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE cctb00013.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00013_descripcion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00013.cond_pago" column
-#+
-#+ @param p_cond_pago - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00013_cond_pago_checkColumnConstraints(p_cond_pago)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cond_pago LIKE cctb00013.cond_pago
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00013_cond_pago_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00013.porc_desc" column
-#+
-#+ @param p_porc_desc - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00013_porc_desc_checkColumnConstraints(p_porc_desc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_porc_desc LIKE cctb00013.porc_desc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00013_porc_desc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00013.codigo_eis" column
-#+
-#+ @param p_codigo_eis - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00013_codigo_eis_checkColumnConstraints(p_codigo_eis)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codigo_eis LIKE cctb00013.codigo_eis
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00013_codigo_eis_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00013.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00013_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cctb00013.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00013_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00013.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00013_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cctb00013.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00013_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00013.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00013_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cctb00013.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00013_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00013.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00013_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cctb00013.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00013_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00013.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00013_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cctb00013.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00013_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00011" table
-#+
-#+ @param p_data - a row data LIKE cctb00011.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00011_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cctb00011.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cctb00011_cod_cia_checkColumnConstraints(p_data.cod_cia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00011_num_doc_checkColumnConstraints(p_data.num_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00011_tipo_doc_checkColumnConstraints(p_data.tipo_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00011_tipo_cliente_checkColumnConstraints(p_data.tipo_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00011_sec_cliente_checkColumnConstraints(p_data.sec_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00011_comentario_checkColumnConstraints(p_data.comentario) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00011_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00011_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00011_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00011_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00011_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00011_sucid_checkColumnConstraints(p_data.sucid) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00011_chitbis_checkColumnConstraints(p_data.chitbis) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00011_checkTableConstraints
-
-{}
-#+ Check constraints on the "cctb00011.cod_cia" column
-#+
-#+ @param p_cod_cia - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00011_cod_cia_checkColumnConstraints(p_cod_cia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_cia LIKE cctb00011.cod_cia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00011_cod_cia_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00011.num_doc" column
-#+
-#+ @param p_num_doc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00011_num_doc_checkColumnConstraints(p_num_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_doc LIKE cctb00011.num_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_num_doc IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- num_doc: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00011_num_doc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00011.tipo_doc" column
-#+
-#+ @param p_tipo_doc - CHAR(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00011_tipo_doc_checkColumnConstraints(p_tipo_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_doc LIKE cctb00011.tipo_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00011_tipo_doc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00011.tipo_cliente" column
-#+
-#+ @param p_tipo_cliente - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00011_tipo_cliente_checkColumnConstraints(p_tipo_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_cliente LIKE cctb00011.tipo_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00011_tipo_cliente_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00011.sec_cliente" column
-#+
-#+ @param p_sec_cliente - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00011_sec_cliente_checkColumnConstraints(p_sec_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_cliente LIKE cctb00011.sec_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00011_sec_cliente_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00011.comentario" column
-#+
-#+ @param p_comentario - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00011_comentario_checkColumnConstraints(p_comentario)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_comentario LIKE cctb00011.comentario
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00011_comentario_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00011.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00011_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cctb00011.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00011_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00011.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00011_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cctb00011.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00011_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00011.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00011_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cctb00011.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00011_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00011.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00011_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cctb00011.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00011_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00011.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00011_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cctb00011.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00011_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00011.sucid" column
-#+
-#+ @param p_sucid - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00011_sucid_checkColumnConstraints(p_sucid)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sucid LIKE cctb00011.sucid
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00011_sucid_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00011.chitbis" column
-#+
-#+ @param p_chitbis - CHAR(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00011_chitbis_checkColumnConstraints(p_chitbis)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_chitbis LIKE cctb00011.chitbis
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_chitbis IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- chitbis: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00011_chitbis_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00008" table
-#+
-#+ @param p_data - a row data LIKE cctb00008.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00008_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cctb00008.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cctb00008_sec_vend_checkColumnConstraints(p_data.sec_vend) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00008_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00008_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00008_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00008_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00008_porc_ventas_checkColumnConstraints(p_data.porc_ventas) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00008_porc_cobros_checkColumnConstraints(p_data.porc_cobros) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00008_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00008_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00008_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00008_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00008_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00008_checkTableConstraints
-
-{}
-#+ Check constraints on the "cctb00008.sec_vend" column
-#+
-#+ @param p_sec_vend - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00008_sec_vend_checkColumnConstraints(p_sec_vend)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_vend LIKE cctb00008.sec_vend
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_sec_vend IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- sec_vend: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00008_sec_vend_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00008.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00008_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE cctb00008.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_n IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_n: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00008_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00008.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00008_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE cctb00008.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_grupo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_grupo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00008_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00008.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00008_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE cctb00008.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_tipo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_tipo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00008_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00008.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00008_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE cctb00008.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_sec IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_sec: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00008_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00008.porc_ventas" column
-#+
-#+ @param p_porc_ventas - DECIMAL(8,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00008_porc_ventas_checkColumnConstraints(p_porc_ventas)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_porc_ventas LIKE cctb00008.porc_ventas
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_porc_ventas IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- porc_ventas: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00008_porc_ventas_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00008.porc_cobros" column
-#+
-#+ @param p_porc_cobros - DECIMAL(8,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00008_porc_cobros_checkColumnConstraints(p_porc_cobros)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_porc_cobros LIKE cctb00008.porc_cobros
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00008_porc_cobros_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00008.status_t" column
-#+
-#+ @param p_status_t - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00008_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cctb00008.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00008_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00008.us_crea" column
-#+
-#+ @param p_us_crea - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00008_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cctb00008.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00008_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00008.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00008_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cctb00008.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00008_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00008.us_mod" column
-#+
-#+ @param p_us_mod - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00008_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cctb00008.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00008_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00008.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00008_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cctb00008.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00008_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00003" table
-#+
-#+ @param p_data - a row data LIKE cctb00003.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00003_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cctb00003.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cctb00003_cod_vend_checkColumnConstraints(p_data.cod_vend) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00003_sec_vend_checkColumnConstraints(p_data.sec_vend) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00003_ult_recibo_checkColumnConstraints(p_data.ult_recibo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00003_tipo_doc_checkColumnConstraints(p_data.tipo_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00003_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00003_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00003_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00003_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00003_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00003_sucid_checkColumnConstraints(p_data.sucid) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00003_checkTableConstraints
-
-{}
-#+ Check constraints on the "cctb00003.cod_vend" column
-#+
-#+ @param p_cod_vend - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00003_cod_vend_checkColumnConstraints(p_cod_vend)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_vend LIKE cctb00003.cod_vend
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00003_cod_vend_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00003.sec_vend" column
-#+
-#+ @param p_sec_vend - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00003_sec_vend_checkColumnConstraints(p_sec_vend)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_vend LIKE cctb00003.sec_vend
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00003_sec_vend_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00003.ult_recibo" column
-#+
-#+ @param p_ult_recibo - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00003_ult_recibo_checkColumnConstraints(p_ult_recibo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ult_recibo LIKE cctb00003.ult_recibo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00003_ult_recibo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00003.tipo_doc" column
-#+
-#+ @param p_tipo_doc - CHAR(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00003_tipo_doc_checkColumnConstraints(p_tipo_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_doc LIKE cctb00003.tipo_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00003_tipo_doc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00003.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00003_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cctb00003.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00003_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00003.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00003_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cctb00003.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00003_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00003.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00003_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cctb00003.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00003_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00003.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00003_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cctb00003.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00003_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00003.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00003_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cctb00003.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00003_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00003.sucid" column
-#+
-#+ @param p_sucid - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00003_sucid_checkColumnConstraints(p_sucid)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sucid LIKE cctb00003.sucid
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00003_sucid_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00002" table
-#+
-#+ @param p_data - a row data LIKE cctb00002.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00002_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cctb00002.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cctb00002_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00002_cod_vend_checkColumnConstraints(p_data.cod_vend) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00002_sec_vend_checkColumnConstraints(p_data.sec_vend) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00002_sec_de_checkColumnConstraints(p_data.sec_de) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00002_sec_a_checkColumnConstraints(p_data.sec_a) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00002_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00002_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00002_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00002_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00002_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00002_checkTableConstraints
-
-{}
-#+ Check constraints on the "cctb00002.fecha" column
-#+
-#+ @param p_fecha - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00002_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE cctb00002.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00002_fecha_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00002.cod_vend" column
-#+
-#+ @param p_cod_vend - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00002_cod_vend_checkColumnConstraints(p_cod_vend)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_vend LIKE cctb00002.cod_vend
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00002_cod_vend_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00002.sec_vend" column
-#+
-#+ @param p_sec_vend - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00002_sec_vend_checkColumnConstraints(p_sec_vend)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_vend LIKE cctb00002.sec_vend
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00002_sec_vend_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00002.sec_de" column
-#+
-#+ @param p_sec_de - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00002_sec_de_checkColumnConstraints(p_sec_de)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_de LIKE cctb00002.sec_de
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00002_sec_de_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00002.sec_a" column
-#+
-#+ @param p_sec_a - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00002_sec_a_checkColumnConstraints(p_sec_a)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_a LIKE cctb00002.sec_a
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00002_sec_a_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00002.status_t" column
-#+
-#+ @param p_status_t - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00002_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cctb00002.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00002_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00002.us_crea" column
-#+
-#+ @param p_us_crea - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00002_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cctb00002.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00002_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00002.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00002_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cctb00002.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00002_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00002.us_mod" column
-#+
-#+ @param p_us_mod - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00002_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cctb00002.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00002_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00002.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00002_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cctb00002.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00002_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00001" table
-#+
-#+ @param p_data - a row data LIKE cctb00001.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00001_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cctb00001.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cctb00001_cuenta_no_checkColumnConstraints(p_data.cuenta_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00001_cod_cia_checkColumnConstraints(p_data.cod_cia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00001_tipo_doc_checkColumnConstraints(p_data.tipo_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00001_num_doc_checkColumnConstraints(p_data.num_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00001_tipo_cliente_checkColumnConstraints(p_data.tipo_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00001_sec_cliente_checkColumnConstraints(p_data.sec_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00001_cod_emp_checkColumnConstraints(p_data.cod_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00001_cod_emp_sec_checkColumnConstraints(p_data.cod_emp_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00001_fecha_orig_checkColumnConstraints(p_data.fecha_orig) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00001_fecha_ven_checkColumnConstraints(p_data.fecha_ven) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00001_aplica_a_checkColumnConstraints(p_data.aplica_a) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00001_banco_checkColumnConstraints(p_data.banco) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00001_num_cheque_checkColumnConstraints(p_data.num_cheque) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00001_valor_checkColumnConstraints(p_data.valor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00001_valor_efectivo_checkColumnConstraints(p_data.valor_efectivo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00001_valor_cheque_checkColumnConstraints(p_data.valor_cheque) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00001_costo_checkColumnConstraints(p_data.costo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00001_monto_desc_checkColumnConstraints(p_data.monto_desc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00001_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00001_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00001_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00001_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00001_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00001_checkTableConstraints
-
-{}
-#+ Check constraints on the "cctb00001.cuenta_no" column
-#+
-#+ @param p_cuenta_no - CHAR(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00001_cuenta_no_checkColumnConstraints(p_cuenta_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cuenta_no LIKE cctb00001.cuenta_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00001_cuenta_no_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00001.cod_cia" column
-#+
-#+ @param p_cod_cia - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00001_cod_cia_checkColumnConstraints(p_cod_cia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_cia LIKE cctb00001.cod_cia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00001_cod_cia_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00001.tipo_doc" column
-#+
-#+ @param p_tipo_doc - CHAR(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00001_tipo_doc_checkColumnConstraints(p_tipo_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_doc LIKE cctb00001.tipo_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00001_tipo_doc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00001.num_doc" column
-#+
-#+ @param p_num_doc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00001_num_doc_checkColumnConstraints(p_num_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_doc LIKE cctb00001.num_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_num_doc IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- num_doc: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00001_num_doc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00001.tipo_cliente" column
-#+
-#+ @param p_tipo_cliente - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00001_tipo_cliente_checkColumnConstraints(p_tipo_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_cliente LIKE cctb00001.tipo_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00001_tipo_cliente_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00001.sec_cliente" column
-#+
-#+ @param p_sec_cliente - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00001_sec_cliente_checkColumnConstraints(p_sec_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_cliente LIKE cctb00001.sec_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00001_sec_cliente_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00001.cod_emp" column
-#+
-#+ @param p_cod_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00001_cod_emp_checkColumnConstraints(p_cod_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_emp LIKE cctb00001.cod_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00001_cod_emp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00001.cod_emp_sec" column
-#+
-#+ @param p_cod_emp_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00001_cod_emp_sec_checkColumnConstraints(p_cod_emp_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_emp_sec LIKE cctb00001.cod_emp_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00001_cod_emp_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00001.fecha_orig" column
-#+
-#+ @param p_fecha_orig - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00001_fecha_orig_checkColumnConstraints(p_fecha_orig)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_orig LIKE cctb00001.fecha_orig
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00001_fecha_orig_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00001.fecha_ven" column
-#+
-#+ @param p_fecha_ven - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00001_fecha_ven_checkColumnConstraints(p_fecha_ven)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_ven LIKE cctb00001.fecha_ven
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00001_fecha_ven_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00001.aplica_a" column
-#+
-#+ @param p_aplica_a - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00001_aplica_a_checkColumnConstraints(p_aplica_a)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_aplica_a LIKE cctb00001.aplica_a
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00001_aplica_a_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00001.banco" column
-#+
-#+ @param p_banco - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00001_banco_checkColumnConstraints(p_banco)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_banco LIKE cctb00001.banco
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00001_banco_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00001.num_cheque" column
-#+
-#+ @param p_num_cheque - CHAR(12) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00001_num_cheque_checkColumnConstraints(p_num_cheque)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_cheque LIKE cctb00001.num_cheque
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00001_num_cheque_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00001.valor" column
-#+
-#+ @param p_valor - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00001_valor_checkColumnConstraints(p_valor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valor LIKE cctb00001.valor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_valor IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- valor: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00001_valor_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00001.valor_efectivo" column
-#+
-#+ @param p_valor_efectivo - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00001_valor_efectivo_checkColumnConstraints(p_valor_efectivo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valor_efectivo LIKE cctb00001.valor_efectivo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00001_valor_efectivo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00001.valor_cheque" column
-#+
-#+ @param p_valor_cheque - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00001_valor_cheque_checkColumnConstraints(p_valor_cheque)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valor_cheque LIKE cctb00001.valor_cheque
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00001_valor_cheque_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00001.costo" column
-#+
-#+ @param p_costo - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00001_costo_checkColumnConstraints(p_costo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_costo LIKE cctb00001.costo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00001_costo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00001.monto_desc" column
-#+
-#+ @param p_monto_desc - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00001_monto_desc_checkColumnConstraints(p_monto_desc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_monto_desc LIKE cctb00001.monto_desc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00001_monto_desc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00001.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00001_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cctb00001.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00001_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00001.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00001_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cctb00001.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00001_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00001.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00001_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cctb00001.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00001_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00001.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00001_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cctb00001.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00001_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "cctb00001.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00001_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cctb00001.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.cctb00001_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "category" table
-#+
-#+ @param p_data - a row data LIKE category.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_category_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE category.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_category_catid_checkColumnConstraints(p_data.catid) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_category_catorder_checkColumnConstraints(p_data.catorder) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_category_catname_checkColumnConstraints(p_data.catname) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_category_catdesc_checkColumnConstraints(p_data.catdesc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_category_catpic_checkColumnConstraints(p_data.catpic) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.category_checkTableConstraints
-
-{}
-#+ Check constraints on the "category.catid" column
-#+
-#+ @param p_catid - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_category_catid_checkColumnConstraints(p_catid)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_catid LIKE category.catid
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_catid IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- catid: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.category_catid_checkColumnConstraints
-
-{}
-#+ Check constraints on the "category.catorder" column
-#+
-#+ @param p_catorder - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_category_catorder_checkColumnConstraints(p_catorder)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_catorder LIKE category.catorder
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.category_catorder_checkColumnConstraints
-
-{}
-#+ Check constraints on the "category.catname" column
-#+
-#+ @param p_catname - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_category_catname_checkColumnConstraints(p_catname)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_catname LIKE category.catname
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.category_catname_checkColumnConstraints
-
-{}
-#+ Check constraints on the "category.catdesc" column
-#+
-#+ @param p_catdesc - CHAR(255) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_category_catdesc_checkColumnConstraints(p_catdesc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_catdesc LIKE category.catdesc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.category_catdesc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "category.catpic" column
-#+
-#+ @param p_catpic - CHAR(255) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_category_catpic_checkColumnConstraints(p_catpic)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_catpic LIKE category.catpic
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.category_catpic_checkColumnConstraints
-
-{}
-#+ Check constraints on the "bono2011d" table
-#+
-#+ @param p_data - a row data LIKE bono2011d.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_bono2011d_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE bono2011d.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_bono2011d_f1_checkColumnConstraints(p_data.f1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_bono2011d_f2_checkColumnConstraints(p_data.f2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_bono2011d_f3_checkColumnConstraints(p_data.f3) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_bono2011d_f4_checkColumnConstraints(p_data.f4) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_bono2011d_f5_checkColumnConstraints(p_data.f5) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_bono2011d_f6_checkColumnConstraints(p_data.f6) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_bono2011d_f7_checkColumnConstraints(p_data.f7) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_bono2011d_f8_checkColumnConstraints(p_data.f8) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_bono2011d_dias_checkColumnConstraints(p_data.dias) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_bono2011d_f10_checkColumnConstraints(p_data.f10) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_bono2011d_bonificacion_checkColumnConstraints(p_data.bonificacion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.bono2011d_checkTableConstraints
-
-{}
-#+ Check constraints on the "bono2011d.f1" column
-#+
-#+ @param p_f1 - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_bono2011d_f1_checkColumnConstraints(p_f1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_f1 LIKE bono2011d.f1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.bono2011d_f1_checkColumnConstraints
-
-{}
-#+ Check constraints on the "bono2011d.f2" column
-#+
-#+ @param p_f2 - VARCHAR2(255) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_bono2011d_f2_checkColumnConstraints(p_f2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_f2 LIKE bono2011d.f2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.bono2011d_f2_checkColumnConstraints
-
-{}
-#+ Check constraints on the "bono2011d.f3" column
-#+
-#+ @param p_f3 - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_bono2011d_f3_checkColumnConstraints(p_f3)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_f3 LIKE bono2011d.f3
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.bono2011d_f3_checkColumnConstraints
-
-{}
-#+ Check constraints on the "bono2011d.f4" column
-#+
-#+ @param p_f4 - VARCHAR2(255) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_bono2011d_f4_checkColumnConstraints(p_f4)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_f4 LIKE bono2011d.f4
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.bono2011d_f4_checkColumnConstraints
-
-{}
-#+ Check constraints on the "bono2011d.f5" column
-#+
-#+ @param p_f5 - VARCHAR2(255) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_bono2011d_f5_checkColumnConstraints(p_f5)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_f5 LIKE bono2011d.f5
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.bono2011d_f5_checkColumnConstraints
-
-{}
-#+ Check constraints on the "bono2011d.f6" column
-#+
-#+ @param p_f6 - VARCHAR2(255) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_bono2011d_f6_checkColumnConstraints(p_f6)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_f6 LIKE bono2011d.f6
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.bono2011d_f6_checkColumnConstraints
-
-{}
-#+ Check constraints on the "bono2011d.f7" column
-#+
-#+ @param p_f7 - VARCHAR2(255) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_bono2011d_f7_checkColumnConstraints(p_f7)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_f7 LIKE bono2011d.f7
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.bono2011d_f7_checkColumnConstraints
-
-{}
-#+ Check constraints on the "bono2011d.f8" column
-#+
-#+ @param p_f8 - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_bono2011d_f8_checkColumnConstraints(p_f8)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_f8 LIKE bono2011d.f8
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.bono2011d_f8_checkColumnConstraints
-
-{}
-#+ Check constraints on the "bono2011d.dias" column
-#+
-#+ @param p_dias - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_bono2011d_dias_checkColumnConstraints(p_dias)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_dias LIKE bono2011d.dias
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.bono2011d_dias_checkColumnConstraints
-
-{}
-#+ Check constraints on the "bono2011d.f10" column
-#+
-#+ @param p_f10 - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_bono2011d_f10_checkColumnConstraints(p_f10)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_f10 LIKE bono2011d.f10
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.bono2011d_f10_checkColumnConstraints
-
-{}
-#+ Check constraints on the "bono2011d.bonificacion" column
-#+
-#+ @param p_bonificacion - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_bono2011d_bonificacion_checkColumnConstraints(p_bonificacion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_bonificacion LIKE bono2011d.bonificacion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.bono2011d_bonificacion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "bono2011" table
-#+
-#+ @param p_data - a row data LIKE bono2011.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_bono2011_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE bono2011.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_bono2011_f1_checkColumnConstraints(p_data.f1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_bono2011_f2_checkColumnConstraints(p_data.f2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_bono2011_f3_checkColumnConstraints(p_data.f3) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_bono2011_f4_checkColumnConstraints(p_data.f4) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_bono2011_f5_checkColumnConstraints(p_data.f5) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_bono2011_f6_checkColumnConstraints(p_data.f6) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_bono2011_f7_checkColumnConstraints(p_data.f7) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_bono2011_f8_checkColumnConstraints(p_data.f8) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_bono2011_dias_checkColumnConstraints(p_data.dias) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_bono2011_f10_checkColumnConstraints(p_data.f10) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_bono2011_sueldo1_checkColumnConstraints(p_data.sueldo1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_bono2011_sueldo_checkColumnConstraints(p_data.sueldo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_bono2011_bonificacion1_checkColumnConstraints(p_data.bonificacion1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_bono2011_bonificacion_checkColumnConstraints(p_data.bonificacion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_bono2011_infotep_checkColumnConstraints(p_data.infotep) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_bono2011_bonificacion2_checkColumnConstraints(p_data.bonificacion2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_bono2011_f17_checkColumnConstraints(p_data.f17) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_bono2011_f18_checkColumnConstraints(p_data.f18) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_bono2011_f19_checkColumnConstraints(p_data.f19) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_bono2011_f20_checkColumnConstraints(p_data.f20) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.bono2011_checkTableConstraints
-
-{}
-#+ Check constraints on the "bono2011.f1" column
-#+
-#+ @param p_f1 - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_bono2011_f1_checkColumnConstraints(p_f1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_f1 LIKE bono2011.f1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.bono2011_f1_checkColumnConstraints
-
-{}
-#+ Check constraints on the "bono2011.f2" column
-#+
-#+ @param p_f2 - VARCHAR2(255) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_bono2011_f2_checkColumnConstraints(p_f2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_f2 LIKE bono2011.f2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.bono2011_f2_checkColumnConstraints
-
-{}
-#+ Check constraints on the "bono2011.f3" column
-#+
-#+ @param p_f3 - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_bono2011_f3_checkColumnConstraints(p_f3)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_f3 LIKE bono2011.f3
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.bono2011_f3_checkColumnConstraints
-
-{}
-#+ Check constraints on the "bono2011.f4" column
-#+
-#+ @param p_f4 - VARCHAR2(255) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_bono2011_f4_checkColumnConstraints(p_f4)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_f4 LIKE bono2011.f4
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.bono2011_f4_checkColumnConstraints
-
-{}
-#+ Check constraints on the "bono2011.f5" column
-#+
-#+ @param p_f5 - VARCHAR2(255) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_bono2011_f5_checkColumnConstraints(p_f5)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_f5 LIKE bono2011.f5
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.bono2011_f5_checkColumnConstraints
-
-{}
-#+ Check constraints on the "bono2011.f6" column
-#+
-#+ @param p_f6 - VARCHAR2(255) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_bono2011_f6_checkColumnConstraints(p_f6)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_f6 LIKE bono2011.f6
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.bono2011_f6_checkColumnConstraints
-
-{}
-#+ Check constraints on the "bono2011.f7" column
-#+
-#+ @param p_f7 - VARCHAR2(255) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_bono2011_f7_checkColumnConstraints(p_f7)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_f7 LIKE bono2011.f7
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.bono2011_f7_checkColumnConstraints
-
-{}
-#+ Check constraints on the "bono2011.f8" column
-#+
-#+ @param p_f8 - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_bono2011_f8_checkColumnConstraints(p_f8)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_f8 LIKE bono2011.f8
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.bono2011_f8_checkColumnConstraints
-
-{}
-#+ Check constraints on the "bono2011.dias" column
-#+
-#+ @param p_dias - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_bono2011_dias_checkColumnConstraints(p_dias)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_dias LIKE bono2011.dias
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.bono2011_dias_checkColumnConstraints
-
-{}
-#+ Check constraints on the "bono2011.f10" column
-#+
-#+ @param p_f10 - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_bono2011_f10_checkColumnConstraints(p_f10)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_f10 LIKE bono2011.f10
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.bono2011_f10_checkColumnConstraints
-
-{}
-#+ Check constraints on the "bono2011.sueldo1" column
-#+
-#+ @param p_sueldo1 - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_bono2011_sueldo1_checkColumnConstraints(p_sueldo1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sueldo1 LIKE bono2011.sueldo1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.bono2011_sueldo1_checkColumnConstraints
-
-{}
-#+ Check constraints on the "bono2011.sueldo" column
-#+
-#+ @param p_sueldo - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_bono2011_sueldo_checkColumnConstraints(p_sueldo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sueldo LIKE bono2011.sueldo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.bono2011_sueldo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "bono2011.bonificacion1" column
-#+
-#+ @param p_bonificacion1 - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_bono2011_bonificacion1_checkColumnConstraints(p_bonificacion1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_bonificacion1 LIKE bono2011.bonificacion1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.bono2011_bonificacion1_checkColumnConstraints
-
-{}
-#+ Check constraints on the "bono2011.bonificacion" column
-#+
-#+ @param p_bonificacion - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_bono2011_bonificacion_checkColumnConstraints(p_bonificacion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_bonificacion LIKE bono2011.bonificacion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.bono2011_bonificacion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "bono2011.infotep" column
-#+
-#+ @param p_infotep - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_bono2011_infotep_checkColumnConstraints(p_infotep)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_infotep LIKE bono2011.infotep
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.bono2011_infotep_checkColumnConstraints
-
-{}
-#+ Check constraints on the "bono2011.bonificacion2" column
-#+
-#+ @param p_bonificacion2 - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_bono2011_bonificacion2_checkColumnConstraints(p_bonificacion2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_bonificacion2 LIKE bono2011.bonificacion2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.bono2011_bonificacion2_checkColumnConstraints
-
-{}
-#+ Check constraints on the "bono2011.f17" column
-#+
-#+ @param p_f17 - VARCHAR2(255) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_bono2011_f17_checkColumnConstraints(p_f17)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_f17 LIKE bono2011.f17
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.bono2011_f17_checkColumnConstraints
-
-{}
-#+ Check constraints on the "bono2011.f18" column
-#+
-#+ @param p_f18 - VARCHAR2(255) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_bono2011_f18_checkColumnConstraints(p_f18)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_f18 LIKE bono2011.f18
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.bono2011_f18_checkColumnConstraints
-
-{}
-#+ Check constraints on the "bono2011.f19" column
-#+
-#+ @param p_f19 - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_bono2011_f19_checkColumnConstraints(p_f19)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_f19 LIKE bono2011.f19
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.bono2011_f19_checkColumnConstraints
-
-{}
-#+ Check constraints on the "bono2011.f20" column
-#+
-#+ @param p_f20 - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_bono2011_f20_checkColumnConstraints(p_f20)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_f20 LIKE bono2011.f20
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.bono2011_f20_checkColumnConstraints
-
-{}
-#+ Check constraints on the "bloques" table
-#+
-#+ @param p_data - a row data LIKE bloques.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_bloques_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE bloques.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_bloques_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_bloques_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_bloques_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_bloques_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.bloques_checkTableConstraints
-
-{}
-#+ Check constraints on the "bloques.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_bloques_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE bloques.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.bloques_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "bloques.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_bloques_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE bloques.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.bloques_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "bloques.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_bloques_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE bloques.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.bloques_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "bloques.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_bloques_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE bloques.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.bloques_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "altbm00001" table
-#+
-#+ @param p_data - a row data LIKE altbm00001.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_altbm00001_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE altbm00001.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_altbm00001_num_doc_checkColumnConstraints(p_data.num_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_altbm00001_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_altbm00001_tipo_checkColumnConstraints(p_data.tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_altbm00001_orden_compra_checkColumnConstraints(p_data.orden_compra) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_altbm00001_cod_sp_checkColumnConstraints(p_data.cod_sp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_altbm00001_cod_sp_sec_checkColumnConstraints(p_data.cod_sp_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_altbm00001_conduce_no_checkColumnConstraints(p_data.conduce_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_altbm00001_fact_no_checkColumnConstraints(p_data.fact_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_altbm00001_bodega_checkColumnConstraints(p_data.bodega) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_altbm00001_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_altbm00001_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_altbm00001_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_altbm00001_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_altbm00001_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.altbm00001_checkTableConstraints
-
-{}
-#+ Check constraints on the "altbm00001.num_doc" column
-#+
-#+ @param p_num_doc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_altbm00001_num_doc_checkColumnConstraints(p_num_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_doc LIKE altbm00001.num_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_num_doc IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- num_doc: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.altbm00001_num_doc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "altbm00001.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_altbm00001_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE altbm00001.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_fecha IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- fecha: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.altbm00001_fecha_checkColumnConstraints
-
-{}
-#+ Check constraints on the "altbm00001.tipo" column
-#+
-#+ @param p_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_altbm00001_tipo_checkColumnConstraints(p_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo LIKE altbm00001.tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_tipo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- tipo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.altbm00001_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "altbm00001.orden_compra" column
-#+
-#+ @param p_orden_compra - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_altbm00001_orden_compra_checkColumnConstraints(p_orden_compra)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_orden_compra LIKE altbm00001.orden_compra
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_orden_compra IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- orden_compra: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.altbm00001_orden_compra_checkColumnConstraints
-
-{}
-#+ Check constraints on the "altbm00001.cod_sp" column
-#+
-#+ @param p_cod_sp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_altbm00001_cod_sp_checkColumnConstraints(p_cod_sp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sp LIKE altbm00001.cod_sp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_sp IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_sp: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.altbm00001_cod_sp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "altbm00001.cod_sp_sec" column
-#+
-#+ @param p_cod_sp_sec - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_altbm00001_cod_sp_sec_checkColumnConstraints(p_cod_sp_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sp_sec LIKE altbm00001.cod_sp_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_sp_sec IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_sp_sec: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.altbm00001_cod_sp_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "altbm00001.conduce_no" column
-#+
-#+ @param p_conduce_no - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_altbm00001_conduce_no_checkColumnConstraints(p_conduce_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_conduce_no LIKE altbm00001.conduce_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.altbm00001_conduce_no_checkColumnConstraints
-
-{}
-#+ Check constraints on the "altbm00001.fact_no" column
-#+
-#+ @param p_fact_no - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_altbm00001_fact_no_checkColumnConstraints(p_fact_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fact_no LIKE altbm00001.fact_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.altbm00001_fact_no_checkColumnConstraints
-
-{}
-#+ Check constraints on the "altbm00001.bodega" column
-#+
-#+ @param p_bodega - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_altbm00001_bodega_checkColumnConstraints(p_bodega)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_bodega LIKE altbm00001.bodega
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_bodega IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- bodega: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.altbm00001_bodega_checkColumnConstraints
-
-{}
-#+ Check constraints on the "altbm00001.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_altbm00001_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE altbm00001.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.altbm00001_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "altbm00001.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_altbm00001_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE altbm00001.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.altbm00001_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "altbm00001.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_altbm00001_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE altbm00001.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.altbm00001_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "altbm00001.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_altbm00001_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE altbm00001.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.altbm00001_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "altbm00001.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_altbm00001_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE altbm00001.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.altbm00001_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "altbd00001" table
-#+
-#+ @param p_data - a row data LIKE altbd00001.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_altbd00001_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE altbd00001.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_altbd00001_num_doc_checkColumnConstraints(p_data.num_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_altbd00001_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_altbd00001_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_altbd00001_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_altbd00001_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_altbd00001_cantidad_1_checkColumnConstraints(p_data.cantidad_1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_altbd00001_cantdiad_2_checkColumnConstraints(p_data.cantdiad_2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_altbd00001_cod_mov_checkColumnConstraints(p_data.cod_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.altbd00001_checkTableConstraints
-
-{}
-#+ Check constraints on the "altbd00001.num_doc" column
-#+
-#+ @param p_num_doc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_altbd00001_num_doc_checkColumnConstraints(p_num_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_doc LIKE altbd00001.num_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_num_doc IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- num_doc: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.altbd00001_num_doc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "altbd00001.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_altbd00001_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE altbd00001.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_n IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_n: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.altbd00001_cod_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "altbd00001.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_altbd00001_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE altbd00001.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_grupo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_grupo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.altbd00001_cod_grupo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "altbd00001.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_altbd00001_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE altbd00001.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_tipo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_tipo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.altbd00001_cod_tipo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "altbd00001.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_altbd00001_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE altbd00001.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_sec IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_sec: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.altbd00001_cod_sec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "altbd00001.cantidad_1" column
-#+
-#+ @param p_cantidad_1 - DECIMAL(18,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_altbd00001_cantidad_1_checkColumnConstraints(p_cantidad_1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad_1 LIKE altbd00001.cantidad_1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cantidad_1 IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cantidad_1: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.altbd00001_cantidad_1_checkColumnConstraints
-
-{}
-#+ Check constraints on the "altbd00001.cantdiad_2" column
-#+
-#+ @param p_cantdiad_2 - DECIMAL(18,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_altbd00001_cantdiad_2_checkColumnConstraints(p_cantdiad_2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantdiad_2 LIKE altbd00001.cantdiad_2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cantdiad_2 IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cantdiad_2: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.altbd00001_cantdiad_2_checkColumnConstraints
-
-{}
-#+ Check constraints on the "altbd00001.cod_mov" column
-#+
-#+ @param p_cod_mov - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_altbd00001_cod_mov_checkColumnConstraints(p_cod_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mov LIKE altbd00001.cod_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_mov IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_mov: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.altbd00001_cod_mov_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00046" table
-#+
-#+ @param p_data - a row data LIKE adtb00046.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00046_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE adtb00046.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_adtb00046_cod_sol_checkColumnConstraints(p_data.cod_sol) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00046_enfermedad_checkColumnConstraints(p_data.enfermedad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00046_padecimiento_checkColumnConstraints(p_data.padecimiento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00046_observacion_checkColumnConstraints(p_data.observacion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00046_checkTableConstraints
-
-{}
-#+ Check constraints on the "adtb00046.cod_sol" column
-#+
-#+ @param p_cod_sol - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00046_cod_sol_checkColumnConstraints(p_cod_sol)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sol LIKE adtb00046.cod_sol
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00046_cod_sol_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00046.enfermedad" column
-#+
-#+ @param p_enfermedad - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00046_enfermedad_checkColumnConstraints(p_enfermedad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_enfermedad LIKE adtb00046.enfermedad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00046_enfermedad_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00046.padecimiento" column
-#+
-#+ @param p_padecimiento - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00046_padecimiento_checkColumnConstraints(p_padecimiento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_padecimiento LIKE adtb00046.padecimiento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00046_padecimiento_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00046.observacion" column
-#+
-#+ @param p_observacion - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00046_observacion_checkColumnConstraints(p_observacion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_observacion LIKE adtb00046.observacion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00046_observacion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00045" table
-#+
-#+ @param p_data - a row data LIKE adtb00045.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00045_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE adtb00045.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_adtb00045_cod_idioma_checkColumnConstraints(p_data.cod_idioma) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00045_idioma_checkColumnConstraints(p_data.idioma) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00045_pais_checkColumnConstraints(p_data.pais) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00045_region_checkColumnConstraints(p_data.region) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00045_continente_checkColumnConstraints(p_data.continente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00045_checkTableConstraints
-
-{}
-#+ Check constraints on the "adtb00045.cod_idioma" column
-#+
-#+ @param p_cod_idioma - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00045_cod_idioma_checkColumnConstraints(p_cod_idioma)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_idioma LIKE adtb00045.cod_idioma
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00045_cod_idioma_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00045.idioma" column
-#+
-#+ @param p_idioma - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00045_idioma_checkColumnConstraints(p_idioma)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_idioma LIKE adtb00045.idioma
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00045_idioma_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00045.pais" column
-#+
-#+ @param p_pais - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00045_pais_checkColumnConstraints(p_pais)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_pais LIKE adtb00045.pais
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00045_pais_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00045.region" column
-#+
-#+ @param p_region - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00045_region_checkColumnConstraints(p_region)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_region LIKE adtb00045.region
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00045_region_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00045.continente" column
-#+
-#+ @param p_continente - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00045_continente_checkColumnConstraints(p_continente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_continente LIKE adtb00045.continente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00045_continente_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00043" table
-#+
-#+ @param p_data - a row data LIKE adtb00043.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00043_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE adtb00043.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_adtb00043_cod_sol_checkColumnConstraints(p_data.cod_sol) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00043_idioma_checkColumnConstraints(p_data.idioma) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00043_habla_checkColumnConstraints(p_data.habla) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00043_lee_checkColumnConstraints(p_data.lee) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00043_escribe_checkColumnConstraints(p_data.escribe) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00043_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00043_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00043_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00043_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00043_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00043_id_checkColumnConstraints(p_data.id) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00043_checkTableConstraints
-
-{}
-#+ Check constraints on the "adtb00043.cod_sol" column
-#+
-#+ @param p_cod_sol - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00043_cod_sol_checkColumnConstraints(p_cod_sol)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sol LIKE adtb00043.cod_sol
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00043_cod_sol_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00043.idioma" column
-#+
-#+ @param p_idioma - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00043_idioma_checkColumnConstraints(p_idioma)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_idioma LIKE adtb00043.idioma
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00043_idioma_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00043.habla" column
-#+
-#+ @param p_habla - CHAR(4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00043_habla_checkColumnConstraints(p_habla)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_habla LIKE adtb00043.habla
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00043_habla_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00043.lee" column
-#+
-#+ @param p_lee - CHAR(4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00043_lee_checkColumnConstraints(p_lee)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_lee LIKE adtb00043.lee
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00043_lee_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00043.escribe" column
-#+
-#+ @param p_escribe - CHAR(4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00043_escribe_checkColumnConstraints(p_escribe)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_escribe LIKE adtb00043.escribe
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00043_escribe_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00043.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00043_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE adtb00043.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00043_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00043.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00043_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE adtb00043.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00043_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00043.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00043_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE adtb00043.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00043_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00043.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00043_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE adtb00043.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00043_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00043.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00043_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE adtb00043.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00043_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00043.id" column
-#+
-#+ @param p_id - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00043_id_checkColumnConstraints(p_id)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_id LIKE adtb00043.id
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00043_id_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00042" table
-#+
-#+ @param p_data - a row data LIKE adtb00042.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00042_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE adtb00042.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_adtb00042_dep_corp_checkColumnConstraints(p_data.dep_corp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00042_nombre_depto_checkColumnConstraints(p_data.nombre_depto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00042_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00042_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00042_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00042_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00042_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00042_checkTableConstraints
-
-{}
-#+ Check constraints on the "adtb00042.dep_corp" column
-#+
-#+ @param p_dep_corp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00042_dep_corp_checkColumnConstraints(p_dep_corp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_dep_corp LIKE adtb00042.dep_corp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00042_dep_corp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00042.nombre_depto" column
-#+
-#+ @param p_nombre_depto - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00042_nombre_depto_checkColumnConstraints(p_nombre_depto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombre_depto LIKE adtb00042.nombre_depto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00042_nombre_depto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00042.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00042_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE adtb00042.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00042_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00042.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00042_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE adtb00042.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00042_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00042.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00042_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE adtb00042.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00042_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00042.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00042_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE adtb00042.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00042_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00042.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00042_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE adtb00042.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00042_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00041" table
-#+
-#+ @param p_data - a row data LIKE adtb00041.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00041_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE adtb00041.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_adtb00041_mes_checkColumnConstraints(p_data.mes) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00041_ano_checkColumnConstraints(p_data.ano) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00041_num_sem_checkColumnConstraints(p_data.num_sem) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00041_fecha_del_checkColumnConstraints(p_data.fecha_del) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00041_fecha_al_checkColumnConstraints(p_data.fecha_al) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00041_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00041_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00041_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00041_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00041_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00041_checkTableConstraints
-
-{}
-#+ Check constraints on the "adtb00041.mes" column
-#+
-#+ @param p_mes - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00041_mes_checkColumnConstraints(p_mes)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mes LIKE adtb00041.mes
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00041_mes_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00041.ano" column
-#+
-#+ @param p_ano - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00041_ano_checkColumnConstraints(p_ano)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ano LIKE adtb00041.ano
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00041_ano_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00041.num_sem" column
-#+
-#+ @param p_num_sem - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00041_num_sem_checkColumnConstraints(p_num_sem)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_sem LIKE adtb00041.num_sem
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00041_num_sem_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00041.fecha_del" column
-#+
-#+ @param p_fecha_del - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00041_fecha_del_checkColumnConstraints(p_fecha_del)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_del LIKE adtb00041.fecha_del
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00041_fecha_del_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00041.fecha_al" column
-#+
-#+ @param p_fecha_al - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00041_fecha_al_checkColumnConstraints(p_fecha_al)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_al LIKE adtb00041.fecha_al
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00041_fecha_al_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00041.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00041_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE adtb00041.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00041_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00041.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00041_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE adtb00041.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00041_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00041.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00041_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE adtb00041.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00041_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00041.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00041_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE adtb00041.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00041_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00041.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00041_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE adtb00041.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00041_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00040" table
-#+
-#+ @param p_data - a row data LIKE adtb00040.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00040_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE adtb00040.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_adtb00040_cod_plan_checkColumnConstraints(p_data.cod_plan) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00040_plan_descrip_checkColumnConstraints(p_data.plan_descrip) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00040_porc_vida_checkColumnConstraints(p_data.porc_vida) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00040_porc_mid_checkColumnConstraints(p_data.porc_mid) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00040_porc_comision_checkColumnConstraints(p_data.porc_comision) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00040_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00040_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00040_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00040_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00040_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00040_checkTableConstraints
-
-{}
-#+ Check constraints on the "adtb00040.cod_plan" column
-#+
-#+ @param p_cod_plan - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00040_cod_plan_checkColumnConstraints(p_cod_plan)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_plan LIKE adtb00040.cod_plan
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00040_cod_plan_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00040.plan_descrip" column
-#+
-#+ @param p_plan_descrip - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00040_plan_descrip_checkColumnConstraints(p_plan_descrip)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_plan_descrip LIKE adtb00040.plan_descrip
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00040_plan_descrip_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00040.porc_vida" column
-#+
-#+ @param p_porc_vida - DECIMAL(8,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00040_porc_vida_checkColumnConstraints(p_porc_vida)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_porc_vida LIKE adtb00040.porc_vida
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00040_porc_vida_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00040.porc_mid" column
-#+
-#+ @param p_porc_mid - DECIMAL(8,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00040_porc_mid_checkColumnConstraints(p_porc_mid)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_porc_mid LIKE adtb00040.porc_mid
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00040_porc_mid_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00040.porc_comision" column
-#+
-#+ @param p_porc_comision - DECIMAL(8,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00040_porc_comision_checkColumnConstraints(p_porc_comision)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_porc_comision LIKE adtb00040.porc_comision
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00040_porc_comision_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00040.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00040_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE adtb00040.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00040_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00040.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00040_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE adtb00040.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00040_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00040.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00040_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE adtb00040.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00040_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00040.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00040_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE adtb00040.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00040_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00040.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00040_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE adtb00040.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00040_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00038" table
-#+
-#+ @param p_data - a row data LIKE adtb00038.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00038_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE adtb00038.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_adtb00038_num_emp_checkColumnConstraints(p_data.num_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00038_cedula_n_checkColumnConstraints(p_data.cedula_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00038_checkTableConstraints
-
-{}
-#+ Check constraints on the "adtb00038.num_emp" column
-#+
-#+ @param p_num_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00038_num_emp_checkColumnConstraints(p_num_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_emp LIKE adtb00038.num_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00038_num_emp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00038.cedula_n" column
-#+
-#+ @param p_cedula_n - CHAR(13) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00038_cedula_n_checkColumnConstraints(p_cedula_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cedula_n LIKE adtb00038.cedula_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00038_cedula_n_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00036" table
-#+
-#+ @param p_data - a row data LIKE adtb00036.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00036_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE adtb00036.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_adtb00036_num_emp_checkColumnConstraints(p_data.num_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00036_nom1_emp_checkColumnConstraints(p_data.nom1_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00036_nom2_emp_checkColumnConstraints(p_data.nom2_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00036_apell1_emp_checkColumnConstraints(p_data.apell1_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00036_apell2_emp_checkColumnConstraints(p_data.apell2_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00036_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00036_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00036_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00036_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00036_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00036_checkTableConstraints
-
-{}
-#+ Check constraints on the "adtb00036.num_emp" column
-#+
-#+ @param p_num_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00036_num_emp_checkColumnConstraints(p_num_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_emp LIKE adtb00036.num_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00036_num_emp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00036.nom1_emp" column
-#+
-#+ @param p_nom1_emp - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00036_nom1_emp_checkColumnConstraints(p_nom1_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nom1_emp LIKE adtb00036.nom1_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00036_nom1_emp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00036.nom2_emp" column
-#+
-#+ @param p_nom2_emp - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00036_nom2_emp_checkColumnConstraints(p_nom2_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nom2_emp LIKE adtb00036.nom2_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00036_nom2_emp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00036.apell1_emp" column
-#+
-#+ @param p_apell1_emp - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00036_apell1_emp_checkColumnConstraints(p_apell1_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_apell1_emp LIKE adtb00036.apell1_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00036_apell1_emp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00036.apell2_emp" column
-#+
-#+ @param p_apell2_emp - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00036_apell2_emp_checkColumnConstraints(p_apell2_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_apell2_emp LIKE adtb00036.apell2_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00036_apell2_emp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00036.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00036_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE adtb00036.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00036_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00036.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00036_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE adtb00036.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00036_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00036.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00036_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE adtb00036.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00036_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00036.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00036_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE adtb00036.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00036_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00036.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00036_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE adtb00036.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00036_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00033" table
-#+
-#+ @param p_data - a row data LIKE adtb00033.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00033_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE adtb00033.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_adtb00033_dpto_checkColumnConstraints(p_data.dpto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00033_departamento_checkColumnConstraints(p_data.departamento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00033_nom_dpto_checkColumnConstraints(p_data.nom_dpto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00033_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00033_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00033_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00033_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00033_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00033_checkTableConstraints
-
-{}
-#+ Check constraints on the "adtb00033.dpto" column
-#+
-#+ @param p_dpto - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00033_dpto_checkColumnConstraints(p_dpto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_dpto LIKE adtb00033.dpto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00033_dpto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00033.departamento" column
-#+
-#+ @param p_departamento - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00033_departamento_checkColumnConstraints(p_departamento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_departamento LIKE adtb00033.departamento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00033_departamento_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00033.nom_dpto" column
-#+
-#+ @param p_nom_dpto - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00033_nom_dpto_checkColumnConstraints(p_nom_dpto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nom_dpto LIKE adtb00033.nom_dpto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00033_nom_dpto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00033.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00033_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE adtb00033.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00033_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00033.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00033_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE adtb00033.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00033_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00033.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00033_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE adtb00033.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00033_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00033.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00033_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE adtb00033.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00033_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00033.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00033_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE adtb00033.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00033_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00032" table
-#+
-#+ @param p_data - a row data LIKE adtb00032.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00032_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE adtb00032.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_adtb00032_num_trx_checkColumnConstraints(p_data.num_trx) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00032_num_emp_checkColumnConstraints(p_data.num_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00032_cod_mov_checkColumnConstraints(p_data.cod_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00032_sec_mov_checkColumnConstraints(p_data.sec_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00032_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00032_num_dia_checkColumnConstraints(p_data.num_dia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00032_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00032_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00032_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00032_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00032_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00032_checkTableConstraints
-
-{}
-#+ Check constraints on the "adtb00032.num_trx" column
-#+
-#+ @param p_num_trx - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00032_num_trx_checkColumnConstraints(p_num_trx)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_trx LIKE adtb00032.num_trx
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00032_num_trx_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00032.num_emp" column
-#+
-#+ @param p_num_emp - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00032_num_emp_checkColumnConstraints(p_num_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_emp LIKE adtb00032.num_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00032_num_emp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00032.cod_mov" column
-#+
-#+ @param p_cod_mov - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00032_cod_mov_checkColumnConstraints(p_cod_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mov LIKE adtb00032.cod_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00032_cod_mov_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00032.sec_mov" column
-#+
-#+ @param p_sec_mov - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00032_sec_mov_checkColumnConstraints(p_sec_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_mov LIKE adtb00032.sec_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00032_sec_mov_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00032.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00032_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE adtb00032.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00032_fecha_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00032.num_dia" column
-#+
-#+ @param p_num_dia - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00032_num_dia_checkColumnConstraints(p_num_dia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_dia LIKE adtb00032.num_dia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00032_num_dia_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00032.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00032_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE adtb00032.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00032_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00032.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00032_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE adtb00032.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00032_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00032.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00032_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE adtb00032.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00032_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00032.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00032_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE adtb00032.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00032_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00032.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00032_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE adtb00032.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00032_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00030" table
-#+
-#+ @param p_data - a row data LIKE adtb00030.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00030_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE adtb00030.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_adtb00030_num_emp_checkColumnConstraints(p_data.num_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00030_sexo_checkColumnConstraints(p_data.sexo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00030_nis_checkColumnConstraints(p_data.nis) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00030_checkTableConstraints
-
-{}
-#+ Check constraints on the "adtb00030.num_emp" column
-#+
-#+ @param p_num_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00030_num_emp_checkColumnConstraints(p_num_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_emp LIKE adtb00030.num_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00030_num_emp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00030.sexo" column
-#+
-#+ @param p_sexo - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00030_sexo_checkColumnConstraints(p_sexo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sexo LIKE adtb00030.sexo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00030_sexo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00030.nis" column
-#+
-#+ @param p_nis - CHAR(25) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00030_nis_checkColumnConstraints(p_nis)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nis LIKE adtb00030.nis
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00030_nis_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00029" table
-#+
-#+ @param p_data - a row data LIKE adtb00029.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00029_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE adtb00029.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_adtb00029_departamento_checkColumnConstraints(p_data.departamento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00029_estado_a_checkColumnConstraints(p_data.estado_a) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00029_estado_m_checkColumnConstraints(p_data.estado_m) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00029_depto_ant_checkColumnConstraints(p_data.depto_ant) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00029_estatus_t_checkColumnConstraints(p_data.estatus_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00029_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00029_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00029_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00029_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00029_checkTableConstraints
-
-{}
-#+ Check constraints on the "adtb00029.departamento" column
-#+
-#+ @param p_departamento - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00029_departamento_checkColumnConstraints(p_departamento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_departamento LIKE adtb00029.departamento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00029_departamento_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00029.estado_a" column
-#+
-#+ @param p_estado_a - CHAR(4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00029_estado_a_checkColumnConstraints(p_estado_a)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_estado_a LIKE adtb00029.estado_a
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00029_estado_a_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00029.estado_m" column
-#+
-#+ @param p_estado_m - CHAR(4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00029_estado_m_checkColumnConstraints(p_estado_m)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_estado_m LIKE adtb00029.estado_m
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00029_estado_m_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00029.depto_ant" column
-#+
-#+ @param p_depto_ant - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00029_depto_ant_checkColumnConstraints(p_depto_ant)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_depto_ant LIKE adtb00029.depto_ant
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00029_depto_ant_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00029.estatus_t" column
-#+
-#+ @param p_estatus_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00029_estatus_t_checkColumnConstraints(p_estatus_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_estatus_t LIKE adtb00029.estatus_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00029_estatus_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00029.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00029_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE adtb00029.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00029_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00029.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00029_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE adtb00029.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00029_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00029.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00029_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE adtb00029.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00029_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00029.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00029_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE adtb00029.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00029_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00028" table
-#+
-#+ @param p_data - a row data LIKE adtb00028.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00028_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE adtb00028.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_adtb00028_num_trx_checkColumnConstraints(p_data.num_trx) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00028_clave_checkColumnConstraints(p_data.clave) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00028_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00028_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00028_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00028_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00028_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00028_checkTableConstraints
-
-{}
-#+ Check constraints on the "adtb00028.num_trx" column
-#+
-#+ @param p_num_trx - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00028_num_trx_checkColumnConstraints(p_num_trx)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_trx LIKE adtb00028.num_trx
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00028_num_trx_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00028.clave" column
-#+
-#+ @param p_clave - CHAR(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00028_clave_checkColumnConstraints(p_clave)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_clave LIKE adtb00028.clave
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00028_clave_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00028.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00028_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE adtb00028.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00028_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00028.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00028_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE adtb00028.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00028_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00028.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00028_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE adtb00028.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00028_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00028.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00028_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE adtb00028.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00028_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00028.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00028_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE adtb00028.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00028_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00027" table
-#+
-#+ @param p_data - a row data LIKE adtb00027.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00027_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE adtb00027.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_adtb00027_num_emp_checkColumnConstraints(p_data.num_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00027_departamento_checkColumnConstraints(p_data.departamento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00027_nivel_emp_checkColumnConstraints(p_data.nivel_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00027_cod_puesto_checkColumnConstraints(p_data.cod_puesto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00027_fecha_sal_checkColumnConstraints(p_data.fecha_sal) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00027_fecha_ent_checkColumnConstraints(p_data.fecha_ent) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00027_dias_tomados_checkColumnConstraints(p_data.dias_tomados) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00027_dias_vac_checkColumnConstraints(p_data.dias_vac) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00027_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00027_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00027_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00027_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00027_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00027_checkTableConstraints
-
-{}
-#+ Check constraints on the "adtb00027.num_emp" column
-#+
-#+ @param p_num_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00027_num_emp_checkColumnConstraints(p_num_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_emp LIKE adtb00027.num_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00027_num_emp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00027.departamento" column
-#+
-#+ @param p_departamento - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00027_departamento_checkColumnConstraints(p_departamento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_departamento LIKE adtb00027.departamento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00027_departamento_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00027.nivel_emp" column
-#+
-#+ @param p_nivel_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00027_nivel_emp_checkColumnConstraints(p_nivel_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nivel_emp LIKE adtb00027.nivel_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00027_nivel_emp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00027.cod_puesto" column
-#+
-#+ @param p_cod_puesto - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00027_cod_puesto_checkColumnConstraints(p_cod_puesto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_puesto LIKE adtb00027.cod_puesto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00027_cod_puesto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00027.fecha_sal" column
-#+
-#+ @param p_fecha_sal - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00027_fecha_sal_checkColumnConstraints(p_fecha_sal)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_sal LIKE adtb00027.fecha_sal
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00027_fecha_sal_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00027.fecha_ent" column
-#+
-#+ @param p_fecha_ent - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00027_fecha_ent_checkColumnConstraints(p_fecha_ent)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_ent LIKE adtb00027.fecha_ent
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00027_fecha_ent_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00027.dias_tomados" column
-#+
-#+ @param p_dias_tomados - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00027_dias_tomados_checkColumnConstraints(p_dias_tomados)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_dias_tomados LIKE adtb00027.dias_tomados
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00027_dias_tomados_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00027.dias_vac" column
-#+
-#+ @param p_dias_vac - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00027_dias_vac_checkColumnConstraints(p_dias_vac)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_dias_vac LIKE adtb00027.dias_vac
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00027_dias_vac_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00027.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00027_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE adtb00027.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00027_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00027.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00027_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE adtb00027.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00027_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00027.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00027_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE adtb00027.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00027_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00027.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00027_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE adtb00027.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00027_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00027.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00027_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE adtb00027.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00027_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00026" table
-#+
-#+ @param p_data - a row data LIKE adtb00026.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00026_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE adtb00026.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_adtb00026_amon_num_checkColumnConstraints(p_data.amon_num) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00026_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00026_num_emp_checkColumnConstraints(p_data.num_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00026_departamento_checkColumnConstraints(p_data.departamento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00026_nivel_emp_checkColumnConstraints(p_data.nivel_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00026_cod_puesto_checkColumnConstraints(p_data.cod_puesto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00026_violacion_checkColumnConstraints(p_data.violacion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00026_violacion1_checkColumnConstraints(p_data.violacion1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00026_num1_emp_checkColumnConstraints(p_data.num1_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00026_departamento1_checkColumnConstraints(p_data.departamento1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00026_nivel1_emp_checkColumnConstraints(p_data.nivel1_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00026_cod1_puesto_checkColumnConstraints(p_data.cod1_puesto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00026_num2_emp_checkColumnConstraints(p_data.num2_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00026_departamento2_checkColumnConstraints(p_data.departamento2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00026_nivel2_emp_checkColumnConstraints(p_data.nivel2_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00026_cod2_puesto_checkColumnConstraints(p_data.cod2_puesto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00026_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00026_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00026_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00026_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00026_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00026_checkTableConstraints
-
-{}
-#+ Check constraints on the "adtb00026.amon_num" column
-#+
-#+ @param p_amon_num - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00026_amon_num_checkColumnConstraints(p_amon_num)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_amon_num LIKE adtb00026.amon_num
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00026_amon_num_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00026.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00026_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE adtb00026.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00026_fecha_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00026.num_emp" column
-#+
-#+ @param p_num_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00026_num_emp_checkColumnConstraints(p_num_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_emp LIKE adtb00026.num_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00026_num_emp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00026.departamento" column
-#+
-#+ @param p_departamento - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00026_departamento_checkColumnConstraints(p_departamento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_departamento LIKE adtb00026.departamento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00026_departamento_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00026.nivel_emp" column
-#+
-#+ @param p_nivel_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00026_nivel_emp_checkColumnConstraints(p_nivel_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nivel_emp LIKE adtb00026.nivel_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00026_nivel_emp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00026.cod_puesto" column
-#+
-#+ @param p_cod_puesto - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00026_cod_puesto_checkColumnConstraints(p_cod_puesto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_puesto LIKE adtb00026.cod_puesto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00026_cod_puesto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00026.violacion" column
-#+
-#+ @param p_violacion - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00026_violacion_checkColumnConstraints(p_violacion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_violacion LIKE adtb00026.violacion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00026_violacion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00026.violacion1" column
-#+
-#+ @param p_violacion1 - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00026_violacion1_checkColumnConstraints(p_violacion1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_violacion1 LIKE adtb00026.violacion1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00026_violacion1_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00026.num1_emp" column
-#+
-#+ @param p_num1_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00026_num1_emp_checkColumnConstraints(p_num1_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num1_emp LIKE adtb00026.num1_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00026_num1_emp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00026.departamento1" column
-#+
-#+ @param p_departamento1 - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00026_departamento1_checkColumnConstraints(p_departamento1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_departamento1 LIKE adtb00026.departamento1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00026_departamento1_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00026.nivel1_emp" column
-#+
-#+ @param p_nivel1_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00026_nivel1_emp_checkColumnConstraints(p_nivel1_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nivel1_emp LIKE adtb00026.nivel1_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00026_nivel1_emp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00026.cod1_puesto" column
-#+
-#+ @param p_cod1_puesto - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00026_cod1_puesto_checkColumnConstraints(p_cod1_puesto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod1_puesto LIKE adtb00026.cod1_puesto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00026_cod1_puesto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00026.num2_emp" column
-#+
-#+ @param p_num2_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00026_num2_emp_checkColumnConstraints(p_num2_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num2_emp LIKE adtb00026.num2_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00026_num2_emp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00026.departamento2" column
-#+
-#+ @param p_departamento2 - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00026_departamento2_checkColumnConstraints(p_departamento2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_departamento2 LIKE adtb00026.departamento2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00026_departamento2_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00026.nivel2_emp" column
-#+
-#+ @param p_nivel2_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00026_nivel2_emp_checkColumnConstraints(p_nivel2_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nivel2_emp LIKE adtb00026.nivel2_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00026_nivel2_emp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00026.cod2_puesto" column
-#+
-#+ @param p_cod2_puesto - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00026_cod2_puesto_checkColumnConstraints(p_cod2_puesto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod2_puesto LIKE adtb00026.cod2_puesto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00026_cod2_puesto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00026.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00026_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE adtb00026.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00026_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00026.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00026_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE adtb00026.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00026_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00026.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00026_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE adtb00026.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00026_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00026.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00026_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE adtb00026.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00026_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00026.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00026_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE adtb00026.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00026_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00025" table
-#+
-#+ @param p_data - a row data LIKE adtb00025.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00025_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE adtb00025.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_adtb00025_cod_par_checkColumnConstraints(p_data.cod_par) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00025_desc_par_checkColumnConstraints(p_data.desc_par) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00025_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00025_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00025_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00025_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00025_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00025_checkTableConstraints
-
-{}
-#+ Check constraints on the "adtb00025.cod_par" column
-#+
-#+ @param p_cod_par - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00025_cod_par_checkColumnConstraints(p_cod_par)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_par LIKE adtb00025.cod_par
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00025_cod_par_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00025.desc_par" column
-#+
-#+ @param p_desc_par - CHAR(11) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00025_desc_par_checkColumnConstraints(p_desc_par)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_desc_par LIKE adtb00025.desc_par
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00025_desc_par_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00025.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00025_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE adtb00025.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00025_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00025.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00025_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE adtb00025.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00025_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00025.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00025_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE adtb00025.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00025_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00025.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00025_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE adtb00025.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00025_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00025.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00025_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE adtb00025.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00025_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00024" table
-#+
-#+ @param p_data - a row data LIKE adtb00024.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00024_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE adtb00024.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_adtb00024_nivel_emp_checkColumnConstraints(p_data.nivel_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00024_desc_nivel_checkColumnConstraints(p_data.desc_nivel) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00024_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00024_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00024_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00024_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00024_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00024_checkTableConstraints
-
-{}
-#+ Check constraints on the "adtb00024.nivel_emp" column
-#+
-#+ @param p_nivel_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00024_nivel_emp_checkColumnConstraints(p_nivel_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nivel_emp LIKE adtb00024.nivel_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00024_nivel_emp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00024.desc_nivel" column
-#+
-#+ @param p_desc_nivel - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00024_desc_nivel_checkColumnConstraints(p_desc_nivel)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_desc_nivel LIKE adtb00024.desc_nivel
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00024_desc_nivel_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00024.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00024_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE adtb00024.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00024_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00024.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00024_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE adtb00024.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00024_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00024.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00024_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE adtb00024.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00024_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00024.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00024_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE adtb00024.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00024_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00024.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00024_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE adtb00024.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00024_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00023" table
-#+
-#+ @param p_data - a row data LIKE adtb00023.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00023_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE adtb00023.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_adtb00023_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00023_num_emp_checkColumnConstraints(p_data.num_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00023_departamento_checkColumnConstraints(p_data.departamento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00023_nivel_emp_checkColumnConstraints(p_data.nivel_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00023_cod_puesto_checkColumnConstraints(p_data.cod_puesto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00023_hora_ent_checkColumnConstraints(p_data.hora_ent) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00023_hora_sal_checkColumnConstraints(p_data.hora_sal) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00023_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00023_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00023_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00023_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00023_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00023_checkTableConstraints
-
-{}
-#+ Check constraints on the "adtb00023.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00023_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE adtb00023.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00023_fecha_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00023.num_emp" column
-#+
-#+ @param p_num_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00023_num_emp_checkColumnConstraints(p_num_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_emp LIKE adtb00023.num_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00023_num_emp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00023.departamento" column
-#+
-#+ @param p_departamento - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00023_departamento_checkColumnConstraints(p_departamento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_departamento LIKE adtb00023.departamento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00023_departamento_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00023.nivel_emp" column
-#+
-#+ @param p_nivel_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00023_nivel_emp_checkColumnConstraints(p_nivel_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nivel_emp LIKE adtb00023.nivel_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00023_nivel_emp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00023.cod_puesto" column
-#+
-#+ @param p_cod_puesto - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00023_cod_puesto_checkColumnConstraints(p_cod_puesto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_puesto LIKE adtb00023.cod_puesto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00023_cod_puesto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00023.hora_ent" column
-#+
-#+ @param p_hora_ent - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00023_hora_ent_checkColumnConstraints(p_hora_ent)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_hora_ent LIKE adtb00023.hora_ent
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00023_hora_ent_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00023.hora_sal" column
-#+
-#+ @param p_hora_sal - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00023_hora_sal_checkColumnConstraints(p_hora_sal)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_hora_sal LIKE adtb00023.hora_sal
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00023_hora_sal_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00023.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00023_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE adtb00023.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00023_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00023.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00023_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE adtb00023.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00023_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00023.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00023_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE adtb00023.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00023_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00023.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00023_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE adtb00023.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00023_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00023.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00023_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE adtb00023.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00023_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00022" table
-#+
-#+ @param p_data - a row data LIKE adtb00022.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00022_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE adtb00022.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_adtb00022_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00022_num_emp_checkColumnConstraints(p_data.num_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00022_departamento_checkColumnConstraints(p_data.departamento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00022_nivel_emp_checkColumnConstraints(p_data.nivel_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00022_cod_puesto_checkColumnConstraints(p_data.cod_puesto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00022_cod_prof_checkColumnConstraints(p_data.cod_prof) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00022_evento_checkColumnConstraints(p_data.evento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00022_nom_evento_checkColumnConstraints(p_data.nom_evento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00022_fech_evento_checkColumnConstraints(p_data.fech_evento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00022_costo_evento_checkColumnConstraints(p_data.costo_evento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00022_num1_emp_checkColumnConstraints(p_data.num1_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00022_departamento1_checkColumnConstraints(p_data.departamento1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00022_nivel1_emp_checkColumnConstraints(p_data.nivel1_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00022_cod1_puesto_checkColumnConstraints(p_data.cod1_puesto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00022_num2_emp_checkColumnConstraints(p_data.num2_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00022_departamento2_checkColumnConstraints(p_data.departamento2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00022_nivel2_emp_checkColumnConstraints(p_data.nivel2_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00022_cod2_puesto_checkColumnConstraints(p_data.cod2_puesto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00022_num3_emp_checkColumnConstraints(p_data.num3_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00022_departamento3_checkColumnConstraints(p_data.departamento3) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00022_nivel3_emp_checkColumnConstraints(p_data.nivel3_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00022_cod3_puesto_checkColumnConstraints(p_data.cod3_puesto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00022_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00022_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00022_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00022_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00022_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00022_checkTableConstraints
-
-{}
-#+ Check constraints on the "adtb00022.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00022_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE adtb00022.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00022_fecha_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00022.num_emp" column
-#+
-#+ @param p_num_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00022_num_emp_checkColumnConstraints(p_num_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_emp LIKE adtb00022.num_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00022_num_emp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00022.departamento" column
-#+
-#+ @param p_departamento - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00022_departamento_checkColumnConstraints(p_departamento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_departamento LIKE adtb00022.departamento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00022_departamento_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00022.nivel_emp" column
-#+
-#+ @param p_nivel_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00022_nivel_emp_checkColumnConstraints(p_nivel_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nivel_emp LIKE adtb00022.nivel_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00022_nivel_emp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00022.cod_puesto" column
-#+
-#+ @param p_cod_puesto - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00022_cod_puesto_checkColumnConstraints(p_cod_puesto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_puesto LIKE adtb00022.cod_puesto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00022_cod_puesto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00022.cod_prof" column
-#+
-#+ @param p_cod_prof - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00022_cod_prof_checkColumnConstraints(p_cod_prof)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_prof LIKE adtb00022.cod_prof
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00022_cod_prof_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00022.evento" column
-#+
-#+ @param p_evento - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00022_evento_checkColumnConstraints(p_evento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_evento LIKE adtb00022.evento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00022_evento_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00022.nom_evento" column
-#+
-#+ @param p_nom_evento - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00022_nom_evento_checkColumnConstraints(p_nom_evento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nom_evento LIKE adtb00022.nom_evento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00022_nom_evento_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00022.fech_evento" column
-#+
-#+ @param p_fech_evento - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00022_fech_evento_checkColumnConstraints(p_fech_evento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_evento LIKE adtb00022.fech_evento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00022_fech_evento_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00022.costo_evento" column
-#+
-#+ @param p_costo_evento - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00022_costo_evento_checkColumnConstraints(p_costo_evento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_costo_evento LIKE adtb00022.costo_evento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00022_costo_evento_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00022.num1_emp" column
-#+
-#+ @param p_num1_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00022_num1_emp_checkColumnConstraints(p_num1_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num1_emp LIKE adtb00022.num1_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00022_num1_emp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00022.departamento1" column
-#+
-#+ @param p_departamento1 - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00022_departamento1_checkColumnConstraints(p_departamento1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_departamento1 LIKE adtb00022.departamento1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00022_departamento1_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00022.nivel1_emp" column
-#+
-#+ @param p_nivel1_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00022_nivel1_emp_checkColumnConstraints(p_nivel1_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nivel1_emp LIKE adtb00022.nivel1_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00022_nivel1_emp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00022.cod1_puesto" column
-#+
-#+ @param p_cod1_puesto - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00022_cod1_puesto_checkColumnConstraints(p_cod1_puesto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod1_puesto LIKE adtb00022.cod1_puesto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00022_cod1_puesto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00022.num2_emp" column
-#+
-#+ @param p_num2_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00022_num2_emp_checkColumnConstraints(p_num2_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num2_emp LIKE adtb00022.num2_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00022_num2_emp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00022.departamento2" column
-#+
-#+ @param p_departamento2 - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00022_departamento2_checkColumnConstraints(p_departamento2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_departamento2 LIKE adtb00022.departamento2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00022_departamento2_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00022.nivel2_emp" column
-#+
-#+ @param p_nivel2_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00022_nivel2_emp_checkColumnConstraints(p_nivel2_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nivel2_emp LIKE adtb00022.nivel2_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00022_nivel2_emp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00022.cod2_puesto" column
-#+
-#+ @param p_cod2_puesto - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00022_cod2_puesto_checkColumnConstraints(p_cod2_puesto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod2_puesto LIKE adtb00022.cod2_puesto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00022_cod2_puesto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00022.num3_emp" column
-#+
-#+ @param p_num3_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00022_num3_emp_checkColumnConstraints(p_num3_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num3_emp LIKE adtb00022.num3_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00022_num3_emp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00022.departamento3" column
-#+
-#+ @param p_departamento3 - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00022_departamento3_checkColumnConstraints(p_departamento3)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_departamento3 LIKE adtb00022.departamento3
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00022_departamento3_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00022.nivel3_emp" column
-#+
-#+ @param p_nivel3_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00022_nivel3_emp_checkColumnConstraints(p_nivel3_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nivel3_emp LIKE adtb00022.nivel3_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00022_nivel3_emp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00022.cod3_puesto" column
-#+
-#+ @param p_cod3_puesto - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00022_cod3_puesto_checkColumnConstraints(p_cod3_puesto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod3_puesto LIKE adtb00022.cod3_puesto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00022_cod3_puesto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00022.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00022_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE adtb00022.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00022_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00022.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00022_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE adtb00022.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00022_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00022.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00022_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE adtb00022.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00022_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00022.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00022_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE adtb00022.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00022_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00022.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00022_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE adtb00022.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00022_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00021" table
-#+
-#+ @param p_data - a row data LIKE adtb00021.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00021_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE adtb00021.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_adtb00021_num_emp_checkColumnConstraints(p_data.num_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00021_cod_par_checkColumnConstraints(p_data.cod_par) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00021_sec_par_checkColumnConstraints(p_data.sec_par) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00021_nombre_checkColumnConstraints(p_data.nombre) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00021_cedula_checkColumnConstraints(p_data.cedula) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00021_sexo_checkColumnConstraints(p_data.sexo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00021_fecha_nac_checkColumnConstraints(p_data.fecha_nac) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00021_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00021_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00021_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00021_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00021_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00021_checkTableConstraints
-
-{}
-#+ Check constraints on the "adtb00021.num_emp" column
-#+
-#+ @param p_num_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00021_num_emp_checkColumnConstraints(p_num_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_emp LIKE adtb00021.num_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00021_num_emp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00021.cod_par" column
-#+
-#+ @param p_cod_par - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00021_cod_par_checkColumnConstraints(p_cod_par)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_par LIKE adtb00021.cod_par
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00021_cod_par_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00021.sec_par" column
-#+
-#+ @param p_sec_par - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00021_sec_par_checkColumnConstraints(p_sec_par)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_par LIKE adtb00021.sec_par
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00021_sec_par_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00021.nombre" column
-#+
-#+ @param p_nombre - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00021_nombre_checkColumnConstraints(p_nombre)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombre LIKE adtb00021.nombre
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00021_nombre_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00021.cedula" column
-#+
-#+ @param p_cedula - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00021_cedula_checkColumnConstraints(p_cedula)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cedula LIKE adtb00021.cedula
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00021_cedula_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00021.sexo" column
-#+
-#+ @param p_sexo - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00021_sexo_checkColumnConstraints(p_sexo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sexo LIKE adtb00021.sexo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00021_sexo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00021.fecha_nac" column
-#+
-#+ @param p_fecha_nac - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00021_fecha_nac_checkColumnConstraints(p_fecha_nac)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_nac LIKE adtb00021.fecha_nac
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00021_fecha_nac_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00021.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00021_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE adtb00021.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00021_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00021.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00021_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE adtb00021.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00021_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00021.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00021_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE adtb00021.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00021_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00021.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00021_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE adtb00021.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00021_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00021.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00021_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE adtb00021.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00021_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00020" table
-#+
-#+ @param p_data - a row data LIKE adtb00020.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00020_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE adtb00020.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_adtb00020_num_trx_checkColumnConstraints(p_data.num_trx) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00020_cod_sol_checkColumnConstraints(p_data.cod_sol) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00020_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00020_fech_efec_checkColumnConstraints(p_data.fech_efec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00020_num_emp_checkColumnConstraints(p_data.num_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00020_departamento_checkColumnConstraints(p_data.departamento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00020_nivel_emp_checkColumnConstraints(p_data.nivel_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00020_cod_puesto_checkColumnConstraints(p_data.cod_puesto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00020_sueldo_ac_checkColumnConstraints(p_data.sueldo_ac) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00020_nomina_checkColumnConstraints(p_data.nomina) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00020_estado_civil_checkColumnConstraints(p_data.estado_civil) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00020_tipo_sangre_checkColumnConstraints(p_data.tipo_sangre) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00020_cod_mto_checkColumnConstraints(p_data.cod_mto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00020_sec_mto_checkColumnConstraints(p_data.sec_mto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00020_observacion_checkColumnConstraints(p_data.observacion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00020_num1_emp_checkColumnConstraints(p_data.num1_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00020_departamento1_checkColumnConstraints(p_data.departamento1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00020_nivel1_emp_checkColumnConstraints(p_data.nivel1_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00020_cod1_puesto_checkColumnConstraints(p_data.cod1_puesto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00020_num2_emp_checkColumnConstraints(p_data.num2_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00020_departamento2_checkColumnConstraints(p_data.departamento2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00020_nivel2_emp_checkColumnConstraints(p_data.nivel2_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00020_cod2_puesto_checkColumnConstraints(p_data.cod2_puesto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00020_num3_emp_checkColumnConstraints(p_data.num3_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00020_departamento3_checkColumnConstraints(p_data.departamento3) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00020_nivel3_emp_checkColumnConstraints(p_data.nivel3_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00020_cod3_puesto_checkColumnConstraints(p_data.cod3_puesto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00020_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00020_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00020_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00020_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00020_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00020_checkTableConstraints
-
-{}
-#+ Check constraints on the "adtb00020.num_trx" column
-#+
-#+ @param p_num_trx - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00020_num_trx_checkColumnConstraints(p_num_trx)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_trx LIKE adtb00020.num_trx
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00020_num_trx_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00020.cod_sol" column
-#+
-#+ @param p_cod_sol - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00020_cod_sol_checkColumnConstraints(p_cod_sol)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sol LIKE adtb00020.cod_sol
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00020_cod_sol_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00020.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00020_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE adtb00020.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00020_fecha_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00020.fech_efec" column
-#+
-#+ @param p_fech_efec - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00020_fech_efec_checkColumnConstraints(p_fech_efec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_efec LIKE adtb00020.fech_efec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00020_fech_efec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00020.num_emp" column
-#+
-#+ @param p_num_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00020_num_emp_checkColumnConstraints(p_num_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_emp LIKE adtb00020.num_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00020_num_emp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00020.departamento" column
-#+
-#+ @param p_departamento - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00020_departamento_checkColumnConstraints(p_departamento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_departamento LIKE adtb00020.departamento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00020_departamento_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00020.nivel_emp" column
-#+
-#+ @param p_nivel_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00020_nivel_emp_checkColumnConstraints(p_nivel_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nivel_emp LIKE adtb00020.nivel_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00020_nivel_emp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00020.cod_puesto" column
-#+
-#+ @param p_cod_puesto - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00020_cod_puesto_checkColumnConstraints(p_cod_puesto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_puesto LIKE adtb00020.cod_puesto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00020_cod_puesto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00020.sueldo_ac" column
-#+
-#+ @param p_sueldo_ac - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00020_sueldo_ac_checkColumnConstraints(p_sueldo_ac)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sueldo_ac LIKE adtb00020.sueldo_ac
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00020_sueldo_ac_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00020.nomina" column
-#+
-#+ @param p_nomina - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00020_nomina_checkColumnConstraints(p_nomina)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nomina LIKE adtb00020.nomina
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00020_nomina_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00020.estado_civil" column
-#+
-#+ @param p_estado_civil - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00020_estado_civil_checkColumnConstraints(p_estado_civil)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_estado_civil LIKE adtb00020.estado_civil
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00020_estado_civil_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00020.tipo_sangre" column
-#+
-#+ @param p_tipo_sangre - CHAR(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00020_tipo_sangre_checkColumnConstraints(p_tipo_sangre)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_sangre LIKE adtb00020.tipo_sangre
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00020_tipo_sangre_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00020.cod_mto" column
-#+
-#+ @param p_cod_mto - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00020_cod_mto_checkColumnConstraints(p_cod_mto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mto LIKE adtb00020.cod_mto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00020_cod_mto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00020.sec_mto" column
-#+
-#+ @param p_sec_mto - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00020_sec_mto_checkColumnConstraints(p_sec_mto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_mto LIKE adtb00020.sec_mto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00020_sec_mto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00020.observacion" column
-#+
-#+ @param p_observacion - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00020_observacion_checkColumnConstraints(p_observacion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_observacion LIKE adtb00020.observacion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00020_observacion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00020.num1_emp" column
-#+
-#+ @param p_num1_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00020_num1_emp_checkColumnConstraints(p_num1_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num1_emp LIKE adtb00020.num1_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00020_num1_emp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00020.departamento1" column
-#+
-#+ @param p_departamento1 - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00020_departamento1_checkColumnConstraints(p_departamento1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_departamento1 LIKE adtb00020.departamento1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00020_departamento1_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00020.nivel1_emp" column
-#+
-#+ @param p_nivel1_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00020_nivel1_emp_checkColumnConstraints(p_nivel1_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nivel1_emp LIKE adtb00020.nivel1_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00020_nivel1_emp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00020.cod1_puesto" column
-#+
-#+ @param p_cod1_puesto - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00020_cod1_puesto_checkColumnConstraints(p_cod1_puesto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod1_puesto LIKE adtb00020.cod1_puesto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00020_cod1_puesto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00020.num2_emp" column
-#+
-#+ @param p_num2_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00020_num2_emp_checkColumnConstraints(p_num2_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num2_emp LIKE adtb00020.num2_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00020_num2_emp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00020.departamento2" column
-#+
-#+ @param p_departamento2 - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00020_departamento2_checkColumnConstraints(p_departamento2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_departamento2 LIKE adtb00020.departamento2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00020_departamento2_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00020.nivel2_emp" column
-#+
-#+ @param p_nivel2_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00020_nivel2_emp_checkColumnConstraints(p_nivel2_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nivel2_emp LIKE adtb00020.nivel2_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00020_nivel2_emp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00020.cod2_puesto" column
-#+
-#+ @param p_cod2_puesto - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00020_cod2_puesto_checkColumnConstraints(p_cod2_puesto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod2_puesto LIKE adtb00020.cod2_puesto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00020_cod2_puesto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00020.num3_emp" column
-#+
-#+ @param p_num3_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00020_num3_emp_checkColumnConstraints(p_num3_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num3_emp LIKE adtb00020.num3_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00020_num3_emp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00020.departamento3" column
-#+
-#+ @param p_departamento3 - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00020_departamento3_checkColumnConstraints(p_departamento3)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_departamento3 LIKE adtb00020.departamento3
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00020_departamento3_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00020.nivel3_emp" column
-#+
-#+ @param p_nivel3_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00020_nivel3_emp_checkColumnConstraints(p_nivel3_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nivel3_emp LIKE adtb00020.nivel3_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00020_nivel3_emp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00020.cod3_puesto" column
-#+
-#+ @param p_cod3_puesto - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00020_cod3_puesto_checkColumnConstraints(p_cod3_puesto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod3_puesto LIKE adtb00020.cod3_puesto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00020_cod3_puesto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00020.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00020_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE adtb00020.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00020_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00020.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00020_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE adtb00020.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00020_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00020.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00020_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE adtb00020.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00020_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00020.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00020_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE adtb00020.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00020_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00020.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00020_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE adtb00020.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00020_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00019" table
-#+
-#+ @param p_data - a row data LIKE adtb00019.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00019_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE adtb00019.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_adtb00019_cod_sol_checkColumnConstraints(p_data.cod_sol) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00019_fech_efec_checkColumnConstraints(p_data.fech_efec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00019_sueldo_checkColumnConstraints(p_data.sueldo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00019_cod_mto_checkColumnConstraints(p_data.cod_mto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00019_sec_mto_checkColumnConstraints(p_data.sec_mto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00019_periodo_checkColumnConstraints(p_data.periodo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00019_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00019_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00019_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00019_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00019_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00019_checkTableConstraints
-
-{}
-#+ Check constraints on the "adtb00019.cod_sol" column
-#+
-#+ @param p_cod_sol - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00019_cod_sol_checkColumnConstraints(p_cod_sol)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sol LIKE adtb00019.cod_sol
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00019_cod_sol_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00019.fech_efec" column
-#+
-#+ @param p_fech_efec - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00019_fech_efec_checkColumnConstraints(p_fech_efec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_efec LIKE adtb00019.fech_efec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00019_fech_efec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00019.sueldo" column
-#+
-#+ @param p_sueldo - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00019_sueldo_checkColumnConstraints(p_sueldo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sueldo LIKE adtb00019.sueldo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00019_sueldo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00019.cod_mto" column
-#+
-#+ @param p_cod_mto - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00019_cod_mto_checkColumnConstraints(p_cod_mto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mto LIKE adtb00019.cod_mto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00019_cod_mto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00019.sec_mto" column
-#+
-#+ @param p_sec_mto - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00019_sec_mto_checkColumnConstraints(p_sec_mto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_mto LIKE adtb00019.sec_mto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00019_sec_mto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00019.periodo" column
-#+
-#+ @param p_periodo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00019_periodo_checkColumnConstraints(p_periodo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_periodo LIKE adtb00019.periodo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00019_periodo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00019.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00019_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE adtb00019.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00019_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00019.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00019_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE adtb00019.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00019_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00019.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00019_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE adtb00019.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00019_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00019.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00019_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE adtb00019.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00019_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00019.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00019_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE adtb00019.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00019_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00018" table
-#+
-#+ @param p_data - a row data LIKE adtb00018.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00018_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE adtb00018.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_adtb00018_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00018_cod_sol_checkColumnConstraints(p_data.cod_sol) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00018_num_emp_checkColumnConstraints(p_data.num_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00018_departamento_checkColumnConstraints(p_data.departamento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00018_nivel_emp_checkColumnConstraints(p_data.nivel_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00018_cod_puesto_checkColumnConstraints(p_data.cod_puesto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00018_num3_emp_checkColumnConstraints(p_data.num3_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00018_departamento3_checkColumnConstraints(p_data.departamento3) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00018_nivel3_emp_checkColumnConstraints(p_data.nivel3_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00018_cod3_puesto_checkColumnConstraints(p_data.cod3_puesto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00018_recomendacion_checkColumnConstraints(p_data.recomendacion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00018_otros_com_checkColumnConstraints(p_data.otros_com) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00018_num1_emp_checkColumnConstraints(p_data.num1_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00018_departamento1_checkColumnConstraints(p_data.departamento1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00018_nivel1_emp_checkColumnConstraints(p_data.nivel1_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00018_cod1_puesto_checkColumnConstraints(p_data.cod1_puesto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00018_num2_emp_checkColumnConstraints(p_data.num2_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00018_departamento2_checkColumnConstraints(p_data.departamento2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00018_nivel2_emp_checkColumnConstraints(p_data.nivel2_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00018_cod2_puesto_checkColumnConstraints(p_data.cod2_puesto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00018_cod_requi_checkColumnConstraints(p_data.cod_requi) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00018_ind_requi_checkColumnConstraints(p_data.ind_requi) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00018_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00018_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00018_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00018_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00018_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00018_checkTableConstraints
-
-{}
-#+ Check constraints on the "adtb00018.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00018_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE adtb00018.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00018_fecha_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00018.cod_sol" column
-#+
-#+ @param p_cod_sol - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00018_cod_sol_checkColumnConstraints(p_cod_sol)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sol LIKE adtb00018.cod_sol
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00018_cod_sol_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00018.num_emp" column
-#+
-#+ @param p_num_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00018_num_emp_checkColumnConstraints(p_num_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_emp LIKE adtb00018.num_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00018_num_emp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00018.departamento" column
-#+
-#+ @param p_departamento - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00018_departamento_checkColumnConstraints(p_departamento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_departamento LIKE adtb00018.departamento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00018_departamento_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00018.nivel_emp" column
-#+
-#+ @param p_nivel_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00018_nivel_emp_checkColumnConstraints(p_nivel_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nivel_emp LIKE adtb00018.nivel_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00018_nivel_emp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00018.cod_puesto" column
-#+
-#+ @param p_cod_puesto - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00018_cod_puesto_checkColumnConstraints(p_cod_puesto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_puesto LIKE adtb00018.cod_puesto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00018_cod_puesto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00018.num3_emp" column
-#+
-#+ @param p_num3_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00018_num3_emp_checkColumnConstraints(p_num3_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num3_emp LIKE adtb00018.num3_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00018_num3_emp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00018.departamento3" column
-#+
-#+ @param p_departamento3 - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00018_departamento3_checkColumnConstraints(p_departamento3)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_departamento3 LIKE adtb00018.departamento3
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00018_departamento3_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00018.nivel3_emp" column
-#+
-#+ @param p_nivel3_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00018_nivel3_emp_checkColumnConstraints(p_nivel3_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nivel3_emp LIKE adtb00018.nivel3_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00018_nivel3_emp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00018.cod3_puesto" column
-#+
-#+ @param p_cod3_puesto - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00018_cod3_puesto_checkColumnConstraints(p_cod3_puesto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod3_puesto LIKE adtb00018.cod3_puesto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00018_cod3_puesto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00018.recomendacion" column
-#+
-#+ @param p_recomendacion - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00018_recomendacion_checkColumnConstraints(p_recomendacion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_recomendacion LIKE adtb00018.recomendacion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00018_recomendacion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00018.otros_com" column
-#+
-#+ @param p_otros_com - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00018_otros_com_checkColumnConstraints(p_otros_com)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_otros_com LIKE adtb00018.otros_com
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00018_otros_com_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00018.num1_emp" column
-#+
-#+ @param p_num1_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00018_num1_emp_checkColumnConstraints(p_num1_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num1_emp LIKE adtb00018.num1_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00018_num1_emp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00018.departamento1" column
-#+
-#+ @param p_departamento1 - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00018_departamento1_checkColumnConstraints(p_departamento1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_departamento1 LIKE adtb00018.departamento1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00018_departamento1_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00018.nivel1_emp" column
-#+
-#+ @param p_nivel1_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00018_nivel1_emp_checkColumnConstraints(p_nivel1_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nivel1_emp LIKE adtb00018.nivel1_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00018_nivel1_emp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00018.cod1_puesto" column
-#+
-#+ @param p_cod1_puesto - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00018_cod1_puesto_checkColumnConstraints(p_cod1_puesto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod1_puesto LIKE adtb00018.cod1_puesto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00018_cod1_puesto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00018.num2_emp" column
-#+
-#+ @param p_num2_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00018_num2_emp_checkColumnConstraints(p_num2_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num2_emp LIKE adtb00018.num2_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00018_num2_emp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00018.departamento2" column
-#+
-#+ @param p_departamento2 - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00018_departamento2_checkColumnConstraints(p_departamento2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_departamento2 LIKE adtb00018.departamento2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00018_departamento2_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00018.nivel2_emp" column
-#+
-#+ @param p_nivel2_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00018_nivel2_emp_checkColumnConstraints(p_nivel2_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nivel2_emp LIKE adtb00018.nivel2_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00018_nivel2_emp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00018.cod2_puesto" column
-#+
-#+ @param p_cod2_puesto - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00018_cod2_puesto_checkColumnConstraints(p_cod2_puesto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod2_puesto LIKE adtb00018.cod2_puesto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00018_cod2_puesto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00018.cod_requi" column
-#+
-#+ @param p_cod_requi - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00018_cod_requi_checkColumnConstraints(p_cod_requi)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_requi LIKE adtb00018.cod_requi
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00018_cod_requi_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00018.ind_requi" column
-#+
-#+ @param p_ind_requi - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00018_ind_requi_checkColumnConstraints(p_ind_requi)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ind_requi LIKE adtb00018.ind_requi
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00018_ind_requi_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00018.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00018_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE adtb00018.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00018_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00018.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00018_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE adtb00018.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00018_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00018.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00018_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE adtb00018.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00018_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00018.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00018_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE adtb00018.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00018_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00018.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00018_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE adtb00018.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00018_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00017" table
-#+
-#+ @param p_data - a row data LIKE adtb00017.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00017_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE adtb00017.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_adtb00017_num_trx_checkColumnConstraints(p_data.num_trx) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00017_cod_sol_checkColumnConstraints(p_data.cod_sol) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00017_num_emp_checkColumnConstraints(p_data.num_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00017_departamento_checkColumnConstraints(p_data.departamento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00017_nivel_emp_checkColumnConstraints(p_data.nivel_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00017_cod_puesto_checkColumnConstraints(p_data.cod_puesto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00017_fech_efec_checkColumnConstraints(p_data.fech_efec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00017_salario_checkColumnConstraints(p_data.salario) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00017_cod_mto_checkColumnConstraints(p_data.cod_mto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00017_sec_mto_checkColumnConstraints(p_data.sec_mto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00017_nivel_sal_checkColumnConstraints(p_data.nivel_sal) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00017_liquidacion_checkColumnConstraints(p_data.liquidacion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00017_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00017_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00017_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00017_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00017_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00017_checkTableConstraints
-
-{}
-#+ Check constraints on the "adtb00017.num_trx" column
-#+
-#+ @param p_num_trx - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00017_num_trx_checkColumnConstraints(p_num_trx)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_trx LIKE adtb00017.num_trx
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00017_num_trx_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00017.cod_sol" column
-#+
-#+ @param p_cod_sol - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00017_cod_sol_checkColumnConstraints(p_cod_sol)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sol LIKE adtb00017.cod_sol
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00017_cod_sol_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00017.num_emp" column
-#+
-#+ @param p_num_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00017_num_emp_checkColumnConstraints(p_num_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_emp LIKE adtb00017.num_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00017_num_emp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00017.departamento" column
-#+
-#+ @param p_departamento - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00017_departamento_checkColumnConstraints(p_departamento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_departamento LIKE adtb00017.departamento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00017_departamento_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00017.nivel_emp" column
-#+
-#+ @param p_nivel_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00017_nivel_emp_checkColumnConstraints(p_nivel_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nivel_emp LIKE adtb00017.nivel_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00017_nivel_emp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00017.cod_puesto" column
-#+
-#+ @param p_cod_puesto - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00017_cod_puesto_checkColumnConstraints(p_cod_puesto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_puesto LIKE adtb00017.cod_puesto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00017_cod_puesto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00017.fech_efec" column
-#+
-#+ @param p_fech_efec - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00017_fech_efec_checkColumnConstraints(p_fech_efec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_efec LIKE adtb00017.fech_efec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00017_fech_efec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00017.salario" column
-#+
-#+ @param p_salario - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00017_salario_checkColumnConstraints(p_salario)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_salario LIKE adtb00017.salario
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00017_salario_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00017.cod_mto" column
-#+
-#+ @param p_cod_mto - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00017_cod_mto_checkColumnConstraints(p_cod_mto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mto LIKE adtb00017.cod_mto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00017_cod_mto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00017.sec_mto" column
-#+
-#+ @param p_sec_mto - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00017_sec_mto_checkColumnConstraints(p_sec_mto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_mto LIKE adtb00017.sec_mto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00017_sec_mto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00017.nivel_sal" column
-#+
-#+ @param p_nivel_sal - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00017_nivel_sal_checkColumnConstraints(p_nivel_sal)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nivel_sal LIKE adtb00017.nivel_sal
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00017_nivel_sal_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00017.liquidacion" column
-#+
-#+ @param p_liquidacion - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00017_liquidacion_checkColumnConstraints(p_liquidacion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_liquidacion LIKE adtb00017.liquidacion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00017_liquidacion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00017.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00017_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE adtb00017.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00017_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00017.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00017_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE adtb00017.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00017_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00017.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00017_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE adtb00017.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00017_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00017.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00017_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE adtb00017.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00017_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00017.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00017_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE adtb00017.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00017_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00016" table
-#+
-#+ @param p_data - a row data LIKE adtb00016.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00016_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE adtb00016.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_adtb00016_cod_sol_checkColumnConstraints(p_data.cod_sol) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00016_nom_empr_checkColumnConstraints(p_data.nom_empr) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00016_calle_checkColumnConstraints(p_data.calle) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00016_casa_num_checkColumnConstraints(p_data.casa_num) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00016_barrio_checkColumnConstraints(p_data.barrio) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00016_urbanizacion_checkColumnConstraints(p_data.urbanizacion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00016_cod_puesto_checkColumnConstraints(p_data.cod_puesto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00016_sueldo_checkColumnConstraints(p_data.sueldo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00016_ano_ini_checkColumnConstraints(p_data.ano_ini) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00016_ano_fin_checkColumnConstraints(p_data.ano_fin) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00016_desc_retiro_checkColumnConstraints(p_data.desc_retiro) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00016_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00016_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00016_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00016_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00016_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00016_checkTableConstraints
-
-{}
-#+ Check constraints on the "adtb00016.cod_sol" column
-#+
-#+ @param p_cod_sol - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00016_cod_sol_checkColumnConstraints(p_cod_sol)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sol LIKE adtb00016.cod_sol
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00016_cod_sol_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00016.nom_empr" column
-#+
-#+ @param p_nom_empr - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00016_nom_empr_checkColumnConstraints(p_nom_empr)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nom_empr LIKE adtb00016.nom_empr
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00016_nom_empr_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00016.calle" column
-#+
-#+ @param p_calle - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00016_calle_checkColumnConstraints(p_calle)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_calle LIKE adtb00016.calle
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00016_calle_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00016.casa_num" column
-#+
-#+ @param p_casa_num - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00016_casa_num_checkColumnConstraints(p_casa_num)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_casa_num LIKE adtb00016.casa_num
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00016_casa_num_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00016.barrio" column
-#+
-#+ @param p_barrio - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00016_barrio_checkColumnConstraints(p_barrio)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_barrio LIKE adtb00016.barrio
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00016_barrio_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00016.urbanizacion" column
-#+
-#+ @param p_urbanizacion - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00016_urbanizacion_checkColumnConstraints(p_urbanizacion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_urbanizacion LIKE adtb00016.urbanizacion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00016_urbanizacion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00016.cod_puesto" column
-#+
-#+ @param p_cod_puesto - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00016_cod_puesto_checkColumnConstraints(p_cod_puesto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_puesto LIKE adtb00016.cod_puesto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00016_cod_puesto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00016.sueldo" column
-#+
-#+ @param p_sueldo - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00016_sueldo_checkColumnConstraints(p_sueldo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sueldo LIKE adtb00016.sueldo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00016_sueldo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00016.ano_ini" column
-#+
-#+ @param p_ano_ini - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00016_ano_ini_checkColumnConstraints(p_ano_ini)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ano_ini LIKE adtb00016.ano_ini
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00016_ano_ini_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00016.ano_fin" column
-#+
-#+ @param p_ano_fin - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00016_ano_fin_checkColumnConstraints(p_ano_fin)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ano_fin LIKE adtb00016.ano_fin
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00016_ano_fin_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00016.desc_retiro" column
-#+
-#+ @param p_desc_retiro - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00016_desc_retiro_checkColumnConstraints(p_desc_retiro)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_desc_retiro LIKE adtb00016.desc_retiro
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00016_desc_retiro_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00016.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00016_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE adtb00016.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00016_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00016.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00016_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE adtb00016.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00016_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00016.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00016_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE adtb00016.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00016_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00016.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00016_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE adtb00016.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00016_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00016.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00016_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE adtb00016.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00016_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00015" table
-#+
-#+ @param p_data - a row data LIKE adtb00015.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00015_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE adtb00015.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_adtb00015_cod_sol_checkColumnConstraints(p_data.cod_sol) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00015_nom_inst_checkColumnConstraints(p_data.nom_inst) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00015_calle_checkColumnConstraints(p_data.calle) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00015_casa_num_checkColumnConstraints(p_data.casa_num) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00015_barrio_checkColumnConstraints(p_data.barrio) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00015_urbanizacion_checkColumnConstraints(p_data.urbanizacion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00015_cod_educa_checkColumnConstraints(p_data.cod_educa) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00015_anos_checkColumnConstraints(p_data.anos) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00015_ano_term_checkColumnConstraints(p_data.ano_term) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00015_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00015_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00015_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00015_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00015_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00015_checkTableConstraints
-
-{}
-#+ Check constraints on the "adtb00015.cod_sol" column
-#+
-#+ @param p_cod_sol - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00015_cod_sol_checkColumnConstraints(p_cod_sol)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sol LIKE adtb00015.cod_sol
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00015_cod_sol_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00015.nom_inst" column
-#+
-#+ @param p_nom_inst - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00015_nom_inst_checkColumnConstraints(p_nom_inst)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nom_inst LIKE adtb00015.nom_inst
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00015_nom_inst_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00015.calle" column
-#+
-#+ @param p_calle - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00015_calle_checkColumnConstraints(p_calle)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_calle LIKE adtb00015.calle
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00015_calle_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00015.casa_num" column
-#+
-#+ @param p_casa_num - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00015_casa_num_checkColumnConstraints(p_casa_num)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_casa_num LIKE adtb00015.casa_num
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00015_casa_num_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00015.barrio" column
-#+
-#+ @param p_barrio - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00015_barrio_checkColumnConstraints(p_barrio)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_barrio LIKE adtb00015.barrio
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00015_barrio_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00015.urbanizacion" column
-#+
-#+ @param p_urbanizacion - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00015_urbanizacion_checkColumnConstraints(p_urbanizacion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_urbanizacion LIKE adtb00015.urbanizacion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00015_urbanizacion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00015.cod_educa" column
-#+
-#+ @param p_cod_educa - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00015_cod_educa_checkColumnConstraints(p_cod_educa)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_educa LIKE adtb00015.cod_educa
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00015_cod_educa_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00015.anos" column
-#+
-#+ @param p_anos - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00015_anos_checkColumnConstraints(p_anos)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_anos LIKE adtb00015.anos
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00015_anos_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00015.ano_term" column
-#+
-#+ @param p_ano_term - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00015_ano_term_checkColumnConstraints(p_ano_term)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ano_term LIKE adtb00015.ano_term
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00015_ano_term_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00015.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00015_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE adtb00015.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00015_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00015.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00015_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE adtb00015.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00015_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00015.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00015_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE adtb00015.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00015_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00015.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00015_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE adtb00015.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00015_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00015.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00015_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE adtb00015.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00015_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00014" table
-#+
-#+ @param p_data - a row data LIKE adtb00014.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00014_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE adtb00014.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_adtb00014_cod_sol_checkColumnConstraints(p_data.cod_sol) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00014_nom_ref_checkColumnConstraints(p_data.nom_ref) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00014_anos_rel_checkColumnConstraints(p_data.anos_rel) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00014_telefono_checkColumnConstraints(p_data.telefono) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00014_calle_checkColumnConstraints(p_data.calle) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00014_casa_num_checkColumnConstraints(p_data.casa_num) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00014_barrio_checkColumnConstraints(p_data.barrio) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00014_urbanizacion_checkColumnConstraints(p_data.urbanizacion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00014_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00014_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00014_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00014_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00014_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00014_checkTableConstraints
-
-{}
-#+ Check constraints on the "adtb00014.cod_sol" column
-#+
-#+ @param p_cod_sol - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00014_cod_sol_checkColumnConstraints(p_cod_sol)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sol LIKE adtb00014.cod_sol
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00014_cod_sol_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00014.nom_ref" column
-#+
-#+ @param p_nom_ref - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00014_nom_ref_checkColumnConstraints(p_nom_ref)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nom_ref LIKE adtb00014.nom_ref
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00014_nom_ref_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00014.anos_rel" column
-#+
-#+ @param p_anos_rel - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00014_anos_rel_checkColumnConstraints(p_anos_rel)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_anos_rel LIKE adtb00014.anos_rel
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00014_anos_rel_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00014.telefono" column
-#+
-#+ @param p_telefono - CHAR(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00014_telefono_checkColumnConstraints(p_telefono)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_telefono LIKE adtb00014.telefono
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00014_telefono_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00014.calle" column
-#+
-#+ @param p_calle - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00014_calle_checkColumnConstraints(p_calle)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_calle LIKE adtb00014.calle
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00014_calle_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00014.casa_num" column
-#+
-#+ @param p_casa_num - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00014_casa_num_checkColumnConstraints(p_casa_num)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_casa_num LIKE adtb00014.casa_num
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00014_casa_num_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00014.barrio" column
-#+
-#+ @param p_barrio - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00014_barrio_checkColumnConstraints(p_barrio)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_barrio LIKE adtb00014.barrio
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00014_barrio_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00014.urbanizacion" column
-#+
-#+ @param p_urbanizacion - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00014_urbanizacion_checkColumnConstraints(p_urbanizacion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_urbanizacion LIKE adtb00014.urbanizacion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00014_urbanizacion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00014.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00014_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE adtb00014.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00014_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00014.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00014_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE adtb00014.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00014_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00014.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00014_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE adtb00014.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00014_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00014.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00014_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE adtb00014.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00014_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00014.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00014_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE adtb00014.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00014_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00013" table
-#+
-#+ @param p_data - a row data LIKE adtb00013.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00013_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE adtb00013.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_adtb00013_cod_sol_checkColumnConstraints(p_data.cod_sol) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00013_cod_par_checkColumnConstraints(p_data.cod_par) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00013_sec_par_checkColumnConstraints(p_data.sec_par) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00013_nombre_checkColumnConstraints(p_data.nombre) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00013_cedula_checkColumnConstraints(p_data.cedula) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00013_sexo_checkColumnConstraints(p_data.sexo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00013_fecha_nac_checkColumnConstraints(p_data.fecha_nac) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00013_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00013_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00013_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00013_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00013_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00013_checkTableConstraints
-
-{}
-#+ Check constraints on the "adtb00013.cod_sol" column
-#+
-#+ @param p_cod_sol - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00013_cod_sol_checkColumnConstraints(p_cod_sol)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sol LIKE adtb00013.cod_sol
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00013_cod_sol_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00013.cod_par" column
-#+
-#+ @param p_cod_par - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00013_cod_par_checkColumnConstraints(p_cod_par)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_par LIKE adtb00013.cod_par
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00013_cod_par_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00013.sec_par" column
-#+
-#+ @param p_sec_par - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00013_sec_par_checkColumnConstraints(p_sec_par)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_par LIKE adtb00013.sec_par
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00013_sec_par_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00013.nombre" column
-#+
-#+ @param p_nombre - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00013_nombre_checkColumnConstraints(p_nombre)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombre LIKE adtb00013.nombre
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00013_nombre_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00013.cedula" column
-#+
-#+ @param p_cedula - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00013_cedula_checkColumnConstraints(p_cedula)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cedula LIKE adtb00013.cedula
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00013_cedula_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00013.sexo" column
-#+
-#+ @param p_sexo - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00013_sexo_checkColumnConstraints(p_sexo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sexo LIKE adtb00013.sexo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00013_sexo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00013.fecha_nac" column
-#+
-#+ @param p_fecha_nac - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00013_fecha_nac_checkColumnConstraints(p_fecha_nac)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_nac LIKE adtb00013.fecha_nac
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00013_fecha_nac_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00013.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00013_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE adtb00013.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00013_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00013.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00013_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE adtb00013.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00013_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00013.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00013_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE adtb00013.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00013_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00013.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00013_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE adtb00013.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00013_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00013.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00013_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE adtb00013.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00013_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00012" table
-#+
-#+ @param p_data - a row data LIKE adtb00012.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00012_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE adtb00012.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_adtb00012_cod_sol_checkColumnConstraints(p_data.cod_sol) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00012_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00012_nom1_sol_checkColumnConstraints(p_data.nom1_sol) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00012_nom2_sol_checkColumnConstraints(p_data.nom2_sol) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00012_apell1_sol_checkColumnConstraints(p_data.apell1_sol) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00012_apell2_sol_checkColumnConstraints(p_data.apell2_sol) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00012_calle_checkColumnConstraints(p_data.calle) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00012_casa_num_checkColumnConstraints(p_data.casa_num) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00012_barrio_checkColumnConstraints(p_data.barrio) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00012_urbanizacion_checkColumnConstraints(p_data.urbanizacion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00012_telefono_checkColumnConstraints(p_data.telefono) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00012_cod_provincia_checkColumnConstraints(p_data.cod_provincia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00012_fech_nac_checkColumnConstraints(p_data.fech_nac) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00012_cod_nac_checkColumnConstraints(p_data.cod_nac) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00012_estado_civil_checkColumnConstraints(p_data.estado_civil) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00012_estatura_checkColumnConstraints(p_data.estatura) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00012_peso_checkColumnConstraints(p_data.peso) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00012_cedula_checkColumnConstraints(p_data.cedula) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00012_serie_checkColumnConstraints(p_data.serie) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00012_licencia_checkColumnConstraints(p_data.licencia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00012_tipo_sangre_checkColumnConstraints(p_data.tipo_sangre) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00012_idioma_checkColumnConstraints(p_data.idioma) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00012_h_idioma_checkColumnConstraints(p_data.h_idioma) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00012_l_idioma_checkColumnConstraints(p_data.l_idioma) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00012_e_idioma_checkColumnConstraints(p_data.e_idioma) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00012_otros_idioma_checkColumnConstraints(p_data.otros_idioma) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00012_cod_puesto_checkColumnConstraints(p_data.cod_puesto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00012_cod_prof_checkColumnConstraints(p_data.cod_prof) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00012_sexo_checkColumnConstraints(p_data.sexo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00012_afp_checkColumnConstraints(p_data.afp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00012_ars_checkColumnConstraints(p_data.ars) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00012_numero_nss_checkColumnConstraints(p_data.numero_nss) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00012_seguro_complementario_checkColumnConstraints(p_data.seguro_complementario) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00012_categoria_licencia_conducir_checkColumnConstraints(p_data.categoria_licencia_conducir) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00012_sueldo_deseado_checkColumnConstraints(p_data.sueldo_deseado) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00012_pariente_emergencia_checkColumnConstraints(p_data.pariente_emergencia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00012_parentesco_emergencia_checkColumnConstraints(p_data.parentesco_emergencia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00012_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00012_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00012_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00012_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00012_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- CALL smarmotech_dbxconstraints_adtb00012_pk_adtb00012_checkUniqueConstraint(p_forUpdate, p_data.cedula) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00012_checkTableConstraints
-
-{}
-#+ Check the primary key uniqueness constraint on the "adtb00012"
-#+
-#+ @param p_key - Primary Key
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00012_pk_adtb00012_checkUniqueConstraint(p_forUpdate, p_key)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_key
- RECORD
- adtb00012_cedula LIKE adtb00012.cedula
- END RECORD
- DEFINE l_key
- RECORD
- adtb00012_cedula LIKE adtb00012.cedula
- END RECORD
- DEFINE l_where STRING
- DEFINE l_sqlQuery STRING
- DEFINE l_count INTEGER
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- LET l_where = "WHERE adtb00012.cedula = ? "
-
- let l_sqlQuery = "SELECT COUNT(*), cedula FROM adtb00012 ", l_where, " GROUP BY cedula"
-
- PREPARE cur_adtb00012_pk_adtb00012_checkUniqueConstraint FROM l_sqlQuery
- EXECUTE cur_adtb00012_pk_adtb00012_checkUniqueConstraint INTO l_count, l_key.* USING p_key.*
- FREE cur_adtb00012_pk_adtb00012_checkUniqueConstraint
- IF (NOT p_forUpdate AND l_count > 0) OR (p_forUpdate AND l_count > 0 AND p_key.* != l_key.*) THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cedula: " || ERROR_BAM_00002) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00012_pk_adtb00012_checkUniqueConstraint
-
-{}
-#+ Check constraints on the "adtb00012.cod_sol" column
-#+
-#+ @param p_cod_sol - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00012_cod_sol_checkColumnConstraints(p_cod_sol)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sol LIKE adtb00012.cod_sol
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00012_cod_sol_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00012.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00012_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE adtb00012.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00012_fecha_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00012.nom1_sol" column
-#+
-#+ @param p_nom1_sol - CHAR(15) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00012_nom1_sol_checkColumnConstraints(p_nom1_sol)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nom1_sol LIKE adtb00012.nom1_sol
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00012_nom1_sol_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00012.nom2_sol" column
-#+
-#+ @param p_nom2_sol - CHAR(15) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00012_nom2_sol_checkColumnConstraints(p_nom2_sol)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nom2_sol LIKE adtb00012.nom2_sol
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00012_nom2_sol_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00012.apell1_sol" column
-#+
-#+ @param p_apell1_sol - CHAR(15) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00012_apell1_sol_checkColumnConstraints(p_apell1_sol)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_apell1_sol LIKE adtb00012.apell1_sol
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00012_apell1_sol_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00012.apell2_sol" column
-#+
-#+ @param p_apell2_sol - CHAR(15) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00012_apell2_sol_checkColumnConstraints(p_apell2_sol)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_apell2_sol LIKE adtb00012.apell2_sol
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00012_apell2_sol_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00012.calle" column
-#+
-#+ @param p_calle - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00012_calle_checkColumnConstraints(p_calle)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_calle LIKE adtb00012.calle
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00012_calle_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00012.casa_num" column
-#+
-#+ @param p_casa_num - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00012_casa_num_checkColumnConstraints(p_casa_num)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_casa_num LIKE adtb00012.casa_num
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00012_casa_num_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00012.barrio" column
-#+
-#+ @param p_barrio - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00012_barrio_checkColumnConstraints(p_barrio)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_barrio LIKE adtb00012.barrio
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00012_barrio_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00012.urbanizacion" column
-#+
-#+ @param p_urbanizacion - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00012_urbanizacion_checkColumnConstraints(p_urbanizacion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_urbanizacion LIKE adtb00012.urbanizacion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00012_urbanizacion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00012.telefono" column
-#+
-#+ @param p_telefono - CHAR(15) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00012_telefono_checkColumnConstraints(p_telefono)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_telefono LIKE adtb00012.telefono
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00012_telefono_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00012.cod_provincia" column
-#+
-#+ @param p_cod_provincia - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00012_cod_provincia_checkColumnConstraints(p_cod_provincia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_provincia LIKE adtb00012.cod_provincia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00012_cod_provincia_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00012.fech_nac" column
-#+
-#+ @param p_fech_nac - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00012_fech_nac_checkColumnConstraints(p_fech_nac)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_nac LIKE adtb00012.fech_nac
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00012_fech_nac_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00012.cod_nac" column
-#+
-#+ @param p_cod_nac - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00012_cod_nac_checkColumnConstraints(p_cod_nac)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_nac LIKE adtb00012.cod_nac
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00012_cod_nac_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00012.estado_civil" column
-#+
-#+ @param p_estado_civil - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00012_estado_civil_checkColumnConstraints(p_estado_civil)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_estado_civil LIKE adtb00012.estado_civil
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00012_estado_civil_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00012.estatura" column
-#+
-#+ @param p_estatura - CHAR(4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00012_estatura_checkColumnConstraints(p_estatura)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_estatura LIKE adtb00012.estatura
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00012_estatura_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00012.peso" column
-#+
-#+ @param p_peso - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00012_peso_checkColumnConstraints(p_peso)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_peso LIKE adtb00012.peso
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00012_peso_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00012.cedula" column
-#+
-#+ @param p_cedula - CHAR(11) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00012_cedula_checkColumnConstraints(p_cedula)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cedula LIKE adtb00012.cedula
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cedula IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cedula: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00012_cedula_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00012.serie" column
-#+
-#+ @param p_serie - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00012_serie_checkColumnConstraints(p_serie)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_serie LIKE adtb00012.serie
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00012_serie_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00012.licencia" column
-#+
-#+ @param p_licencia - CHAR(11) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00012_licencia_checkColumnConstraints(p_licencia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_licencia LIKE adtb00012.licencia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00012_licencia_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00012.tipo_sangre" column
-#+
-#+ @param p_tipo_sangre - CHAR(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00012_tipo_sangre_checkColumnConstraints(p_tipo_sangre)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_sangre LIKE adtb00012.tipo_sangre
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00012_tipo_sangre_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00012.idioma" column
-#+
-#+ @param p_idioma - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00012_idioma_checkColumnConstraints(p_idioma)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_idioma LIKE adtb00012.idioma
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00012_idioma_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00012.h_idioma" column
-#+
-#+ @param p_h_idioma - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00012_h_idioma_checkColumnConstraints(p_h_idioma)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_h_idioma LIKE adtb00012.h_idioma
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00012_h_idioma_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00012.l_idioma" column
-#+
-#+ @param p_l_idioma - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00012_l_idioma_checkColumnConstraints(p_l_idioma)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_l_idioma LIKE adtb00012.l_idioma
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00012_l_idioma_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00012.e_idioma" column
-#+
-#+ @param p_e_idioma - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00012_e_idioma_checkColumnConstraints(p_e_idioma)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_e_idioma LIKE adtb00012.e_idioma
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00012_e_idioma_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00012.otros_idioma" column
-#+
-#+ @param p_otros_idioma - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00012_otros_idioma_checkColumnConstraints(p_otros_idioma)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_otros_idioma LIKE adtb00012.otros_idioma
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00012_otros_idioma_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00012.cod_puesto" column
-#+
-#+ @param p_cod_puesto - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00012_cod_puesto_checkColumnConstraints(p_cod_puesto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_puesto LIKE adtb00012.cod_puesto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00012_cod_puesto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00012.cod_prof" column
-#+
-#+ @param p_cod_prof - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00012_cod_prof_checkColumnConstraints(p_cod_prof)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_prof LIKE adtb00012.cod_prof
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00012_cod_prof_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00012.sexo" column
-#+
-#+ @param p_sexo - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00012_sexo_checkColumnConstraints(p_sexo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sexo LIKE adtb00012.sexo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00012_sexo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00012.afp" column
-#+
-#+ @param p_afp - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00012_afp_checkColumnConstraints(p_afp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_afp LIKE adtb00012.afp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00012_afp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00012.ars" column
-#+
-#+ @param p_ars - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00012_ars_checkColumnConstraints(p_ars)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ars LIKE adtb00012.ars
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00012_ars_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00012.numero_nss" column
-#+
-#+ @param p_numero_nss - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00012_numero_nss_checkColumnConstraints(p_numero_nss)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_numero_nss LIKE adtb00012.numero_nss
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00012_numero_nss_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00012.seguro_complementario" column
-#+
-#+ @param p_seguro_complementario - CHAR(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00012_seguro_complementario_checkColumnConstraints(p_seguro_complementario)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_seguro_complementario LIKE adtb00012.seguro_complementario
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00012_seguro_complementario_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00012.categoria_licencia_conducir" column
-#+
-#+ @param p_categoria_licencia_conducir - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00012_categoria_licencia_conducir_checkColumnConstraints(p_categoria_licencia_conducir)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_categoria_licencia_conducir LIKE adtb00012.categoria_licencia_conducir
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00012_categoria_licencia_conducir_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00012.sueldo_deseado" column
-#+
-#+ @param p_sueldo_deseado - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00012_sueldo_deseado_checkColumnConstraints(p_sueldo_deseado)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sueldo_deseado LIKE adtb00012.sueldo_deseado
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00012_sueldo_deseado_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00012.pariente_emergencia" column
-#+
-#+ @param p_pariente_emergencia - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00012_pariente_emergencia_checkColumnConstraints(p_pariente_emergencia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_pariente_emergencia LIKE adtb00012.pariente_emergencia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00012_pariente_emergencia_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00012.parentesco_emergencia" column
-#+
-#+ @param p_parentesco_emergencia - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00012_parentesco_emergencia_checkColumnConstraints(p_parentesco_emergencia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_parentesco_emergencia LIKE adtb00012.parentesco_emergencia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00012_parentesco_emergencia_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00012.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00012_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE adtb00012.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00012_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00012.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00012_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE adtb00012.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00012_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00012.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00012_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE adtb00012.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00012_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00012.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00012_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE adtb00012.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00012_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00012.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00012_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE adtb00012.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00012_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00011" table
-#+
-#+ @param p_data - a row data LIKE adtb00011.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00011_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE adtb00011.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_adtb00011_num_doc_checkColumnConstraints(p_data.num_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00011_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00011_fech_req_checkColumnConstraints(p_data.fech_req) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00011_depart_checkColumnConstraints(p_data.depart) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00011_tipo_req_checkColumnConstraints(p_data.tipo_req) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00011_razon_vac_checkColumnConstraints(p_data.razon_vac) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00011_cod_puesto_r_checkColumnConstraints(p_data.cod_puesto_r) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00011_edad_min_checkColumnConstraints(p_data.edad_min) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00011_salario_sem_checkColumnConstraints(p_data.salario_sem) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00011_salario_men_checkColumnConstraints(p_data.salario_men) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00011_experiencia_checkColumnConstraints(p_data.experiencia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00011_cod_educa_checkColumnConstraints(p_data.cod_educa) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00011_cod_pericia_checkColumnConstraints(p_data.cod_pericia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00011_status_per_checkColumnConstraints(p_data.status_per) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00011_num_emp_checkColumnConstraints(p_data.num_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00011_departamento_checkColumnConstraints(p_data.departamento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00011_nivel_emp_checkColumnConstraints(p_data.nivel_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00011_cod_puesto_checkColumnConstraints(p_data.cod_puesto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00011_num1_emp_checkColumnConstraints(p_data.num1_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00011_departamento1_checkColumnConstraints(p_data.departamento1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00011_nivel1_emp_checkColumnConstraints(p_data.nivel1_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00011_cod1_puesto_checkColumnConstraints(p_data.cod1_puesto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00011_num2_emp_checkColumnConstraints(p_data.num2_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00011_departamento2_checkColumnConstraints(p_data.departamento2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00011_nivel2_emp_checkColumnConstraints(p_data.nivel2_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00011_cod2_puesto_checkColumnConstraints(p_data.cod2_puesto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00011_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00011_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00011_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00011_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00011_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00011_checkTableConstraints
-
-{}
-#+ Check constraints on the "adtb00011.num_doc" column
-#+
-#+ @param p_num_doc - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00011_num_doc_checkColumnConstraints(p_num_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_doc LIKE adtb00011.num_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00011_num_doc_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00011.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00011_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE adtb00011.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00011_fecha_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00011.fech_req" column
-#+
-#+ @param p_fech_req - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00011_fech_req_checkColumnConstraints(p_fech_req)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_req LIKE adtb00011.fech_req
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00011_fech_req_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00011.depart" column
-#+
-#+ @param p_depart - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00011_depart_checkColumnConstraints(p_depart)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_depart LIKE adtb00011.depart
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00011_depart_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00011.tipo_req" column
-#+
-#+ @param p_tipo_req - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00011_tipo_req_checkColumnConstraints(p_tipo_req)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_req LIKE adtb00011.tipo_req
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00011_tipo_req_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00011.razon_vac" column
-#+
-#+ @param p_razon_vac - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00011_razon_vac_checkColumnConstraints(p_razon_vac)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_razon_vac LIKE adtb00011.razon_vac
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00011_razon_vac_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00011.cod_puesto_r" column
-#+
-#+ @param p_cod_puesto_r - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00011_cod_puesto_r_checkColumnConstraints(p_cod_puesto_r)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_puesto_r LIKE adtb00011.cod_puesto_r
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00011_cod_puesto_r_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00011.edad_min" column
-#+
-#+ @param p_edad_min - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00011_edad_min_checkColumnConstraints(p_edad_min)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_edad_min LIKE adtb00011.edad_min
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00011_edad_min_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00011.salario_sem" column
-#+
-#+ @param p_salario_sem - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00011_salario_sem_checkColumnConstraints(p_salario_sem)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_salario_sem LIKE adtb00011.salario_sem
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00011_salario_sem_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00011.salario_men" column
-#+
-#+ @param p_salario_men - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00011_salario_men_checkColumnConstraints(p_salario_men)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_salario_men LIKE adtb00011.salario_men
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00011_salario_men_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00011.experiencia" column
-#+
-#+ @param p_experiencia - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00011_experiencia_checkColumnConstraints(p_experiencia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_experiencia LIKE adtb00011.experiencia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00011_experiencia_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00011.cod_educa" column
-#+
-#+ @param p_cod_educa - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00011_cod_educa_checkColumnConstraints(p_cod_educa)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_educa LIKE adtb00011.cod_educa
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00011_cod_educa_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00011.cod_pericia" column
-#+
-#+ @param p_cod_pericia - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00011_cod_pericia_checkColumnConstraints(p_cod_pericia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_pericia LIKE adtb00011.cod_pericia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00011_cod_pericia_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00011.status_per" column
-#+
-#+ @param p_status_per - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00011_status_per_checkColumnConstraints(p_status_per)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_per LIKE adtb00011.status_per
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00011_status_per_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00011.num_emp" column
-#+
-#+ @param p_num_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00011_num_emp_checkColumnConstraints(p_num_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_emp LIKE adtb00011.num_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00011_num_emp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00011.departamento" column
-#+
-#+ @param p_departamento - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00011_departamento_checkColumnConstraints(p_departamento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_departamento LIKE adtb00011.departamento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00011_departamento_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00011.nivel_emp" column
-#+
-#+ @param p_nivel_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00011_nivel_emp_checkColumnConstraints(p_nivel_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nivel_emp LIKE adtb00011.nivel_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00011_nivel_emp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00011.cod_puesto" column
-#+
-#+ @param p_cod_puesto - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00011_cod_puesto_checkColumnConstraints(p_cod_puesto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_puesto LIKE adtb00011.cod_puesto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00011_cod_puesto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00011.num1_emp" column
-#+
-#+ @param p_num1_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00011_num1_emp_checkColumnConstraints(p_num1_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num1_emp LIKE adtb00011.num1_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00011_num1_emp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00011.departamento1" column
-#+
-#+ @param p_departamento1 - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00011_departamento1_checkColumnConstraints(p_departamento1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_departamento1 LIKE adtb00011.departamento1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00011_departamento1_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00011.nivel1_emp" column
-#+
-#+ @param p_nivel1_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00011_nivel1_emp_checkColumnConstraints(p_nivel1_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nivel1_emp LIKE adtb00011.nivel1_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00011_nivel1_emp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00011.cod1_puesto" column
-#+
-#+ @param p_cod1_puesto - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00011_cod1_puesto_checkColumnConstraints(p_cod1_puesto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod1_puesto LIKE adtb00011.cod1_puesto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00011_cod1_puesto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00011.num2_emp" column
-#+
-#+ @param p_num2_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00011_num2_emp_checkColumnConstraints(p_num2_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num2_emp LIKE adtb00011.num2_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00011_num2_emp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00011.departamento2" column
-#+
-#+ @param p_departamento2 - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00011_departamento2_checkColumnConstraints(p_departamento2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_departamento2 LIKE adtb00011.departamento2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00011_departamento2_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00011.nivel2_emp" column
-#+
-#+ @param p_nivel2_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00011_nivel2_emp_checkColumnConstraints(p_nivel2_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nivel2_emp LIKE adtb00011.nivel2_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00011_nivel2_emp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00011.cod2_puesto" column
-#+
-#+ @param p_cod2_puesto - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00011_cod2_puesto_checkColumnConstraints(p_cod2_puesto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod2_puesto LIKE adtb00011.cod2_puesto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00011_cod2_puesto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00011.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00011_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE adtb00011.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00011_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00011.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00011_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE adtb00011.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00011_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00011.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00011_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE adtb00011.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00011_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00011.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00011_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE adtb00011.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00011_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00011.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00011_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE adtb00011.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00011_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00010" table
-#+
-#+ @param p_data - a row data LIKE adtb00010.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00010_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE adtb00010.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_adtb00010_cod_prof_checkColumnConstraints(p_data.cod_prof) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00010_nom_prof_checkColumnConstraints(p_data.nom_prof) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00010_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00010_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00010_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00010_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00010_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00010_checkTableConstraints
-
-{}
-#+ Check constraints on the "adtb00010.cod_prof" column
-#+
-#+ @param p_cod_prof - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00010_cod_prof_checkColumnConstraints(p_cod_prof)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_prof LIKE adtb00010.cod_prof
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00010_cod_prof_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00010.nom_prof" column
-#+
-#+ @param p_nom_prof - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00010_nom_prof_checkColumnConstraints(p_nom_prof)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nom_prof LIKE adtb00010.nom_prof
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00010_nom_prof_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00010.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00010_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE adtb00010.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00010_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00010.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00010_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE adtb00010.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00010_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00010.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00010_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE adtb00010.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00010_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00010.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00010_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE adtb00010.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00010_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00010.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00010_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE adtb00010.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00010_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00009" table
-#+
-#+ @param p_data - a row data LIKE adtb00009.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00009_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE adtb00009.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_adtb00009_cod_mto_checkColumnConstraints(p_data.cod_mto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00009_sec_mto_checkColumnConstraints(p_data.sec_mto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00009_desc_mto_checkColumnConstraints(p_data.desc_mto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00009_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00009_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00009_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00009_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00009_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00009_checkTableConstraints
-
-{}
-#+ Check constraints on the "adtb00009.cod_mto" column
-#+
-#+ @param p_cod_mto - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00009_cod_mto_checkColumnConstraints(p_cod_mto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mto LIKE adtb00009.cod_mto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00009_cod_mto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00009.sec_mto" column
-#+
-#+ @param p_sec_mto - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00009_sec_mto_checkColumnConstraints(p_sec_mto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_mto LIKE adtb00009.sec_mto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00009_sec_mto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00009.desc_mto" column
-#+
-#+ @param p_desc_mto - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00009_desc_mto_checkColumnConstraints(p_desc_mto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_desc_mto LIKE adtb00009.desc_mto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00009_desc_mto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00009.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00009_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE adtb00009.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00009_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00009.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00009_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE adtb00009.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00009_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00009.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00009_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE adtb00009.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00009_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00009.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00009_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE adtb00009.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00009_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00009.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00009_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE adtb00009.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00009_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00008" table
-#+
-#+ @param p_data - a row data LIKE adtb00008.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00008_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE adtb00008.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_adtb00008_cod_requi_checkColumnConstraints(p_data.cod_requi) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00008_requisito_checkColumnConstraints(p_data.requisito) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00008_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00008_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00008_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00008_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00008_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00008_checkTableConstraints
-
-{}
-#+ Check constraints on the "adtb00008.cod_requi" column
-#+
-#+ @param p_cod_requi - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00008_cod_requi_checkColumnConstraints(p_cod_requi)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_requi LIKE adtb00008.cod_requi
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00008_cod_requi_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00008.requisito" column
-#+
-#+ @param p_requisito - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00008_requisito_checkColumnConstraints(p_requisito)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_requisito LIKE adtb00008.requisito
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00008_requisito_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00008.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00008_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE adtb00008.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00008_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00008.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00008_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE adtb00008.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00008_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00008.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00008_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE adtb00008.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00008_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00008.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00008_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE adtb00008.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00008_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00008.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00008_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE adtb00008.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00008_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00007" table
-#+
-#+ @param p_data - a row data LIKE adtb00007.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00007_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE adtb00007.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_adtb00007_cod_nac_checkColumnConstraints(p_data.cod_nac) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00007_nom_nac_checkColumnConstraints(p_data.nom_nac) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00007_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00007_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00007_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00007_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00007_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00007_checkTableConstraints
-
-{}
-#+ Check constraints on the "adtb00007.cod_nac" column
-#+
-#+ @param p_cod_nac - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00007_cod_nac_checkColumnConstraints(p_cod_nac)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_nac LIKE adtb00007.cod_nac
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00007_cod_nac_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00007.nom_nac" column
-#+
-#+ @param p_nom_nac - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00007_nom_nac_checkColumnConstraints(p_nom_nac)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nom_nac LIKE adtb00007.nom_nac
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00007_nom_nac_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00007.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00007_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE adtb00007.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00007_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00007.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00007_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE adtb00007.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00007_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00007.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00007_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE adtb00007.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00007_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00007.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00007_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE adtb00007.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00007_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00007.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00007_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE adtb00007.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00007_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00006" table
-#+
-#+ @param p_data - a row data LIKE adtb00006.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00006_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE adtb00006.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_adtb00006_cod_pericia_checkColumnConstraints(p_data.cod_pericia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00006_nom_pericia_checkColumnConstraints(p_data.nom_pericia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00006_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00006_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00006_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00006_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00006_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00006_checkTableConstraints
-
-{}
-#+ Check constraints on the "adtb00006.cod_pericia" column
-#+
-#+ @param p_cod_pericia - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00006_cod_pericia_checkColumnConstraints(p_cod_pericia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_pericia LIKE adtb00006.cod_pericia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00006_cod_pericia_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00006.nom_pericia" column
-#+
-#+ @param p_nom_pericia - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00006_nom_pericia_checkColumnConstraints(p_nom_pericia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nom_pericia LIKE adtb00006.nom_pericia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00006_nom_pericia_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00006.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00006_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE adtb00006.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00006_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00006.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00006_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE adtb00006.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00006_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00006.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00006_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE adtb00006.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00006_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00006.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00006_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE adtb00006.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00006_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00006.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00006_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE adtb00006.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00006_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00005" table
-#+
-#+ @param p_data - a row data LIKE adtb00005.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00005_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE adtb00005.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_adtb00005_cod_educa_checkColumnConstraints(p_data.cod_educa) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00005_nom_educa_checkColumnConstraints(p_data.nom_educa) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00005_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00005_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00005_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00005_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00005_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00005_checkTableConstraints
-
-{}
-#+ Check constraints on the "adtb00005.cod_educa" column
-#+
-#+ @param p_cod_educa - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00005_cod_educa_checkColumnConstraints(p_cod_educa)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_educa LIKE adtb00005.cod_educa
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00005_cod_educa_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00005.nom_educa" column
-#+
-#+ @param p_nom_educa - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00005_nom_educa_checkColumnConstraints(p_nom_educa)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nom_educa LIKE adtb00005.nom_educa
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00005_nom_educa_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00005.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00005_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE adtb00005.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00005_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00005.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00005_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE adtb00005.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00005_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00005.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00005_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE adtb00005.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00005_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00005.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00005_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE adtb00005.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00005_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00005.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00005_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE adtb00005.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00005_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00004" table
-#+
-#+ @param p_data - a row data LIKE adtb00004.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00004_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE adtb00004.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_adtb00004_cod_puesto_checkColumnConstraints(p_data.cod_puesto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00004_nom_puesto_checkColumnConstraints(p_data.nom_puesto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00004_otra_descripcion_checkColumnConstraints(p_data.otra_descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00004_funciones_checkColumnConstraints(p_data.funciones) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00004_funcion1_checkColumnConstraints(p_data.funcion1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00004_nivel_sal_checkColumnConstraints(p_data.nivel_sal) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00004_salario_min_checkColumnConstraints(p_data.salario_min) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00004_salario_max_checkColumnConstraints(p_data.salario_max) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00004_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00004_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00004_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00004_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00004_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00004_checkTableConstraints
-
-{}
-#+ Check constraints on the "adtb00004.cod_puesto" column
-#+
-#+ @param p_cod_puesto - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00004_cod_puesto_checkColumnConstraints(p_cod_puesto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_puesto LIKE adtb00004.cod_puesto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00004_cod_puesto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00004.nom_puesto" column
-#+
-#+ @param p_nom_puesto - CHAR(180) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00004_nom_puesto_checkColumnConstraints(p_nom_puesto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nom_puesto LIKE adtb00004.nom_puesto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00004_nom_puesto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00004.otra_descripcion" column
-#+
-#+ @param p_otra_descripcion - CHAR(180) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00004_otra_descripcion_checkColumnConstraints(p_otra_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_otra_descripcion LIKE adtb00004.otra_descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00004_otra_descripcion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00004.funciones" column
-#+
-#+ @param p_funciones - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00004_funciones_checkColumnConstraints(p_funciones)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_funciones LIKE adtb00004.funciones
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00004_funciones_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00004.funcion1" column
-#+
-#+ @param p_funcion1 - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00004_funcion1_checkColumnConstraints(p_funcion1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_funcion1 LIKE adtb00004.funcion1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00004_funcion1_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00004.nivel_sal" column
-#+
-#+ @param p_nivel_sal - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00004_nivel_sal_checkColumnConstraints(p_nivel_sal)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nivel_sal LIKE adtb00004.nivel_sal
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00004_nivel_sal_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00004.salario_min" column
-#+
-#+ @param p_salario_min - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00004_salario_min_checkColumnConstraints(p_salario_min)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_salario_min LIKE adtb00004.salario_min
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00004_salario_min_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00004.salario_max" column
-#+
-#+ @param p_salario_max - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00004_salario_max_checkColumnConstraints(p_salario_max)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_salario_max LIKE adtb00004.salario_max
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00004_salario_max_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00004.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00004_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE adtb00004.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00004_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00004.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00004_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE adtb00004.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00004_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00004.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00004_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE adtb00004.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00004_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00004.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00004_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE adtb00004.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00004_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00004.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00004_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE adtb00004.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00004_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00003" table
-#+
-#+ @param p_data - a row data LIKE adtb00003.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00003_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE adtb00003.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_adtb00003_num_emp_checkColumnConstraints(p_data.num_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00003_departamento_checkColumnConstraints(p_data.departamento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00003_nivel_emp_checkColumnConstraints(p_data.nivel_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00003_cod_puesto_checkColumnConstraints(p_data.cod_puesto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00003_nom1_emp_checkColumnConstraints(p_data.nom1_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00003_nom2_emp_checkColumnConstraints(p_data.nom2_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00003_apell1_emp_checkColumnConstraints(p_data.apell1_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00003_apell2_emp_checkColumnConstraints(p_data.apell2_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00003_tipo_empleado_checkColumnConstraints(p_data.tipo_empleado) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00003_fecha_termino_c_checkColumnConstraints(p_data.fecha_termino_c) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00003_calle_checkColumnConstraints(p_data.calle) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00003_casa_num_checkColumnConstraints(p_data.casa_num) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00003_barrio_checkColumnConstraints(p_data.barrio) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00003_urbanizacion_checkColumnConstraints(p_data.urbanizacion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00003_telefono_checkColumnConstraints(p_data.telefono) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00003_fech_nac_checkColumnConstraints(p_data.fech_nac) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00003_cod_nac_checkColumnConstraints(p_data.cod_nac) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00003_estado_civil_checkColumnConstraints(p_data.estado_civil) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00003_tipo_sangre_checkColumnConstraints(p_data.tipo_sangre) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00003_cedula_checkColumnConstraints(p_data.cedula) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00003_serie_checkColumnConstraints(p_data.serie) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00003_licencia_checkColumnConstraints(p_data.licencia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00003_sueldo_ac_checkColumnConstraints(p_data.sueldo_ac) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00003_nomina_checkColumnConstraints(p_data.nomina) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00003_fech_efec_checkColumnConstraints(p_data.fech_efec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00003_fecha_salida_checkColumnConstraints(p_data.fecha_salida) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00003_paga_seg_checkColumnConstraints(p_data.paga_seg) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00003_cod_seg1_checkColumnConstraints(p_data.cod_seg1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00003_cod_seg2_checkColumnConstraints(p_data.cod_seg2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00003_cod_seg3_checkColumnConstraints(p_data.cod_seg3) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00003_cuenta_no_checkColumnConstraints(p_data.cuenta_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00003_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00003_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00003_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00003_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00003_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00003_foto_empleado_checkColumnConstraints(p_data.foto_empleado) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00003_sucid_checkColumnConstraints(p_data.sucid) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00003_monto_seg_med_checkColumnConstraints(p_data.monto_seg_med) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00003_monto_seg_int_checkColumnConstraints(p_data.monto_seg_int) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00003_monto_care_checkColumnConstraints(p_data.monto_care) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- CALL smarmotech_dbxconstraints_adtb00003_pk_adtb00003_checkUniqueConstraint(p_forUpdate, p_data.num_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00003_checkTableConstraints
-
-{}
-#+ Check the primary key uniqueness constraint on the "adtb00003"
-#+
-#+ @param p_key - Primary Key
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00003_pk_adtb00003_checkUniqueConstraint(p_forUpdate, p_key)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_key
- RECORD
- adtb00003_num_emp LIKE adtb00003.num_emp
- END RECORD
- DEFINE l_key
- RECORD
- adtb00003_num_emp LIKE adtb00003.num_emp
- END RECORD
- DEFINE l_where STRING
- DEFINE l_sqlQuery STRING
- DEFINE l_count INTEGER
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- LET l_where = "WHERE adtb00003.num_emp = ? "
-
- let l_sqlQuery = "SELECT COUNT(*), num_emp FROM adtb00003 ", l_where, " GROUP BY num_emp"
-
- PREPARE cur_adtb00003_pk_adtb00003_checkUniqueConstraint FROM l_sqlQuery
- EXECUTE cur_adtb00003_pk_adtb00003_checkUniqueConstraint INTO l_count, l_key.* USING p_key.*
- FREE cur_adtb00003_pk_adtb00003_checkUniqueConstraint
- IF (NOT p_forUpdate AND l_count > 0) OR (p_forUpdate AND l_count > 0 AND p_key.* != l_key.*) THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- num_emp: " || ERROR_BAM_00002) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00003_pk_adtb00003_checkUniqueConstraint
-
-{}
-#+ Check constraints on the "adtb00003.num_emp" column
-#+
-#+ @param p_num_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00003_num_emp_checkColumnConstraints(p_num_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_emp LIKE adtb00003.num_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_num_emp IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- num_emp: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00003_num_emp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00003.departamento" column
-#+
-#+ @param p_departamento - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00003_departamento_checkColumnConstraints(p_departamento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_departamento LIKE adtb00003.departamento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00003_departamento_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00003.nivel_emp" column
-#+
-#+ @param p_nivel_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00003_nivel_emp_checkColumnConstraints(p_nivel_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nivel_emp LIKE adtb00003.nivel_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00003_nivel_emp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00003.cod_puesto" column
-#+
-#+ @param p_cod_puesto - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00003_cod_puesto_checkColumnConstraints(p_cod_puesto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_puesto LIKE adtb00003.cod_puesto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00003_cod_puesto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00003.nom1_emp" column
-#+
-#+ @param p_nom1_emp - CHAR(15) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00003_nom1_emp_checkColumnConstraints(p_nom1_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nom1_emp LIKE adtb00003.nom1_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00003_nom1_emp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00003.nom2_emp" column
-#+
-#+ @param p_nom2_emp - CHAR(15) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00003_nom2_emp_checkColumnConstraints(p_nom2_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nom2_emp LIKE adtb00003.nom2_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00003_nom2_emp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00003.apell1_emp" column
-#+
-#+ @param p_apell1_emp - CHAR(15) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00003_apell1_emp_checkColumnConstraints(p_apell1_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_apell1_emp LIKE adtb00003.apell1_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00003_apell1_emp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00003.apell2_emp" column
-#+
-#+ @param p_apell2_emp - CHAR(15) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00003_apell2_emp_checkColumnConstraints(p_apell2_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_apell2_emp LIKE adtb00003.apell2_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00003_apell2_emp_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00003.tipo_empleado" column
-#+
-#+ @param p_tipo_empleado - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00003_tipo_empleado_checkColumnConstraints(p_tipo_empleado)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_empleado LIKE adtb00003.tipo_empleado
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00003_tipo_empleado_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00003.fecha_termino_c" column
-#+
-#+ @param p_fecha_termino_c - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00003_fecha_termino_c_checkColumnConstraints(p_fecha_termino_c)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_termino_c LIKE adtb00003.fecha_termino_c
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00003_fecha_termino_c_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00003.calle" column
-#+
-#+ @param p_calle - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00003_calle_checkColumnConstraints(p_calle)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_calle LIKE adtb00003.calle
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00003_calle_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00003.casa_num" column
-#+
-#+ @param p_casa_num - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00003_casa_num_checkColumnConstraints(p_casa_num)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_casa_num LIKE adtb00003.casa_num
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00003_casa_num_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00003.barrio" column
-#+
-#+ @param p_barrio - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00003_barrio_checkColumnConstraints(p_barrio)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_barrio LIKE adtb00003.barrio
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00003_barrio_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00003.urbanizacion" column
-#+
-#+ @param p_urbanizacion - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00003_urbanizacion_checkColumnConstraints(p_urbanizacion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_urbanizacion LIKE adtb00003.urbanizacion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00003_urbanizacion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00003.telefono" column
-#+
-#+ @param p_telefono - CHAR(15) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00003_telefono_checkColumnConstraints(p_telefono)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_telefono LIKE adtb00003.telefono
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00003_telefono_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00003.fech_nac" column
-#+
-#+ @param p_fech_nac - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00003_fech_nac_checkColumnConstraints(p_fech_nac)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_nac LIKE adtb00003.fech_nac
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00003_fech_nac_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00003.cod_nac" column
-#+
-#+ @param p_cod_nac - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00003_cod_nac_checkColumnConstraints(p_cod_nac)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_nac LIKE adtb00003.cod_nac
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00003_cod_nac_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00003.estado_civil" column
-#+
-#+ @param p_estado_civil - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00003_estado_civil_checkColumnConstraints(p_estado_civil)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_estado_civil LIKE adtb00003.estado_civil
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00003_estado_civil_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00003.tipo_sangre" column
-#+
-#+ @param p_tipo_sangre - CHAR(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00003_tipo_sangre_checkColumnConstraints(p_tipo_sangre)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_sangre LIKE adtb00003.tipo_sangre
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00003_tipo_sangre_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00003.cedula" column
-#+
-#+ @param p_cedula - CHAR(11) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00003_cedula_checkColumnConstraints(p_cedula)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cedula LIKE adtb00003.cedula
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00003_cedula_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00003.serie" column
-#+
-#+ @param p_serie - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00003_serie_checkColumnConstraints(p_serie)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_serie LIKE adtb00003.serie
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00003_serie_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00003.licencia" column
-#+
-#+ @param p_licencia - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00003_licencia_checkColumnConstraints(p_licencia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_licencia LIKE adtb00003.licencia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00003_licencia_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00003.sueldo_ac" column
-#+
-#+ @param p_sueldo_ac - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00003_sueldo_ac_checkColumnConstraints(p_sueldo_ac)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sueldo_ac LIKE adtb00003.sueldo_ac
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00003_sueldo_ac_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00003.nomina" column
-#+
-#+ @param p_nomina - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00003_nomina_checkColumnConstraints(p_nomina)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nomina LIKE adtb00003.nomina
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00003_nomina_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00003.fech_efec" column
-#+
-#+ @param p_fech_efec - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00003_fech_efec_checkColumnConstraints(p_fech_efec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_efec LIKE adtb00003.fech_efec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00003_fech_efec_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00003.fecha_salida" column
-#+
-#+ @param p_fecha_salida - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00003_fecha_salida_checkColumnConstraints(p_fecha_salida)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_salida LIKE adtb00003.fecha_salida
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00003_fecha_salida_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00003.paga_seg" column
-#+
-#+ @param p_paga_seg - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00003_paga_seg_checkColumnConstraints(p_paga_seg)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_paga_seg LIKE adtb00003.paga_seg
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00003_paga_seg_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00003.cod_seg1" column
-#+
-#+ @param p_cod_seg1 - CHAR(11) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00003_cod_seg1_checkColumnConstraints(p_cod_seg1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_seg1 LIKE adtb00003.cod_seg1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00003_cod_seg1_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00003.cod_seg2" column
-#+
-#+ @param p_cod_seg2 - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00003_cod_seg2_checkColumnConstraints(p_cod_seg2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_seg2 LIKE adtb00003.cod_seg2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00003_cod_seg2_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00003.cod_seg3" column
-#+
-#+ @param p_cod_seg3 - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00003_cod_seg3_checkColumnConstraints(p_cod_seg3)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_seg3 LIKE adtb00003.cod_seg3
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00003_cod_seg3_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00003.cuenta_no" column
-#+
-#+ @param p_cuenta_no - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00003_cuenta_no_checkColumnConstraints(p_cuenta_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cuenta_no LIKE adtb00003.cuenta_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00003_cuenta_no_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00003.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00003_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE adtb00003.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00003_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00003.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00003_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE adtb00003.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00003_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00003.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00003_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE adtb00003.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00003_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00003.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00003_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE adtb00003.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00003_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00003.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00003_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE adtb00003.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00003_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00003.foto_empleado" column
-#+
-#+ @param p_foto_empleado - CHAR(255) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00003_foto_empleado_checkColumnConstraints(p_foto_empleado)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_foto_empleado LIKE adtb00003.foto_empleado
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00003_foto_empleado_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00003.sucid" column
-#+
-#+ @param p_sucid - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00003_sucid_checkColumnConstraints(p_sucid)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sucid LIKE adtb00003.sucid
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00003_sucid_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00003.monto_seg_med" column
-#+
-#+ @param p_monto_seg_med - DECIMAL(18,0) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00003_monto_seg_med_checkColumnConstraints(p_monto_seg_med)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_monto_seg_med LIKE adtb00003.monto_seg_med
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00003_monto_seg_med_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00003.monto_seg_int" column
-#+
-#+ @param p_monto_seg_int - DECIMAL(18,0) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00003_monto_seg_int_checkColumnConstraints(p_monto_seg_int)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_monto_seg_int LIKE adtb00003.monto_seg_int
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00003_monto_seg_int_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00003.monto_care" column
-#+
-#+ @param p_monto_care - DECIMAL(18,0) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00003_monto_care_checkColumnConstraints(p_monto_care)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_monto_care LIKE adtb00003.monto_care
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00003_monto_care_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00002" table
-#+
-#+ @param p_data - a row data LIKE adtb00002.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00002_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE adtb00002.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_adtb00002_cod_seccion_checkColumnConstraints(p_data.cod_seccion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00002_departamento_checkColumnConstraints(p_data.departamento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00002_nom_seccion_checkColumnConstraints(p_data.nom_seccion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00002_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00002_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00002_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00002_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00002_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00002_checkTableConstraints
-
-{}
-#+ Check constraints on the "adtb00002.cod_seccion" column
-#+
-#+ @param p_cod_seccion - VARCHAR2(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00002_cod_seccion_checkColumnConstraints(p_cod_seccion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_seccion LIKE adtb00002.cod_seccion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00002_cod_seccion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00002.departamento" column
-#+
-#+ @param p_departamento - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00002_departamento_checkColumnConstraints(p_departamento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_departamento LIKE adtb00002.departamento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00002_departamento_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00002.nom_seccion" column
-#+
-#+ @param p_nom_seccion - VARCHAR2(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00002_nom_seccion_checkColumnConstraints(p_nom_seccion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nom_seccion LIKE adtb00002.nom_seccion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00002_nom_seccion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00002.status_t" column
-#+
-#+ @param p_status_t - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00002_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE adtb00002.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00002_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00002.us_crea" column
-#+
-#+ @param p_us_crea - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00002_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE adtb00002.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00002_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00002.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00002_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE adtb00002.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00002_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00002.us_mod" column
-#+
-#+ @param p_us_mod - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00002_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE adtb00002.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00002_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00002.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00002_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE adtb00002.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00002_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00001" table
-#+
-#+ @param p_data - a row data LIKE adtb00001.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00001_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE adtb00001.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_adtb00001_departamento_checkColumnConstraints(p_data.departamento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00001_nom_dpto_checkColumnConstraints(p_data.nom_dpto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00001_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00001_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00001_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00001_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00001_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00001_checkTableConstraints
-
-{}
-#+ Check constraints on the "adtb00001.departamento" column
-#+
-#+ @param p_departamento - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00001_departamento_checkColumnConstraints(p_departamento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_departamento LIKE adtb00001.departamento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00001_departamento_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00001.nom_dpto" column
-#+
-#+ @param p_nom_dpto - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00001_nom_dpto_checkColumnConstraints(p_nom_dpto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nom_dpto LIKE adtb00001.nom_dpto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00001_nom_dpto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00001.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00001_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE adtb00001.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00001_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00001.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00001_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE adtb00001.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00001_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00001.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00001_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE adtb00001.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00001_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00001.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00001_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE adtb00001.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00001_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "adtb00001.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00001_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE adtb00001.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.adtb00001_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "actb00001" table
-#+
-#+ @param p_data - a row data LIKE actb00001.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_actb00001_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE actb00001.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_actb00001_codigo_checkColumnConstraints(p_data.codigo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_actb00001_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_actb00001_cuenta_no_checkColumnConstraints(p_data.cuenta_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_actb00001_cta_depr_checkColumnConstraints(p_data.cta_depr) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_actb00001_cta_gasto_checkColumnConstraints(p_data.cta_gasto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_actb00001_departamento_checkColumnConstraints(p_data.departamento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_actb00001_fech_compra_checkColumnConstraints(p_data.fech_compra) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_actb00001_duracion_checkColumnConstraints(p_data.duracion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_actb00001_fech_elim_checkColumnConstraints(p_data.fech_elim) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_actb00001_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_actb00001_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_actb00001_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_actb00001_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_actb00001_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.actb00001_checkTableConstraints
-
-{}
-#+ Check constraints on the "actb00001.codigo" column
-#+
-#+ @param p_codigo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_actb00001_codigo_checkColumnConstraints(p_codigo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codigo LIKE actb00001.codigo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.actb00001_codigo_checkColumnConstraints
-
-{}
-#+ Check constraints on the "actb00001.descripcion" column
-#+
-#+ @param p_descripcion - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_actb00001_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE actb00001.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.actb00001_descripcion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "actb00001.cuenta_no" column
-#+
-#+ @param p_cuenta_no - CHAR(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_actb00001_cuenta_no_checkColumnConstraints(p_cuenta_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cuenta_no LIKE actb00001.cuenta_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.actb00001_cuenta_no_checkColumnConstraints
-
-{}
-#+ Check constraints on the "actb00001.cta_depr" column
-#+
-#+ @param p_cta_depr - CHAR(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_actb00001_cta_depr_checkColumnConstraints(p_cta_depr)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cta_depr LIKE actb00001.cta_depr
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.actb00001_cta_depr_checkColumnConstraints
-
-{}
-#+ Check constraints on the "actb00001.cta_gasto" column
-#+
-#+ @param p_cta_gasto - CHAR(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_actb00001_cta_gasto_checkColumnConstraints(p_cta_gasto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cta_gasto LIKE actb00001.cta_gasto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.actb00001_cta_gasto_checkColumnConstraints
-
-{}
-#+ Check constraints on the "actb00001.departamento" column
-#+
-#+ @param p_departamento - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_actb00001_departamento_checkColumnConstraints(p_departamento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_departamento LIKE actb00001.departamento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.actb00001_departamento_checkColumnConstraints
-
-{}
-#+ Check constraints on the "actb00001.fech_compra" column
-#+
-#+ @param p_fech_compra - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_actb00001_fech_compra_checkColumnConstraints(p_fech_compra)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_compra LIKE actb00001.fech_compra
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.actb00001_fech_compra_checkColumnConstraints
-
-{}
-#+ Check constraints on the "actb00001.duracion" column
-#+
-#+ @param p_duracion - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_actb00001_duracion_checkColumnConstraints(p_duracion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_duracion LIKE actb00001.duracion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.actb00001_duracion_checkColumnConstraints
-
-{}
-#+ Check constraints on the "actb00001.fech_elim" column
-#+
-#+ @param p_fech_elim - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_actb00001_fech_elim_checkColumnConstraints(p_fech_elim)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_elim LIKE actb00001.fech_elim
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.actb00001_fech_elim_checkColumnConstraints
-
-{}
-#+ Check constraints on the "actb00001.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_actb00001_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE actb00001.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.actb00001_status_t_checkColumnConstraints
-
-{}
-#+ Check constraints on the "actb00001.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_actb00001_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE actb00001.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.actb00001_us_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "actb00001.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_actb00001_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE actb00001.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.actb00001_fech_crea_checkColumnConstraints
-
-{}
-#+ Check constraints on the "actb00001.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_actb00001_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE actb00001.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.actb00001_us_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "actb00001.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_actb00001_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE actb00001.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.actb00001_fech_mod_checkColumnConstraints
-
-{}
-#+ Check constraints on the "account" table
-#+
-#+ @param p_data - a row data LIKE account.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_account_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE account.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_account_userid_checkColumnConstraints(p_data.userid) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_account_email_checkColumnConstraints(p_data.email) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_account_firstname_checkColumnConstraints(p_data.firstname) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_account_lastname_checkColumnConstraints(p_data.lastname) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_account_status_checkColumnConstraints(p_data.status) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_account_addr1_checkColumnConstraints(p_data.addr1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_account_addr2_checkColumnConstraints(p_data.addr2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_account_city_checkColumnConstraints(p_data.city) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_account_state_checkColumnConstraints(p_data.state) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_account_zip_checkColumnConstraints(p_data.zip) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_account_country_checkColumnConstraints(p_data.country) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_account_phone_checkColumnConstraints(p_data.phone) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_account_langpref_checkColumnConstraints(p_data.langpref) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_account_favcategory_checkColumnConstraints(p_data.favcategory) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_account_mylistopt_checkColumnConstraints(p_data.mylistopt) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_account_banneropt_checkColumnConstraints(p_data.banneropt) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_account_sourceapp_checkColumnConstraints(p_data.sourceapp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.account_checkTableConstraints
-
-{}
-#+ Check constraints on the "account.userid" column
-#+
-#+ @param p_userid - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_account_userid_checkColumnConstraints(p_userid)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_userid LIKE account.userid
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_userid IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- userid: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.account_userid_checkColumnConstraints
-
-{}
-#+ Check constraints on the "account.email" column
-#+
-#+ @param p_email - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_account_email_checkColumnConstraints(p_email)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_email LIKE account.email
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_email IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- email: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.account_email_checkColumnConstraints
-
-{}
-#+ Check constraints on the "account.firstname" column
-#+
-#+ @param p_firstname - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_account_firstname_checkColumnConstraints(p_firstname)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_firstname LIKE account.firstname
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_firstname IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- firstname: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.account_firstname_checkColumnConstraints
-
-{}
-#+ Check constraints on the "account.lastname" column
-#+
-#+ @param p_lastname - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_account_lastname_checkColumnConstraints(p_lastname)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_lastname LIKE account.lastname
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_lastname IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- lastname: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.account_lastname_checkColumnConstraints
-
-{}
-#+ Check constraints on the "account.status" column
-#+
-#+ @param p_status - CHAR(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_account_status_checkColumnConstraints(p_status)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status LIKE account.status
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.account_status_checkColumnConstraints
-
-{}
-#+ Check constraints on the "account.addr1" column
-#+
-#+ @param p_addr1 - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_account_addr1_checkColumnConstraints(p_addr1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_addr1 LIKE account.addr1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_addr1 IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- addr1: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.account_addr1_checkColumnConstraints
-
-{}
-#+ Check constraints on the "account.addr2" column
-#+
-#+ @param p_addr2 - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_account_addr2_checkColumnConstraints(p_addr2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_addr2 LIKE account.addr2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.account_addr2_checkColumnConstraints
-
-{}
-#+ Check constraints on the "account.city" column
-#+
-#+ @param p_city - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_account_city_checkColumnConstraints(p_city)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_city LIKE account.city
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_city IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- city: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.account_city_checkColumnConstraints
-
-{}
-#+ Check constraints on the "account.state" column
-#+
-#+ @param p_state - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_account_state_checkColumnConstraints(p_state)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_state LIKE account.state
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.account_state_checkColumnConstraints
-
-{}
-#+ Check constraints on the "account.zip" column
-#+
-#+ @param p_zip - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_account_zip_checkColumnConstraints(p_zip)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_zip LIKE account.zip
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_zip IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- zip: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.account_zip_checkColumnConstraints
-
-{}
-#+ Check constraints on the "account.country" column
-#+
-#+ @param p_country - CHAR(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_account_country_checkColumnConstraints(p_country)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_country LIKE account.country
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_country IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- country: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.account_country_checkColumnConstraints
-
-{}
-#+ Check constraints on the "account.phone" column
-#+
-#+ @param p_phone - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_account_phone_checkColumnConstraints(p_phone)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_phone LIKE account.phone
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_phone IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- phone: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.account_phone_checkColumnConstraints
-
-{}
-#+ Check constraints on the "account.langpref" column
-#+
-#+ @param p_langpref - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_account_langpref_checkColumnConstraints(p_langpref)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_langpref LIKE account.langpref
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_langpref IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- langpref: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.account_langpref_checkColumnConstraints
-
-{}
-#+ Check constraints on the "account.favcategory" column
-#+
-#+ @param p_favcategory - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_account_favcategory_checkColumnConstraints(p_favcategory)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_favcategory LIKE account.favcategory
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.account_favcategory_checkColumnConstraints
-
-{}
-#+ Check constraints on the "account.mylistopt" column
-#+
-#+ @param p_mylistopt - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_account_mylistopt_checkColumnConstraints(p_mylistopt)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mylistopt LIKE account.mylistopt
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.account_mylistopt_checkColumnConstraints
-
-{}
-#+ Check constraints on the "account.banneropt" column
-#+
-#+ @param p_banneropt - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_account_banneropt_checkColumnConstraints(p_banneropt)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_banneropt LIKE account.banneropt
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.account_banneropt_checkColumnConstraints
-
-{}
-#+ Check constraints on the "account.sourceapp" column
-#+
-#+ @param p_sourceapp - CHAR(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_account_sourceapp_checkColumnConstraints(p_sourceapp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sourceapp LIKE account.sourceapp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_sourceapp IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- sourceapp: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{} --fct.account_sourceapp_checkColumnConstraints
-
---------------------------------------------------------------------------------
---Add user functions
-{}
-{}
diff --git a/DATABASE/smarmotech_dbxconstraints.code b/DATABASE/smarmotech_dbxconstraints.code
deleted file mode 100644
index f66252d..0000000
--- a/DATABASE/smarmotech_dbxconstraints.code
+++ /dev/null
@@ -1,142720 +0,0 @@
-
-
-#+ Constraints Management from DB schema (smarmotech)
-
---------------------------------------------------------------------------------
---This code is generated by the 'dbxconstraints.tcl' template
---Warning: Enter your changes within a <BLOCK> or <POINT> section, otherwise they will be lost.
-{<POINT Name="user.comments">}
-{</POINT>}
-
---------------------------------------------------------------------------------
---Importing modules
-IMPORT FGL libdbappCommon
-{<POINT Name="import">}
-{</POINT>}
-
---------------------------------------------------------------------------------
---Database schema
-SCHEMA smarmotech
-
---------------------------------------------------------------------------------
---DB constraints functions
-
-{<BLOCK Name="fct.vwventasvendedor_checkTableConstraints">}
-#+ Check constraints on the "vwventasvendedor" table
-#+
-#+ @param p_data - a row data LIKE vwventasvendedor.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventasvendedor_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vwventasvendedor.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vwventasvendedor_ano_checkColumnConstraints(p_data.ano) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventasvendedor_apellidov_checkColumnConstraints(p_data.apellidov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventasvendedor_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventasvendedor_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventasvendedor_cod_mov_checkColumnConstraints(p_data.cod_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventasvendedor_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventasvendedor_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventasvendedor_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventasvendedor_compania_checkColumnConstraints(p_data.compania) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventasvendedor_cond_pago_checkColumnConstraints(p_data.cond_pago) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventasvendedor_descrip_p_checkColumnConstraints(p_data.descrip_p) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventasvendedor_descripcionp_checkColumnConstraints(p_data.descripcionp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventasvendedor_descuento_checkColumnConstraints(p_data.descuento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventasvendedor_descuentord_checkColumnConstraints(p_data.descuentord) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventasvendedor_documentodev_checkColumnConstraints(p_data.documentodev) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventasvendedor_factura_checkColumnConstraints(p_data.factura) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventasvendedor_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventasvendedor_itbis_checkColumnConstraints(p_data.itbis) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventasvendedor_itbisrd_checkColumnConstraints(p_data.itbisrd) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventasvendedor_localidad_checkColumnConstraints(p_data.localidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventasvendedor_mes_checkColumnConstraints(p_data.mes) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventasvendedor_neto_checkColumnConstraints(p_data.neto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventasvendedor_netord_checkColumnConstraints(p_data.netord) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventasvendedor_nombre_cliente_checkColumnConstraints(p_data.nombre_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventasvendedor_nombrev_checkColumnConstraints(p_data.nombrev) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventasvendedor_numero_mes_checkColumnConstraints(p_data.numero_mes) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventasvendedor_orden_checkColumnConstraints(p_data.orden) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventasvendedor_origen_producto_checkColumnConstraints(p_data.origen_producto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventasvendedor_porc_itbi_checkColumnConstraints(p_data.porc_itbi) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventasvendedor_precio_checkColumnConstraints(p_data.precio) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventasvendedor_producto_checkColumnConstraints(p_data.producto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventasvendedor_rnc_checkColumnConstraints(p_data.rnc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventasvendedor_sec_cliente_checkColumnConstraints(p_data.sec_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventasvendedor_sec_vend_checkColumnConstraints(p_data.sec_vend) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventasvendedor_tasa_checkColumnConstraints(p_data.tasa) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventasvendedor_tipo_cliente_checkColumnConstraints(p_data.tipo_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventasvendedor_tipotransaccion_checkColumnConstraints(p_data.tipotransaccion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventasvendedor_tipo_ventas_checkColumnConstraints(p_data.tipo_ventas) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventasvendedor_unidadmed_checkColumnConstraints(p_data.unidadmed) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventasvendedor_valor_bruto_checkColumnConstraints(p_data.valor_bruto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventasvendedor_valorrd_checkColumnConstraints(p_data.valorrd) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwventasvendedor_checkTableConstraints
-
-{<BLOCK Name="fct.vwventasvendedor_ano_checkColumnConstraints">}
-#+ Check constraints on the "vwventasvendedor.ano" column
-#+
-#+ @param p_ano - CHAR(4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventasvendedor_ano_checkColumnConstraints(p_ano)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ano LIKE vwventasvendedor.ano
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwventasvendedor_ano_checkColumnConstraints
-
-{<BLOCK Name="fct.vwventasvendedor_apellidov_checkColumnConstraints">}
-#+ Check constraints on the "vwventasvendedor.apellidov" column
-#+
-#+ @param p_apellidov - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventasvendedor_apellidov_checkColumnConstraints(p_apellidov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_apellidov LIKE vwventasvendedor.apellidov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwventasvendedor_apellidov_checkColumnConstraints
-
-{<BLOCK Name="fct.vwventasvendedor_cantidad_checkColumnConstraints">}
-#+ Check constraints on the "vwventasvendedor.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventasvendedor_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE vwventasvendedor.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwventasvendedor_cantidad_checkColumnConstraints
-
-{<BLOCK Name="fct.vwventasvendedor_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "vwventasvendedor.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventasvendedor_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE vwventasvendedor.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwventasvendedor_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.vwventasvendedor_cod_mov_checkColumnConstraints">}
-#+ Check constraints on the "vwventasvendedor.cod_mov" column
-#+
-#+ @param p_cod_mov - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventasvendedor_cod_mov_checkColumnConstraints(p_cod_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mov LIKE vwventasvendedor.cod_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwventasvendedor_cod_mov_checkColumnConstraints
-
-{<BLOCK Name="fct.vwventasvendedor_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "vwventasvendedor.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventasvendedor_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE vwventasvendedor.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwventasvendedor_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.vwventasvendedor_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "vwventasvendedor.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventasvendedor_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE vwventasvendedor.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwventasvendedor_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.vwventasvendedor_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "vwventasvendedor.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventasvendedor_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE vwventasvendedor.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwventasvendedor_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.vwventasvendedor_compania_checkColumnConstraints">}
-#+ Check constraints on the "vwventasvendedor.compania" column
-#+
-#+ @param p_compania - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventasvendedor_compania_checkColumnConstraints(p_compania)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_compania LIKE vwventasvendedor.compania
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwventasvendedor_compania_checkColumnConstraints
-
-{<BLOCK Name="fct.vwventasvendedor_cond_pago_checkColumnConstraints">}
-#+ Check constraints on the "vwventasvendedor.cond_pago" column
-#+
-#+ @param p_cond_pago - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventasvendedor_cond_pago_checkColumnConstraints(p_cond_pago)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cond_pago LIKE vwventasvendedor.cond_pago
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwventasvendedor_cond_pago_checkColumnConstraints
-
-{<BLOCK Name="fct.vwventasvendedor_descrip_p_checkColumnConstraints">}
-#+ Check constraints on the "vwventasvendedor.descrip_p" column
-#+
-#+ @param p_descrip_p - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventasvendedor_descrip_p_checkColumnConstraints(p_descrip_p)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descrip_p LIKE vwventasvendedor.descrip_p
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwventasvendedor_descrip_p_checkColumnConstraints
-
-{<BLOCK Name="fct.vwventasvendedor_descripcionp_checkColumnConstraints">}
-#+ Check constraints on the "vwventasvendedor.descripcionp" column
-#+
-#+ @param p_descripcionp - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventasvendedor_descripcionp_checkColumnConstraints(p_descripcionp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcionp LIKE vwventasvendedor.descripcionp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwventasvendedor_descripcionp_checkColumnConstraints
-
-{<BLOCK Name="fct.vwventasvendedor_descuento_checkColumnConstraints">}
-#+ Check constraints on the "vwventasvendedor.descuento" column
-#+
-#+ @param p_descuento - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventasvendedor_descuento_checkColumnConstraints(p_descuento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descuento LIKE vwventasvendedor.descuento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwventasvendedor_descuento_checkColumnConstraints
-
-{<BLOCK Name="fct.vwventasvendedor_descuentord_checkColumnConstraints">}
-#+ Check constraints on the "vwventasvendedor.descuentord" column
-#+
-#+ @param p_descuentord - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventasvendedor_descuentord_checkColumnConstraints(p_descuentord)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descuentord LIKE vwventasvendedor.descuentord
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwventasvendedor_descuentord_checkColumnConstraints
-
-{<BLOCK Name="fct.vwventasvendedor_documentodev_checkColumnConstraints">}
-#+ Check constraints on the "vwventasvendedor.documentodev" column
-#+
-#+ @param p_documentodev - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventasvendedor_documentodev_checkColumnConstraints(p_documentodev)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_documentodev LIKE vwventasvendedor.documentodev
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwventasvendedor_documentodev_checkColumnConstraints
-
-{<BLOCK Name="fct.vwventasvendedor_factura_checkColumnConstraints">}
-#+ Check constraints on the "vwventasvendedor.factura" column
-#+
-#+ @param p_factura - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventasvendedor_factura_checkColumnConstraints(p_factura)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_factura LIKE vwventasvendedor.factura
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwventasvendedor_factura_checkColumnConstraints
-
-{<BLOCK Name="fct.vwventasvendedor_fecha_checkColumnConstraints">}
-#+ Check constraints on the "vwventasvendedor.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventasvendedor_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE vwventasvendedor.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwventasvendedor_fecha_checkColumnConstraints
-
-{<BLOCK Name="fct.vwventasvendedor_itbis_checkColumnConstraints">}
-#+ Check constraints on the "vwventasvendedor.itbis" column
-#+
-#+ @param p_itbis - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventasvendedor_itbis_checkColumnConstraints(p_itbis)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_itbis LIKE vwventasvendedor.itbis
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwventasvendedor_itbis_checkColumnConstraints
-
-{<BLOCK Name="fct.vwventasvendedor_itbisrd_checkColumnConstraints">}
-#+ Check constraints on the "vwventasvendedor.itbisrd" column
-#+
-#+ @param p_itbisrd - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventasvendedor_itbisrd_checkColumnConstraints(p_itbisrd)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_itbisrd LIKE vwventasvendedor.itbisrd
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwventasvendedor_itbisrd_checkColumnConstraints
-
-{<BLOCK Name="fct.vwventasvendedor_localidad_checkColumnConstraints">}
-#+ Check constraints on the "vwventasvendedor.localidad" column
-#+
-#+ @param p_localidad - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventasvendedor_localidad_checkColumnConstraints(p_localidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_localidad LIKE vwventasvendedor.localidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwventasvendedor_localidad_checkColumnConstraints
-
-{<BLOCK Name="fct.vwventasvendedor_mes_checkColumnConstraints">}
-#+ Check constraints on the "vwventasvendedor.mes" column
-#+
-#+ @param p_mes - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventasvendedor_mes_checkColumnConstraints(p_mes)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mes LIKE vwventasvendedor.mes
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwventasvendedor_mes_checkColumnConstraints
-
-{<BLOCK Name="fct.vwventasvendedor_neto_checkColumnConstraints">}
-#+ Check constraints on the "vwventasvendedor.neto" column
-#+
-#+ @param p_neto - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventasvendedor_neto_checkColumnConstraints(p_neto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_neto LIKE vwventasvendedor.neto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwventasvendedor_neto_checkColumnConstraints
-
-{<BLOCK Name="fct.vwventasvendedor_netord_checkColumnConstraints">}
-#+ Check constraints on the "vwventasvendedor.netord" column
-#+
-#+ @param p_netord - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventasvendedor_netord_checkColumnConstraints(p_netord)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_netord LIKE vwventasvendedor.netord
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwventasvendedor_netord_checkColumnConstraints
-
-{<BLOCK Name="fct.vwventasvendedor_nombre_cliente_checkColumnConstraints">}
-#+ Check constraints on the "vwventasvendedor.nombre_cliente" column
-#+
-#+ @param p_nombre_cliente - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventasvendedor_nombre_cliente_checkColumnConstraints(p_nombre_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombre_cliente LIKE vwventasvendedor.nombre_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwventasvendedor_nombre_cliente_checkColumnConstraints
-
-{<BLOCK Name="fct.vwventasvendedor_nombrev_checkColumnConstraints">}
-#+ Check constraints on the "vwventasvendedor.nombrev" column
-#+
-#+ @param p_nombrev - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventasvendedor_nombrev_checkColumnConstraints(p_nombrev)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombrev LIKE vwventasvendedor.nombrev
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwventasvendedor_nombrev_checkColumnConstraints
-
-{<BLOCK Name="fct.vwventasvendedor_numero_mes_checkColumnConstraints">}
-#+ Check constraints on the "vwventasvendedor.numero_mes" column
-#+
-#+ @param p_numero_mes - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventasvendedor_numero_mes_checkColumnConstraints(p_numero_mes)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_numero_mes LIKE vwventasvendedor.numero_mes
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwventasvendedor_numero_mes_checkColumnConstraints
-
-{<BLOCK Name="fct.vwventasvendedor_orden_checkColumnConstraints">}
-#+ Check constraints on the "vwventasvendedor.orden" column
-#+
-#+ @param p_orden - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventasvendedor_orden_checkColumnConstraints(p_orden)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_orden LIKE vwventasvendedor.orden
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwventasvendedor_orden_checkColumnConstraints
-
-{<BLOCK Name="fct.vwventasvendedor_origen_producto_checkColumnConstraints">}
-#+ Check constraints on the "vwventasvendedor.origen_producto" column
-#+
-#+ @param p_origen_producto - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventasvendedor_origen_producto_checkColumnConstraints(p_origen_producto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_origen_producto LIKE vwventasvendedor.origen_producto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwventasvendedor_origen_producto_checkColumnConstraints
-
-{<BLOCK Name="fct.vwventasvendedor_porc_itbi_checkColumnConstraints">}
-#+ Check constraints on the "vwventasvendedor.porc_itbi" column
-#+
-#+ @param p_porc_itbi - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventasvendedor_porc_itbi_checkColumnConstraints(p_porc_itbi)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_porc_itbi LIKE vwventasvendedor.porc_itbi
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwventasvendedor_porc_itbi_checkColumnConstraints
-
-{<BLOCK Name="fct.vwventasvendedor_precio_checkColumnConstraints">}
-#+ Check constraints on the "vwventasvendedor.precio" column
-#+
-#+ @param p_precio - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventasvendedor_precio_checkColumnConstraints(p_precio)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_precio LIKE vwventasvendedor.precio
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwventasvendedor_precio_checkColumnConstraints
-
-{<BLOCK Name="fct.vwventasvendedor_producto_checkColumnConstraints">}
-#+ Check constraints on the "vwventasvendedor.producto" column
-#+
-#+ @param p_producto - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventasvendedor_producto_checkColumnConstraints(p_producto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_producto LIKE vwventasvendedor.producto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwventasvendedor_producto_checkColumnConstraints
-
-{<BLOCK Name="fct.vwventasvendedor_rnc_checkColumnConstraints">}
-#+ Check constraints on the "vwventasvendedor.rnc" column
-#+
-#+ @param p_rnc - CHAR(11) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventasvendedor_rnc_checkColumnConstraints(p_rnc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_rnc LIKE vwventasvendedor.rnc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwventasvendedor_rnc_checkColumnConstraints
-
-{<BLOCK Name="fct.vwventasvendedor_sec_cliente_checkColumnConstraints">}
-#+ Check constraints on the "vwventasvendedor.sec_cliente" column
-#+
-#+ @param p_sec_cliente - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventasvendedor_sec_cliente_checkColumnConstraints(p_sec_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_cliente LIKE vwventasvendedor.sec_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwventasvendedor_sec_cliente_checkColumnConstraints
-
-{<BLOCK Name="fct.vwventasvendedor_sec_vend_checkColumnConstraints">}
-#+ Check constraints on the "vwventasvendedor.sec_vend" column
-#+
-#+ @param p_sec_vend - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventasvendedor_sec_vend_checkColumnConstraints(p_sec_vend)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_vend LIKE vwventasvendedor.sec_vend
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwventasvendedor_sec_vend_checkColumnConstraints
-
-{<BLOCK Name="fct.vwventasvendedor_tasa_checkColumnConstraints">}
-#+ Check constraints on the "vwventasvendedor.tasa" column
-#+
-#+ @param p_tasa - DECIMAL(8,3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventasvendedor_tasa_checkColumnConstraints(p_tasa)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tasa LIKE vwventasvendedor.tasa
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwventasvendedor_tasa_checkColumnConstraints
-
-{<BLOCK Name="fct.vwventasvendedor_tipo_cliente_checkColumnConstraints">}
-#+ Check constraints on the "vwventasvendedor.tipo_cliente" column
-#+
-#+ @param p_tipo_cliente - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventasvendedor_tipo_cliente_checkColumnConstraints(p_tipo_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_cliente LIKE vwventasvendedor.tipo_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwventasvendedor_tipo_cliente_checkColumnConstraints
-
-{<BLOCK Name="fct.vwventasvendedor_tipotransaccion_checkColumnConstraints">}
-#+ Check constraints on the "vwventasvendedor.tipotransaccion" column
-#+
-#+ @param p_tipotransaccion - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventasvendedor_tipotransaccion_checkColumnConstraints(p_tipotransaccion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipotransaccion LIKE vwventasvendedor.tipotransaccion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwventasvendedor_tipotransaccion_checkColumnConstraints
-
-{<BLOCK Name="fct.vwventasvendedor_tipo_ventas_checkColumnConstraints">}
-#+ Check constraints on the "vwventasvendedor.tipo_ventas" column
-#+
-#+ @param p_tipo_ventas - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventasvendedor_tipo_ventas_checkColumnConstraints(p_tipo_ventas)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_ventas LIKE vwventasvendedor.tipo_ventas
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwventasvendedor_tipo_ventas_checkColumnConstraints
-
-{<BLOCK Name="fct.vwventasvendedor_unidadmed_checkColumnConstraints">}
-#+ Check constraints on the "vwventasvendedor.unidadmed" column
-#+
-#+ @param p_unidadmed - CHAR(4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventasvendedor_unidadmed_checkColumnConstraints(p_unidadmed)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_unidadmed LIKE vwventasvendedor.unidadmed
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwventasvendedor_unidadmed_checkColumnConstraints
-
-{<BLOCK Name="fct.vwventasvendedor_valor_bruto_checkColumnConstraints">}
-#+ Check constraints on the "vwventasvendedor.valor_bruto" column
-#+
-#+ @param p_valor_bruto - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventasvendedor_valor_bruto_checkColumnConstraints(p_valor_bruto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valor_bruto LIKE vwventasvendedor.valor_bruto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwventasvendedor_valor_bruto_checkColumnConstraints
-
-{<BLOCK Name="fct.vwventasvendedor_valorrd_checkColumnConstraints">}
-#+ Check constraints on the "vwventasvendedor.valorrd" column
-#+
-#+ @param p_valorrd - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventasvendedor_valorrd_checkColumnConstraints(p_valorrd)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valorrd LIKE vwventasvendedor.valorrd
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwventasvendedor_valorrd_checkColumnConstraints
-
-{<BLOCK Name="fct.vwventas_checkTableConstraints">}
-#+ Check constraints on the "vwventas" table
-#+
-#+ @param p_data - a row data LIKE vwventas.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventas_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vwventas.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vwventas_compania_checkColumnConstraints(p_data.compania) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventas_localidad_checkColumnConstraints(p_data.localidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventas_tipotransaccion_checkColumnConstraints(p_data.tipotransaccion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventas_tipo_ventas_checkColumnConstraints(p_data.tipo_ventas) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventas_origen_producto_checkColumnConstraints(p_data.origen_producto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventas_producto_checkColumnConstraints(p_data.producto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventas_tipoproducto_checkColumnConstraints(p_data.tipoproducto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventas_valor_bruto_checkColumnConstraints(p_data.valor_bruto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventas_porc_itbi_checkColumnConstraints(p_data.porc_itbi) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventas_descuento_checkColumnConstraints(p_data.descuento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventas_itbis_checkColumnConstraints(p_data.itbis) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventas_factura_checkColumnConstraints(p_data.factura) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventas_conduce_checkColumnConstraints(p_data.conduce) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventas_documentodev_checkColumnConstraints(p_data.documentodev) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventas_documentocxc_checkColumnConstraints(p_data.documentocxc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventas_observaciones_checkColumnConstraints(p_data.observaciones) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventas_cod_mov_checkColumnConstraints(p_data.cod_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventas_cond_pago_checkColumnConstraints(p_data.cond_pago) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventas_descrip_p_checkColumnConstraints(p_data.descrip_p) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventas_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventas_numero_mes_checkColumnConstraints(p_data.numero_mes) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventas_ano_checkColumnConstraints(p_data.ano) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventas_mes_checkColumnConstraints(p_data.mes) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventas_tipo_cliente_checkColumnConstraints(p_data.tipo_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventas_sec_cliente_checkColumnConstraints(p_data.sec_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventas_nombre_cliente_checkColumnConstraints(p_data.nombre_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventas_rnc_checkColumnConstraints(p_data.rnc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventas_orden_checkColumnConstraints(p_data.orden) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventas_sec_vend_checkColumnConstraints(p_data.sec_vend) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventas_nombrev_checkColumnConstraints(p_data.nombrev) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventas_apellidov_checkColumnConstraints(p_data.apellidov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventas_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventas_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventas_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventas_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventas_descripcionp_checkColumnConstraints(p_data.descripcionp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventas_unidadmed_checkColumnConstraints(p_data.unidadmed) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventas_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventas_precio_checkColumnConstraints(p_data.precio) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventas_material_checkColumnConstraints(p_data.material) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventas_labor_checkColumnConstraints(p_data.labor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventas_gasto_checkColumnConstraints(p_data.gasto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventas_valormaterial_checkColumnConstraints(p_data.valormaterial) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventas_valorlabor_checkColumnConstraints(p_data.valorlabor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventas_valorgasto_checkColumnConstraints(p_data.valorgasto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventas_tasa_checkColumnConstraints(p_data.tasa) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventas_valorrd_checkColumnConstraints(p_data.valorrd) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventas_descuentord_checkColumnConstraints(p_data.descuentord) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventas_itbisrd_checkColumnConstraints(p_data.itbisrd) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventas_netord_checkColumnConstraints(p_data.netord) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventas_neto_checkColumnConstraints(p_data.neto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventas_margen_checkColumnConstraints(p_data.margen) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventas_transportista_checkColumnConstraints(p_data.transportista) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventas_pventas_checkColumnConstraints(p_data.pventas) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwventas_preciolista_checkColumnConstraints(p_data.preciolista) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwventas_checkTableConstraints
-
-{<BLOCK Name="fct.vwventas_compania_checkColumnConstraints">}
-#+ Check constraints on the "vwventas.compania" column
-#+
-#+ @param p_compania - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventas_compania_checkColumnConstraints(p_compania)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_compania LIKE vwventas.compania
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwventas_compania_checkColumnConstraints
-
-{<BLOCK Name="fct.vwventas_localidad_checkColumnConstraints">}
-#+ Check constraints on the "vwventas.localidad" column
-#+
-#+ @param p_localidad - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventas_localidad_checkColumnConstraints(p_localidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_localidad LIKE vwventas.localidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwventas_localidad_checkColumnConstraints
-
-{<BLOCK Name="fct.vwventas_tipotransaccion_checkColumnConstraints">}
-#+ Check constraints on the "vwventas.tipotransaccion" column
-#+
-#+ @param p_tipotransaccion - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventas_tipotransaccion_checkColumnConstraints(p_tipotransaccion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipotransaccion LIKE vwventas.tipotransaccion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwventas_tipotransaccion_checkColumnConstraints
-
-{<BLOCK Name="fct.vwventas_tipo_ventas_checkColumnConstraints">}
-#+ Check constraints on the "vwventas.tipo_ventas" column
-#+
-#+ @param p_tipo_ventas - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventas_tipo_ventas_checkColumnConstraints(p_tipo_ventas)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_ventas LIKE vwventas.tipo_ventas
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwventas_tipo_ventas_checkColumnConstraints
-
-{<BLOCK Name="fct.vwventas_origen_producto_checkColumnConstraints">}
-#+ Check constraints on the "vwventas.origen_producto" column
-#+
-#+ @param p_origen_producto - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventas_origen_producto_checkColumnConstraints(p_origen_producto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_origen_producto LIKE vwventas.origen_producto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwventas_origen_producto_checkColumnConstraints
-
-{<BLOCK Name="fct.vwventas_producto_checkColumnConstraints">}
-#+ Check constraints on the "vwventas.producto" column
-#+
-#+ @param p_producto - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventas_producto_checkColumnConstraints(p_producto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_producto LIKE vwventas.producto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwventas_producto_checkColumnConstraints
-
-{<BLOCK Name="fct.vwventas_tipoproducto_checkColumnConstraints">}
-#+ Check constraints on the "vwventas.tipoproducto" column
-#+
-#+ @param p_tipoproducto - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventas_tipoproducto_checkColumnConstraints(p_tipoproducto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipoproducto LIKE vwventas.tipoproducto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwventas_tipoproducto_checkColumnConstraints
-
-{<BLOCK Name="fct.vwventas_valor_bruto_checkColumnConstraints">}
-#+ Check constraints on the "vwventas.valor_bruto" column
-#+
-#+ @param p_valor_bruto - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventas_valor_bruto_checkColumnConstraints(p_valor_bruto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valor_bruto LIKE vwventas.valor_bruto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwventas_valor_bruto_checkColumnConstraints
-
-{<BLOCK Name="fct.vwventas_porc_itbi_checkColumnConstraints">}
-#+ Check constraints on the "vwventas.porc_itbi" column
-#+
-#+ @param p_porc_itbi - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventas_porc_itbi_checkColumnConstraints(p_porc_itbi)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_porc_itbi LIKE vwventas.porc_itbi
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwventas_porc_itbi_checkColumnConstraints
-
-{<BLOCK Name="fct.vwventas_descuento_checkColumnConstraints">}
-#+ Check constraints on the "vwventas.descuento" column
-#+
-#+ @param p_descuento - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventas_descuento_checkColumnConstraints(p_descuento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descuento LIKE vwventas.descuento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwventas_descuento_checkColumnConstraints
-
-{<BLOCK Name="fct.vwventas_itbis_checkColumnConstraints">}
-#+ Check constraints on the "vwventas.itbis" column
-#+
-#+ @param p_itbis - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventas_itbis_checkColumnConstraints(p_itbis)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_itbis LIKE vwventas.itbis
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwventas_itbis_checkColumnConstraints
-
-{<BLOCK Name="fct.vwventas_factura_checkColumnConstraints">}
-#+ Check constraints on the "vwventas.factura" column
-#+
-#+ @param p_factura - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventas_factura_checkColumnConstraints(p_factura)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_factura LIKE vwventas.factura
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwventas_factura_checkColumnConstraints
-
-{<BLOCK Name="fct.vwventas_conduce_checkColumnConstraints">}
-#+ Check constraints on the "vwventas.conduce" column
-#+
-#+ @param p_conduce - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventas_conduce_checkColumnConstraints(p_conduce)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_conduce LIKE vwventas.conduce
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwventas_conduce_checkColumnConstraints
-
-{<BLOCK Name="fct.vwventas_documentodev_checkColumnConstraints">}
-#+ Check constraints on the "vwventas.documentodev" column
-#+
-#+ @param p_documentodev - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventas_documentodev_checkColumnConstraints(p_documentodev)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_documentodev LIKE vwventas.documentodev
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwventas_documentodev_checkColumnConstraints
-
-{<BLOCK Name="fct.vwventas_documentocxc_checkColumnConstraints">}
-#+ Check constraints on the "vwventas.documentocxc" column
-#+
-#+ @param p_documentocxc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventas_documentocxc_checkColumnConstraints(p_documentocxc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_documentocxc LIKE vwventas.documentocxc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwventas_documentocxc_checkColumnConstraints
-
-{<BLOCK Name="fct.vwventas_observaciones_checkColumnConstraints">}
-#+ Check constraints on the "vwventas.observaciones" column
-#+
-#+ @param p_observaciones - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventas_observaciones_checkColumnConstraints(p_observaciones)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_observaciones LIKE vwventas.observaciones
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwventas_observaciones_checkColumnConstraints
-
-{<BLOCK Name="fct.vwventas_cod_mov_checkColumnConstraints">}
-#+ Check constraints on the "vwventas.cod_mov" column
-#+
-#+ @param p_cod_mov - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventas_cod_mov_checkColumnConstraints(p_cod_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mov LIKE vwventas.cod_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwventas_cod_mov_checkColumnConstraints
-
-{<BLOCK Name="fct.vwventas_cond_pago_checkColumnConstraints">}
-#+ Check constraints on the "vwventas.cond_pago" column
-#+
-#+ @param p_cond_pago - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventas_cond_pago_checkColumnConstraints(p_cond_pago)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cond_pago LIKE vwventas.cond_pago
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwventas_cond_pago_checkColumnConstraints
-
-{<BLOCK Name="fct.vwventas_descrip_p_checkColumnConstraints">}
-#+ Check constraints on the "vwventas.descrip_p" column
-#+
-#+ @param p_descrip_p - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventas_descrip_p_checkColumnConstraints(p_descrip_p)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descrip_p LIKE vwventas.descrip_p
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwventas_descrip_p_checkColumnConstraints
-
-{<BLOCK Name="fct.vwventas_fecha_checkColumnConstraints">}
-#+ Check constraints on the "vwventas.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventas_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE vwventas.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwventas_fecha_checkColumnConstraints
-
-{<BLOCK Name="fct.vwventas_numero_mes_checkColumnConstraints">}
-#+ Check constraints on the "vwventas.numero_mes" column
-#+
-#+ @param p_numero_mes - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventas_numero_mes_checkColumnConstraints(p_numero_mes)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_numero_mes LIKE vwventas.numero_mes
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwventas_numero_mes_checkColumnConstraints
-
-{<BLOCK Name="fct.vwventas_ano_checkColumnConstraints">}
-#+ Check constraints on the "vwventas.ano" column
-#+
-#+ @param p_ano - CHAR(4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventas_ano_checkColumnConstraints(p_ano)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ano LIKE vwventas.ano
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwventas_ano_checkColumnConstraints
-
-{<BLOCK Name="fct.vwventas_mes_checkColumnConstraints">}
-#+ Check constraints on the "vwventas.mes" column
-#+
-#+ @param p_mes - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventas_mes_checkColumnConstraints(p_mes)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mes LIKE vwventas.mes
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwventas_mes_checkColumnConstraints
-
-{<BLOCK Name="fct.vwventas_tipo_cliente_checkColumnConstraints">}
-#+ Check constraints on the "vwventas.tipo_cliente" column
-#+
-#+ @param p_tipo_cliente - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventas_tipo_cliente_checkColumnConstraints(p_tipo_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_cliente LIKE vwventas.tipo_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwventas_tipo_cliente_checkColumnConstraints
-
-{<BLOCK Name="fct.vwventas_sec_cliente_checkColumnConstraints">}
-#+ Check constraints on the "vwventas.sec_cliente" column
-#+
-#+ @param p_sec_cliente - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventas_sec_cliente_checkColumnConstraints(p_sec_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_cliente LIKE vwventas.sec_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwventas_sec_cliente_checkColumnConstraints
-
-{<BLOCK Name="fct.vwventas_nombre_cliente_checkColumnConstraints">}
-#+ Check constraints on the "vwventas.nombre_cliente" column
-#+
-#+ @param p_nombre_cliente - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventas_nombre_cliente_checkColumnConstraints(p_nombre_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombre_cliente LIKE vwventas.nombre_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwventas_nombre_cliente_checkColumnConstraints
-
-{<BLOCK Name="fct.vwventas_rnc_checkColumnConstraints">}
-#+ Check constraints on the "vwventas.rnc" column
-#+
-#+ @param p_rnc - CHAR(11) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventas_rnc_checkColumnConstraints(p_rnc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_rnc LIKE vwventas.rnc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwventas_rnc_checkColumnConstraints
-
-{<BLOCK Name="fct.vwventas_orden_checkColumnConstraints">}
-#+ Check constraints on the "vwventas.orden" column
-#+
-#+ @param p_orden - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventas_orden_checkColumnConstraints(p_orden)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_orden LIKE vwventas.orden
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwventas_orden_checkColumnConstraints
-
-{<BLOCK Name="fct.vwventas_sec_vend_checkColumnConstraints">}
-#+ Check constraints on the "vwventas.sec_vend" column
-#+
-#+ @param p_sec_vend - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventas_sec_vend_checkColumnConstraints(p_sec_vend)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_vend LIKE vwventas.sec_vend
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwventas_sec_vend_checkColumnConstraints
-
-{<BLOCK Name="fct.vwventas_nombrev_checkColumnConstraints">}
-#+ Check constraints on the "vwventas.nombrev" column
-#+
-#+ @param p_nombrev - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventas_nombrev_checkColumnConstraints(p_nombrev)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombrev LIKE vwventas.nombrev
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwventas_nombrev_checkColumnConstraints
-
-{<BLOCK Name="fct.vwventas_apellidov_checkColumnConstraints">}
-#+ Check constraints on the "vwventas.apellidov" column
-#+
-#+ @param p_apellidov - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventas_apellidov_checkColumnConstraints(p_apellidov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_apellidov LIKE vwventas.apellidov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwventas_apellidov_checkColumnConstraints
-
-{<BLOCK Name="fct.vwventas_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "vwventas.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventas_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE vwventas.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwventas_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.vwventas_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "vwventas.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventas_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE vwventas.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwventas_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.vwventas_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "vwventas.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventas_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE vwventas.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwventas_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.vwventas_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "vwventas.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventas_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE vwventas.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwventas_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.vwventas_descripcionp_checkColumnConstraints">}
-#+ Check constraints on the "vwventas.descripcionp" column
-#+
-#+ @param p_descripcionp - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventas_descripcionp_checkColumnConstraints(p_descripcionp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcionp LIKE vwventas.descripcionp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwventas_descripcionp_checkColumnConstraints
-
-{<BLOCK Name="fct.vwventas_unidadmed_checkColumnConstraints">}
-#+ Check constraints on the "vwventas.unidadmed" column
-#+
-#+ @param p_unidadmed - CHAR(4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventas_unidadmed_checkColumnConstraints(p_unidadmed)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_unidadmed LIKE vwventas.unidadmed
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwventas_unidadmed_checkColumnConstraints
-
-{<BLOCK Name="fct.vwventas_cantidad_checkColumnConstraints">}
-#+ Check constraints on the "vwventas.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventas_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE vwventas.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwventas_cantidad_checkColumnConstraints
-
-{<BLOCK Name="fct.vwventas_precio_checkColumnConstraints">}
-#+ Check constraints on the "vwventas.precio" column
-#+
-#+ @param p_precio - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventas_precio_checkColumnConstraints(p_precio)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_precio LIKE vwventas.precio
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwventas_precio_checkColumnConstraints
-
-{<BLOCK Name="fct.vwventas_material_checkColumnConstraints">}
-#+ Check constraints on the "vwventas.material" column
-#+
-#+ @param p_material - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventas_material_checkColumnConstraints(p_material)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_material LIKE vwventas.material
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwventas_material_checkColumnConstraints
-
-{<BLOCK Name="fct.vwventas_labor_checkColumnConstraints">}
-#+ Check constraints on the "vwventas.labor" column
-#+
-#+ @param p_labor - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventas_labor_checkColumnConstraints(p_labor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_labor LIKE vwventas.labor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwventas_labor_checkColumnConstraints
-
-{<BLOCK Name="fct.vwventas_gasto_checkColumnConstraints">}
-#+ Check constraints on the "vwventas.gasto" column
-#+
-#+ @param p_gasto - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventas_gasto_checkColumnConstraints(p_gasto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_gasto LIKE vwventas.gasto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwventas_gasto_checkColumnConstraints
-
-{<BLOCK Name="fct.vwventas_valormaterial_checkColumnConstraints">}
-#+ Check constraints on the "vwventas.valormaterial" column
-#+
-#+ @param p_valormaterial - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventas_valormaterial_checkColumnConstraints(p_valormaterial)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valormaterial LIKE vwventas.valormaterial
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwventas_valormaterial_checkColumnConstraints
-
-{<BLOCK Name="fct.vwventas_valorlabor_checkColumnConstraints">}
-#+ Check constraints on the "vwventas.valorlabor" column
-#+
-#+ @param p_valorlabor - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventas_valorlabor_checkColumnConstraints(p_valorlabor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valorlabor LIKE vwventas.valorlabor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwventas_valorlabor_checkColumnConstraints
-
-{<BLOCK Name="fct.vwventas_valorgasto_checkColumnConstraints">}
-#+ Check constraints on the "vwventas.valorgasto" column
-#+
-#+ @param p_valorgasto - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventas_valorgasto_checkColumnConstraints(p_valorgasto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valorgasto LIKE vwventas.valorgasto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwventas_valorgasto_checkColumnConstraints
-
-{<BLOCK Name="fct.vwventas_tasa_checkColumnConstraints">}
-#+ Check constraints on the "vwventas.tasa" column
-#+
-#+ @param p_tasa - DECIMAL(8,3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventas_tasa_checkColumnConstraints(p_tasa)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tasa LIKE vwventas.tasa
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwventas_tasa_checkColumnConstraints
-
-{<BLOCK Name="fct.vwventas_valorrd_checkColumnConstraints">}
-#+ Check constraints on the "vwventas.valorrd" column
-#+
-#+ @param p_valorrd - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventas_valorrd_checkColumnConstraints(p_valorrd)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valorrd LIKE vwventas.valorrd
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwventas_valorrd_checkColumnConstraints
-
-{<BLOCK Name="fct.vwventas_descuentord_checkColumnConstraints">}
-#+ Check constraints on the "vwventas.descuentord" column
-#+
-#+ @param p_descuentord - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventas_descuentord_checkColumnConstraints(p_descuentord)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descuentord LIKE vwventas.descuentord
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwventas_descuentord_checkColumnConstraints
-
-{<BLOCK Name="fct.vwventas_itbisrd_checkColumnConstraints">}
-#+ Check constraints on the "vwventas.itbisrd" column
-#+
-#+ @param p_itbisrd - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventas_itbisrd_checkColumnConstraints(p_itbisrd)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_itbisrd LIKE vwventas.itbisrd
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwventas_itbisrd_checkColumnConstraints
-
-{<BLOCK Name="fct.vwventas_netord_checkColumnConstraints">}
-#+ Check constraints on the "vwventas.netord" column
-#+
-#+ @param p_netord - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventas_netord_checkColumnConstraints(p_netord)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_netord LIKE vwventas.netord
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwventas_netord_checkColumnConstraints
-
-{<BLOCK Name="fct.vwventas_neto_checkColumnConstraints">}
-#+ Check constraints on the "vwventas.neto" column
-#+
-#+ @param p_neto - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventas_neto_checkColumnConstraints(p_neto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_neto LIKE vwventas.neto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwventas_neto_checkColumnConstraints
-
-{<BLOCK Name="fct.vwventas_margen_checkColumnConstraints">}
-#+ Check constraints on the "vwventas.margen" column
-#+
-#+ @param p_margen - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventas_margen_checkColumnConstraints(p_margen)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_margen LIKE vwventas.margen
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwventas_margen_checkColumnConstraints
-
-{<BLOCK Name="fct.vwventas_transportista_checkColumnConstraints">}
-#+ Check constraints on the "vwventas.transportista" column
-#+
-#+ @param p_transportista - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventas_transportista_checkColumnConstraints(p_transportista)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_transportista LIKE vwventas.transportista
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwventas_transportista_checkColumnConstraints
-
-{<BLOCK Name="fct.vwventas_pventas_checkColumnConstraints">}
-#+ Check constraints on the "vwventas.pventas" column
-#+
-#+ @param p_pventas - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventas_pventas_checkColumnConstraints(p_pventas)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_pventas LIKE vwventas.pventas
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwventas_pventas_checkColumnConstraints
-
-{<BLOCK Name="fct.vwventas_preciolista_checkColumnConstraints">}
-#+ Check constraints on the "vwventas.preciolista" column
-#+
-#+ @param p_preciolista - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwventas_preciolista_checkColumnConstraints(p_preciolista)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_preciolista LIKE vwventas.preciolista
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_preciolista IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- preciolista: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwventas_preciolista_checkColumnConstraints
-
-{<BLOCK Name="fct.vwvacaciones_checkTableConstraints">}
-#+ Check constraints on the "vwvacaciones" table
-#+
-#+ @param p_data - a row data LIKE vwvacaciones.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwvacaciones_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vwvacaciones.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vwvacaciones_nom_puesto_checkColumnConstraints(p_data.nom_puesto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwvacaciones_num_emp_checkColumnConstraints(p_data.num_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwvacaciones_departamento_checkColumnConstraints(p_data.departamento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwvacaciones_cod_puesto_checkColumnConstraints(p_data.cod_puesto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwvacaciones_nom1_emp_checkColumnConstraints(p_data.nom1_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwvacaciones_nom2_emp_checkColumnConstraints(p_data.nom2_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwvacaciones_apell1_emp_checkColumnConstraints(p_data.apell1_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwvacaciones_apell2_emp_checkColumnConstraints(p_data.apell2_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwvacaciones_tipo_empleado_checkColumnConstraints(p_data.tipo_empleado) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwvacaciones_fecha_termino_c_checkColumnConstraints(p_data.fecha_termino_c) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwvacaciones_calle_checkColumnConstraints(p_data.calle) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwvacaciones_casa_num_checkColumnConstraints(p_data.casa_num) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwvacaciones_barrio_checkColumnConstraints(p_data.barrio) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwvacaciones_urbanizacion_checkColumnConstraints(p_data.urbanizacion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwvacaciones_telefono_checkColumnConstraints(p_data.telefono) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwvacaciones_fech_nac_checkColumnConstraints(p_data.fech_nac) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwvacaciones_tipo_sangre_checkColumnConstraints(p_data.tipo_sangre) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwvacaciones_cedula_checkColumnConstraints(p_data.cedula) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwvacaciones_serie_checkColumnConstraints(p_data.serie) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwvacaciones_sueldo_ac_checkColumnConstraints(p_data.sueldo_ac) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwvacaciones_nomina_checkColumnConstraints(p_data.nomina) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwvacaciones_fech_efec_checkColumnConstraints(p_data.fech_efec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwvacaciones_fecha_salida_checkColumnConstraints(p_data.fecha_salida) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwvacaciones_cuenta_no_checkColumnConstraints(p_data.cuenta_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwvacaciones_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwvacaciones_sucid_checkColumnConstraints(p_data.sucid) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwvacaciones_nom_dpto_checkColumnConstraints(p_data.nom_dpto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwvacaciones_ano_checkColumnConstraints(p_data.ano) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwvacaciones_descrip_checkColumnConstraints(p_data.descrip) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwvacaciones_checkTableConstraints
-
-{<BLOCK Name="fct.vwvacaciones_nom_puesto_checkColumnConstraints">}
-#+ Check constraints on the "vwvacaciones.nom_puesto" column
-#+
-#+ @param p_nom_puesto - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwvacaciones_nom_puesto_checkColumnConstraints(p_nom_puesto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nom_puesto LIKE vwvacaciones.nom_puesto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwvacaciones_nom_puesto_checkColumnConstraints
-
-{<BLOCK Name="fct.vwvacaciones_num_emp_checkColumnConstraints">}
-#+ Check constraints on the "vwvacaciones.num_emp" column
-#+
-#+ @param p_num_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwvacaciones_num_emp_checkColumnConstraints(p_num_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_emp LIKE vwvacaciones.num_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_num_emp IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- num_emp: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwvacaciones_num_emp_checkColumnConstraints
-
-{<BLOCK Name="fct.vwvacaciones_departamento_checkColumnConstraints">}
-#+ Check constraints on the "vwvacaciones.departamento" column
-#+
-#+ @param p_departamento - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwvacaciones_departamento_checkColumnConstraints(p_departamento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_departamento LIKE vwvacaciones.departamento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwvacaciones_departamento_checkColumnConstraints
-
-{<BLOCK Name="fct.vwvacaciones_cod_puesto_checkColumnConstraints">}
-#+ Check constraints on the "vwvacaciones.cod_puesto" column
-#+
-#+ @param p_cod_puesto - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwvacaciones_cod_puesto_checkColumnConstraints(p_cod_puesto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_puesto LIKE vwvacaciones.cod_puesto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwvacaciones_cod_puesto_checkColumnConstraints
-
-{<BLOCK Name="fct.vwvacaciones_nom1_emp_checkColumnConstraints">}
-#+ Check constraints on the "vwvacaciones.nom1_emp" column
-#+
-#+ @param p_nom1_emp - CHAR(15) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwvacaciones_nom1_emp_checkColumnConstraints(p_nom1_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nom1_emp LIKE vwvacaciones.nom1_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwvacaciones_nom1_emp_checkColumnConstraints
-
-{<BLOCK Name="fct.vwvacaciones_nom2_emp_checkColumnConstraints">}
-#+ Check constraints on the "vwvacaciones.nom2_emp" column
-#+
-#+ @param p_nom2_emp - CHAR(15) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwvacaciones_nom2_emp_checkColumnConstraints(p_nom2_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nom2_emp LIKE vwvacaciones.nom2_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwvacaciones_nom2_emp_checkColumnConstraints
-
-{<BLOCK Name="fct.vwvacaciones_apell1_emp_checkColumnConstraints">}
-#+ Check constraints on the "vwvacaciones.apell1_emp" column
-#+
-#+ @param p_apell1_emp - CHAR(15) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwvacaciones_apell1_emp_checkColumnConstraints(p_apell1_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_apell1_emp LIKE vwvacaciones.apell1_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwvacaciones_apell1_emp_checkColumnConstraints
-
-{<BLOCK Name="fct.vwvacaciones_apell2_emp_checkColumnConstraints">}
-#+ Check constraints on the "vwvacaciones.apell2_emp" column
-#+
-#+ @param p_apell2_emp - CHAR(15) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwvacaciones_apell2_emp_checkColumnConstraints(p_apell2_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_apell2_emp LIKE vwvacaciones.apell2_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwvacaciones_apell2_emp_checkColumnConstraints
-
-{<BLOCK Name="fct.vwvacaciones_tipo_empleado_checkColumnConstraints">}
-#+ Check constraints on the "vwvacaciones.tipo_empleado" column
-#+
-#+ @param p_tipo_empleado - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwvacaciones_tipo_empleado_checkColumnConstraints(p_tipo_empleado)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_empleado LIKE vwvacaciones.tipo_empleado
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwvacaciones_tipo_empleado_checkColumnConstraints
-
-{<BLOCK Name="fct.vwvacaciones_fecha_termino_c_checkColumnConstraints">}
-#+ Check constraints on the "vwvacaciones.fecha_termino_c" column
-#+
-#+ @param p_fecha_termino_c - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwvacaciones_fecha_termino_c_checkColumnConstraints(p_fecha_termino_c)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_termino_c LIKE vwvacaciones.fecha_termino_c
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwvacaciones_fecha_termino_c_checkColumnConstraints
-
-{<BLOCK Name="fct.vwvacaciones_calle_checkColumnConstraints">}
-#+ Check constraints on the "vwvacaciones.calle" column
-#+
-#+ @param p_calle - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwvacaciones_calle_checkColumnConstraints(p_calle)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_calle LIKE vwvacaciones.calle
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwvacaciones_calle_checkColumnConstraints
-
-{<BLOCK Name="fct.vwvacaciones_casa_num_checkColumnConstraints">}
-#+ Check constraints on the "vwvacaciones.casa_num" column
-#+
-#+ @param p_casa_num - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwvacaciones_casa_num_checkColumnConstraints(p_casa_num)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_casa_num LIKE vwvacaciones.casa_num
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwvacaciones_casa_num_checkColumnConstraints
-
-{<BLOCK Name="fct.vwvacaciones_barrio_checkColumnConstraints">}
-#+ Check constraints on the "vwvacaciones.barrio" column
-#+
-#+ @param p_barrio - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwvacaciones_barrio_checkColumnConstraints(p_barrio)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_barrio LIKE vwvacaciones.barrio
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwvacaciones_barrio_checkColumnConstraints
-
-{<BLOCK Name="fct.vwvacaciones_urbanizacion_checkColumnConstraints">}
-#+ Check constraints on the "vwvacaciones.urbanizacion" column
-#+
-#+ @param p_urbanizacion - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwvacaciones_urbanizacion_checkColumnConstraints(p_urbanizacion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_urbanizacion LIKE vwvacaciones.urbanizacion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwvacaciones_urbanizacion_checkColumnConstraints
-
-{<BLOCK Name="fct.vwvacaciones_telefono_checkColumnConstraints">}
-#+ Check constraints on the "vwvacaciones.telefono" column
-#+
-#+ @param p_telefono - CHAR(15) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwvacaciones_telefono_checkColumnConstraints(p_telefono)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_telefono LIKE vwvacaciones.telefono
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwvacaciones_telefono_checkColumnConstraints
-
-{<BLOCK Name="fct.vwvacaciones_fech_nac_checkColumnConstraints">}
-#+ Check constraints on the "vwvacaciones.fech_nac" column
-#+
-#+ @param p_fech_nac - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwvacaciones_fech_nac_checkColumnConstraints(p_fech_nac)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_nac LIKE vwvacaciones.fech_nac
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwvacaciones_fech_nac_checkColumnConstraints
-
-{<BLOCK Name="fct.vwvacaciones_tipo_sangre_checkColumnConstraints">}
-#+ Check constraints on the "vwvacaciones.tipo_sangre" column
-#+
-#+ @param p_tipo_sangre - CHAR(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwvacaciones_tipo_sangre_checkColumnConstraints(p_tipo_sangre)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_sangre LIKE vwvacaciones.tipo_sangre
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwvacaciones_tipo_sangre_checkColumnConstraints
-
-{<BLOCK Name="fct.vwvacaciones_cedula_checkColumnConstraints">}
-#+ Check constraints on the "vwvacaciones.cedula" column
-#+
-#+ @param p_cedula - CHAR(11) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwvacaciones_cedula_checkColumnConstraints(p_cedula)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cedula LIKE vwvacaciones.cedula
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwvacaciones_cedula_checkColumnConstraints
-
-{<BLOCK Name="fct.vwvacaciones_serie_checkColumnConstraints">}
-#+ Check constraints on the "vwvacaciones.serie" column
-#+
-#+ @param p_serie - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwvacaciones_serie_checkColumnConstraints(p_serie)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_serie LIKE vwvacaciones.serie
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwvacaciones_serie_checkColumnConstraints
-
-{<BLOCK Name="fct.vwvacaciones_sueldo_ac_checkColumnConstraints">}
-#+ Check constraints on the "vwvacaciones.sueldo_ac" column
-#+
-#+ @param p_sueldo_ac - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwvacaciones_sueldo_ac_checkColumnConstraints(p_sueldo_ac)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sueldo_ac LIKE vwvacaciones.sueldo_ac
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwvacaciones_sueldo_ac_checkColumnConstraints
-
-{<BLOCK Name="fct.vwvacaciones_nomina_checkColumnConstraints">}
-#+ Check constraints on the "vwvacaciones.nomina" column
-#+
-#+ @param p_nomina - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwvacaciones_nomina_checkColumnConstraints(p_nomina)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nomina LIKE vwvacaciones.nomina
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwvacaciones_nomina_checkColumnConstraints
-
-{<BLOCK Name="fct.vwvacaciones_fech_efec_checkColumnConstraints">}
-#+ Check constraints on the "vwvacaciones.fech_efec" column
-#+
-#+ @param p_fech_efec - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwvacaciones_fech_efec_checkColumnConstraints(p_fech_efec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_efec LIKE vwvacaciones.fech_efec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwvacaciones_fech_efec_checkColumnConstraints
-
-{<BLOCK Name="fct.vwvacaciones_fecha_salida_checkColumnConstraints">}
-#+ Check constraints on the "vwvacaciones.fecha_salida" column
-#+
-#+ @param p_fecha_salida - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwvacaciones_fecha_salida_checkColumnConstraints(p_fecha_salida)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_salida LIKE vwvacaciones.fecha_salida
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwvacaciones_fecha_salida_checkColumnConstraints
-
-{<BLOCK Name="fct.vwvacaciones_cuenta_no_checkColumnConstraints">}
-#+ Check constraints on the "vwvacaciones.cuenta_no" column
-#+
-#+ @param p_cuenta_no - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwvacaciones_cuenta_no_checkColumnConstraints(p_cuenta_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cuenta_no LIKE vwvacaciones.cuenta_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwvacaciones_cuenta_no_checkColumnConstraints
-
-{<BLOCK Name="fct.vwvacaciones_status_t_checkColumnConstraints">}
-#+ Check constraints on the "vwvacaciones.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwvacaciones_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE vwvacaciones.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwvacaciones_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.vwvacaciones_sucid_checkColumnConstraints">}
-#+ Check constraints on the "vwvacaciones.sucid" column
-#+
-#+ @param p_sucid - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwvacaciones_sucid_checkColumnConstraints(p_sucid)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sucid LIKE vwvacaciones.sucid
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwvacaciones_sucid_checkColumnConstraints
-
-{<BLOCK Name="fct.vwvacaciones_nom_dpto_checkColumnConstraints">}
-#+ Check constraints on the "vwvacaciones.nom_dpto" column
-#+
-#+ @param p_nom_dpto - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwvacaciones_nom_dpto_checkColumnConstraints(p_nom_dpto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nom_dpto LIKE vwvacaciones.nom_dpto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwvacaciones_nom_dpto_checkColumnConstraints
-
-{<BLOCK Name="fct.vwvacaciones_ano_checkColumnConstraints">}
-#+ Check constraints on the "vwvacaciones.ano" column
-#+
-#+ @param p_ano - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwvacaciones_ano_checkColumnConstraints(p_ano)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ano LIKE vwvacaciones.ano
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwvacaciones_ano_checkColumnConstraints
-
-{<BLOCK Name="fct.vwvacaciones_descrip_checkColumnConstraints">}
-#+ Check constraints on the "vwvacaciones.descrip" column
-#+
-#+ @param p_descrip - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwvacaciones_descrip_checkColumnConstraints(p_descrip)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descrip LIKE vwvacaciones.descrip
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwvacaciones_descrip_checkColumnConstraints
-
-{<BLOCK Name="fct.vwseguimientoclientes_checkTableConstraints">}
-#+ Check constraints on the "vwseguimientoclientes" table
-#+
-#+ @param p_data - a row data LIKE vwseguimientoclientes.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwseguimientoclientes_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vwseguimientoclientes.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vwseguimientoclientes_cotizacion_no_checkColumnConstraints(p_data.cotizacion_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwseguimientoclientes_nombrecliente_checkColumnConstraints(p_data.nombrecliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwseguimientoclientes_tipo_cliente_checkColumnConstraints(p_data.tipo_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwseguimientoclientes_sec_cliente_checkColumnConstraints(p_data.sec_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwseguimientoclientes_telefono_checkColumnConstraints(p_data.telefono) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwseguimientoclientes_fax_checkColumnConstraints(p_data.fax) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwseguimientoclientes_rnc_checkColumnConstraints(p_data.rnc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwseguimientoclientes_calle_checkColumnConstraints(p_data.calle) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwseguimientoclientes_casa_num_checkColumnConstraints(p_data.casa_num) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwseguimientoclientes_barrio_checkColumnConstraints(p_data.barrio) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwseguimientoclientes_urbanizacion_checkColumnConstraints(p_data.urbanizacion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwseguimientoclientes_nombre_proyecto_checkColumnConstraints(p_data.nombre_proyecto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwseguimientoclientes_direccion_cliente_checkColumnConstraints(p_data.direccion_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwseguimientoclientes_direccion_proyecto_checkColumnConstraints(p_data.direccion_proyecto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwseguimientoclientes_telefono_r_checkColumnConstraints(p_data.telefono_r) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwseguimientoclientes_telefono_o_checkColumnConstraints(p_data.telefono_o) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwseguimientoclientes_email_checkColumnConstraints(p_data.email) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwseguimientoclientes_celular_checkColumnConstraints(p_data.celular) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwseguimientoclientes_fax1_checkColumnConstraints(p_data.fax1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwseguimientoclientes_celular1_checkColumnConstraints(p_data.celular1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwseguimientoclientes_fechacotizacion_checkColumnConstraints(p_data.fechacotizacion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwseguimientoclientes_orden_checkColumnConstraints(p_data.orden) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwseguimientoclientes_fechaorden_checkColumnConstraints(p_data.fechaorden) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwseguimientoclientes_cantidaddespachada_checkColumnConstraints(p_data.cantidaddespachada) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwseguimientoclientes_documentodespacho_checkColumnConstraints(p_data.documentodespacho) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwseguimientoclientes_cod_mov_checkColumnConstraints(p_data.cod_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwseguimientoclientes_fechaconduce_checkColumnConstraints(p_data.fechaconduce) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwseguimientoclientes_comentario_checkColumnConstraints(p_data.comentario) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwseguimientoclientes_descrip_esp_checkColumnConstraints(p_data.descrip_esp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwseguimientoclientes_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwseguimientoclientes_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwseguimientoclientes_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwseguimientoclientes_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwseguimientoclientes_ano_checkColumnConstraints(p_data.ano) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwseguimientoclientes_numeromes_checkColumnConstraints(p_data.numeromes) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwseguimientoclientes_mes_checkColumnConstraints(p_data.mes) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwseguimientoclientes_checkTableConstraints
-
-{<BLOCK Name="fct.vwseguimientoclientes_cotizacion_no_checkColumnConstraints">}
-#+ Check constraints on the "vwseguimientoclientes.cotizacion_no" column
-#+
-#+ @param p_cotizacion_no - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwseguimientoclientes_cotizacion_no_checkColumnConstraints(p_cotizacion_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cotizacion_no LIKE vwseguimientoclientes.cotizacion_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cotizacion_no IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cotizacion_no: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwseguimientoclientes_cotizacion_no_checkColumnConstraints
-
-{<BLOCK Name="fct.vwseguimientoclientes_nombrecliente_checkColumnConstraints">}
-#+ Check constraints on the "vwseguimientoclientes.nombrecliente" column
-#+
-#+ @param p_nombrecliente - CHAR(100) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwseguimientoclientes_nombrecliente_checkColumnConstraints(p_nombrecliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombrecliente LIKE vwseguimientoclientes.nombrecliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwseguimientoclientes_nombrecliente_checkColumnConstraints
-
-{<BLOCK Name="fct.vwseguimientoclientes_tipo_cliente_checkColumnConstraints">}
-#+ Check constraints on the "vwseguimientoclientes.tipo_cliente" column
-#+
-#+ @param p_tipo_cliente - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwseguimientoclientes_tipo_cliente_checkColumnConstraints(p_tipo_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_cliente LIKE vwseguimientoclientes.tipo_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwseguimientoclientes_tipo_cliente_checkColumnConstraints
-
-{<BLOCK Name="fct.vwseguimientoclientes_sec_cliente_checkColumnConstraints">}
-#+ Check constraints on the "vwseguimientoclientes.sec_cliente" column
-#+
-#+ @param p_sec_cliente - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwseguimientoclientes_sec_cliente_checkColumnConstraints(p_sec_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_cliente LIKE vwseguimientoclientes.sec_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwseguimientoclientes_sec_cliente_checkColumnConstraints
-
-{<BLOCK Name="fct.vwseguimientoclientes_telefono_checkColumnConstraints">}
-#+ Check constraints on the "vwseguimientoclientes.telefono" column
-#+
-#+ @param p_telefono - CHAR(16) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwseguimientoclientes_telefono_checkColumnConstraints(p_telefono)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_telefono LIKE vwseguimientoclientes.telefono
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwseguimientoclientes_telefono_checkColumnConstraints
-
-{<BLOCK Name="fct.vwseguimientoclientes_fax_checkColumnConstraints">}
-#+ Check constraints on the "vwseguimientoclientes.fax" column
-#+
-#+ @param p_fax - CHAR(16) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwseguimientoclientes_fax_checkColumnConstraints(p_fax)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fax LIKE vwseguimientoclientes.fax
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwseguimientoclientes_fax_checkColumnConstraints
-
-{<BLOCK Name="fct.vwseguimientoclientes_rnc_checkColumnConstraints">}
-#+ Check constraints on the "vwseguimientoclientes.rnc" column
-#+
-#+ @param p_rnc - CHAR(11) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwseguimientoclientes_rnc_checkColumnConstraints(p_rnc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_rnc LIKE vwseguimientoclientes.rnc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwseguimientoclientes_rnc_checkColumnConstraints
-
-{<BLOCK Name="fct.vwseguimientoclientes_calle_checkColumnConstraints">}
-#+ Check constraints on the "vwseguimientoclientes.calle" column
-#+
-#+ @param p_calle - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwseguimientoclientes_calle_checkColumnConstraints(p_calle)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_calle LIKE vwseguimientoclientes.calle
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwseguimientoclientes_calle_checkColumnConstraints
-
-{<BLOCK Name="fct.vwseguimientoclientes_casa_num_checkColumnConstraints">}
-#+ Check constraints on the "vwseguimientoclientes.casa_num" column
-#+
-#+ @param p_casa_num - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwseguimientoclientes_casa_num_checkColumnConstraints(p_casa_num)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_casa_num LIKE vwseguimientoclientes.casa_num
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwseguimientoclientes_casa_num_checkColumnConstraints
-
-{<BLOCK Name="fct.vwseguimientoclientes_barrio_checkColumnConstraints">}
-#+ Check constraints on the "vwseguimientoclientes.barrio" column
-#+
-#+ @param p_barrio - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwseguimientoclientes_barrio_checkColumnConstraints(p_barrio)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_barrio LIKE vwseguimientoclientes.barrio
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwseguimientoclientes_barrio_checkColumnConstraints
-
-{<BLOCK Name="fct.vwseguimientoclientes_urbanizacion_checkColumnConstraints">}
-#+ Check constraints on the "vwseguimientoclientes.urbanizacion" column
-#+
-#+ @param p_urbanizacion - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwseguimientoclientes_urbanizacion_checkColumnConstraints(p_urbanizacion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_urbanizacion LIKE vwseguimientoclientes.urbanizacion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwseguimientoclientes_urbanizacion_checkColumnConstraints
-
-{<BLOCK Name="fct.vwseguimientoclientes_nombre_proyecto_checkColumnConstraints">}
-#+ Check constraints on the "vwseguimientoclientes.nombre_proyecto" column
-#+
-#+ @param p_nombre_proyecto - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwseguimientoclientes_nombre_proyecto_checkColumnConstraints(p_nombre_proyecto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombre_proyecto LIKE vwseguimientoclientes.nombre_proyecto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwseguimientoclientes_nombre_proyecto_checkColumnConstraints
-
-{<BLOCK Name="fct.vwseguimientoclientes_direccion_cliente_checkColumnConstraints">}
-#+ Check constraints on the "vwseguimientoclientes.direccion_cliente" column
-#+
-#+ @param p_direccion_cliente - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwseguimientoclientes_direccion_cliente_checkColumnConstraints(p_direccion_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_direccion_cliente LIKE vwseguimientoclientes.direccion_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwseguimientoclientes_direccion_cliente_checkColumnConstraints
-
-{<BLOCK Name="fct.vwseguimientoclientes_direccion_proyecto_checkColumnConstraints">}
-#+ Check constraints on the "vwseguimientoclientes.direccion_proyecto" column
-#+
-#+ @param p_direccion_proyecto - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwseguimientoclientes_direccion_proyecto_checkColumnConstraints(p_direccion_proyecto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_direccion_proyecto LIKE vwseguimientoclientes.direccion_proyecto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwseguimientoclientes_direccion_proyecto_checkColumnConstraints
-
-{<BLOCK Name="fct.vwseguimientoclientes_telefono_r_checkColumnConstraints">}
-#+ Check constraints on the "vwseguimientoclientes.telefono_r" column
-#+
-#+ @param p_telefono_r - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwseguimientoclientes_telefono_r_checkColumnConstraints(p_telefono_r)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_telefono_r LIKE vwseguimientoclientes.telefono_r
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwseguimientoclientes_telefono_r_checkColumnConstraints
-
-{<BLOCK Name="fct.vwseguimientoclientes_telefono_o_checkColumnConstraints">}
-#+ Check constraints on the "vwseguimientoclientes.telefono_o" column
-#+
-#+ @param p_telefono_o - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwseguimientoclientes_telefono_o_checkColumnConstraints(p_telefono_o)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_telefono_o LIKE vwseguimientoclientes.telefono_o
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwseguimientoclientes_telefono_o_checkColumnConstraints
-
-{<BLOCK Name="fct.vwseguimientoclientes_email_checkColumnConstraints">}
-#+ Check constraints on the "vwseguimientoclientes.email" column
-#+
-#+ @param p_email - CHAR(100) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwseguimientoclientes_email_checkColumnConstraints(p_email)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_email LIKE vwseguimientoclientes.email
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwseguimientoclientes_email_checkColumnConstraints
-
-{<BLOCK Name="fct.vwseguimientoclientes_celular_checkColumnConstraints">}
-#+ Check constraints on the "vwseguimientoclientes.celular" column
-#+
-#+ @param p_celular - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwseguimientoclientes_celular_checkColumnConstraints(p_celular)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_celular LIKE vwseguimientoclientes.celular
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwseguimientoclientes_celular_checkColumnConstraints
-
-{<BLOCK Name="fct.vwseguimientoclientes_fax1_checkColumnConstraints">}
-#+ Check constraints on the "vwseguimientoclientes.fax1" column
-#+
-#+ @param p_fax1 - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwseguimientoclientes_fax1_checkColumnConstraints(p_fax1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fax1 LIKE vwseguimientoclientes.fax1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwseguimientoclientes_fax1_checkColumnConstraints
-
-{<BLOCK Name="fct.vwseguimientoclientes_celular1_checkColumnConstraints">}
-#+ Check constraints on the "vwseguimientoclientes.celular1" column
-#+
-#+ @param p_celular1 - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwseguimientoclientes_celular1_checkColumnConstraints(p_celular1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_celular1 LIKE vwseguimientoclientes.celular1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwseguimientoclientes_celular1_checkColumnConstraints
-
-{<BLOCK Name="fct.vwseguimientoclientes_fechacotizacion_checkColumnConstraints">}
-#+ Check constraints on the "vwseguimientoclientes.fechacotizacion" column
-#+
-#+ @param p_fechacotizacion - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwseguimientoclientes_fechacotizacion_checkColumnConstraints(p_fechacotizacion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fechacotizacion LIKE vwseguimientoclientes.fechacotizacion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwseguimientoclientes_fechacotizacion_checkColumnConstraints
-
-{<BLOCK Name="fct.vwseguimientoclientes_orden_checkColumnConstraints">}
-#+ Check constraints on the "vwseguimientoclientes.orden" column
-#+
-#+ @param p_orden - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwseguimientoclientes_orden_checkColumnConstraints(p_orden)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_orden LIKE vwseguimientoclientes.orden
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwseguimientoclientes_orden_checkColumnConstraints
-
-{<BLOCK Name="fct.vwseguimientoclientes_fechaorden_checkColumnConstraints">}
-#+ Check constraints on the "vwseguimientoclientes.fechaorden" column
-#+
-#+ @param p_fechaorden - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwseguimientoclientes_fechaorden_checkColumnConstraints(p_fechaorden)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fechaorden LIKE vwseguimientoclientes.fechaorden
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwseguimientoclientes_fechaorden_checkColumnConstraints
-
-{<BLOCK Name="fct.vwseguimientoclientes_cantidaddespachada_checkColumnConstraints">}
-#+ Check constraints on the "vwseguimientoclientes.cantidaddespachada" column
-#+
-#+ @param p_cantidaddespachada - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwseguimientoclientes_cantidaddespachada_checkColumnConstraints(p_cantidaddespachada)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidaddespachada LIKE vwseguimientoclientes.cantidaddespachada
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwseguimientoclientes_cantidaddespachada_checkColumnConstraints
-
-{<BLOCK Name="fct.vwseguimientoclientes_documentodespacho_checkColumnConstraints">}
-#+ Check constraints on the "vwseguimientoclientes.documentodespacho" column
-#+
-#+ @param p_documentodespacho - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwseguimientoclientes_documentodespacho_checkColumnConstraints(p_documentodespacho)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_documentodespacho LIKE vwseguimientoclientes.documentodespacho
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwseguimientoclientes_documentodespacho_checkColumnConstraints
-
-{<BLOCK Name="fct.vwseguimientoclientes_cod_mov_checkColumnConstraints">}
-#+ Check constraints on the "vwseguimientoclientes.cod_mov" column
-#+
-#+ @param p_cod_mov - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwseguimientoclientes_cod_mov_checkColumnConstraints(p_cod_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mov LIKE vwseguimientoclientes.cod_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwseguimientoclientes_cod_mov_checkColumnConstraints
-
-{<BLOCK Name="fct.vwseguimientoclientes_fechaconduce_checkColumnConstraints">}
-#+ Check constraints on the "vwseguimientoclientes.fechaconduce" column
-#+
-#+ @param p_fechaconduce - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwseguimientoclientes_fechaconduce_checkColumnConstraints(p_fechaconduce)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fechaconduce LIKE vwseguimientoclientes.fechaconduce
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwseguimientoclientes_fechaconduce_checkColumnConstraints
-
-{<BLOCK Name="fct.vwseguimientoclientes_comentario_checkColumnConstraints">}
-#+ Check constraints on the "vwseguimientoclientes.comentario" column
-#+
-#+ @param p_comentario - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwseguimientoclientes_comentario_checkColumnConstraints(p_comentario)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_comentario LIKE vwseguimientoclientes.comentario
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwseguimientoclientes_comentario_checkColumnConstraints
-
-{<BLOCK Name="fct.vwseguimientoclientes_descrip_esp_checkColumnConstraints">}
-#+ Check constraints on the "vwseguimientoclientes.descrip_esp" column
-#+
-#+ @param p_descrip_esp - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwseguimientoclientes_descrip_esp_checkColumnConstraints(p_descrip_esp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descrip_esp LIKE vwseguimientoclientes.descrip_esp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwseguimientoclientes_descrip_esp_checkColumnConstraints
-
-{<BLOCK Name="fct.vwseguimientoclientes_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "vwseguimientoclientes.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwseguimientoclientes_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE vwseguimientoclientes.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_n IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_n: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwseguimientoclientes_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.vwseguimientoclientes_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "vwseguimientoclientes.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwseguimientoclientes_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE vwseguimientoclientes.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_grupo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_grupo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwseguimientoclientes_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.vwseguimientoclientes_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "vwseguimientoclientes.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwseguimientoclientes_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE vwseguimientoclientes.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_tipo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_tipo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwseguimientoclientes_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.vwseguimientoclientes_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "vwseguimientoclientes.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwseguimientoclientes_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE vwseguimientoclientes.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_sec IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_sec: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwseguimientoclientes_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.vwseguimientoclientes_ano_checkColumnConstraints">}
-#+ Check constraints on the "vwseguimientoclientes.ano" column
-#+
-#+ @param p_ano - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwseguimientoclientes_ano_checkColumnConstraints(p_ano)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ano LIKE vwseguimientoclientes.ano
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwseguimientoclientes_ano_checkColumnConstraints
-
-{<BLOCK Name="fct.vwseguimientoclientes_numeromes_checkColumnConstraints">}
-#+ Check constraints on the "vwseguimientoclientes.numeromes" column
-#+
-#+ @param p_numeromes - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwseguimientoclientes_numeromes_checkColumnConstraints(p_numeromes)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_numeromes LIKE vwseguimientoclientes.numeromes
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwseguimientoclientes_numeromes_checkColumnConstraints
-
-{<BLOCK Name="fct.vwseguimientoclientes_mes_checkColumnConstraints">}
-#+ Check constraints on the "vwseguimientoclientes.mes" column
-#+
-#+ @param p_mes - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwseguimientoclientes_mes_checkColumnConstraints(p_mes)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mes LIKE vwseguimientoclientes.mes
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwseguimientoclientes_mes_checkColumnConstraints
-
-{<BLOCK Name="fct.vwrepuestos_checkTableConstraints">}
-#+ Check constraints on the "vwrepuestos" table
-#+
-#+ @param p_data - a row data LIKE vwrepuestos.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwrepuestos_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vwrepuestos.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vwrepuestos_ano_checkColumnConstraints(p_data.ano) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwrepuestos_numeromes_checkColumnConstraints(p_data.numeromes) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwrepuestos_mes_checkColumnConstraints(p_data.mes) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwrepuestos_codigodepto_checkColumnConstraints(p_data.codigodepto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwrepuestos_departamento_checkColumnConstraints(p_data.departamento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwrepuestos_codigomovimiento_checkColumnConstraints(p_data.codigomovimiento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwrepuestos_transaccion_checkColumnConstraints(p_data.transaccion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwrepuestos_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwrepuestos_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwrepuestos_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwrepuestos_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwrepuestos_codigo_checkColumnConstraints(p_data.codigo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwrepuestos_nombreporducto_checkColumnConstraints(p_data.nombreporducto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwrepuestos_unidad_med_checkColumnConstraints(p_data.unidad_med) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwrepuestos_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwrepuestos_costo_checkColumnConstraints(p_data.costo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwrepuestos_numerodocumento_checkColumnConstraints(p_data.numerodocumento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwrepuestos_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwrepuestos_ordencompra_checkColumnConstraints(p_data.ordencompra) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwrepuestos_conduce_checkColumnConstraints(p_data.conduce) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwrepuestos_codigomaquina_checkColumnConstraints(p_data.codigomaquina) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwrepuestos_maquina_checkColumnConstraints(p_data.maquina) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwrepuestos_valor_checkColumnConstraints(p_data.valor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwrepuestos_checkTableConstraints
-
-{<BLOCK Name="fct.vwrepuestos_ano_checkColumnConstraints">}
-#+ Check constraints on the "vwrepuestos.ano" column
-#+
-#+ @param p_ano - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwrepuestos_ano_checkColumnConstraints(p_ano)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ano LIKE vwrepuestos.ano
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwrepuestos_ano_checkColumnConstraints
-
-{<BLOCK Name="fct.vwrepuestos_numeromes_checkColumnConstraints">}
-#+ Check constraints on the "vwrepuestos.numeromes" column
-#+
-#+ @param p_numeromes - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwrepuestos_numeromes_checkColumnConstraints(p_numeromes)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_numeromes LIKE vwrepuestos.numeromes
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwrepuestos_numeromes_checkColumnConstraints
-
-{<BLOCK Name="fct.vwrepuestos_mes_checkColumnConstraints">}
-#+ Check constraints on the "vwrepuestos.mes" column
-#+
-#+ @param p_mes - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwrepuestos_mes_checkColumnConstraints(p_mes)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mes LIKE vwrepuestos.mes
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwrepuestos_mes_checkColumnConstraints
-
-{<BLOCK Name="fct.vwrepuestos_codigodepto_checkColumnConstraints">}
-#+ Check constraints on the "vwrepuestos.codigodepto" column
-#+
-#+ @param p_codigodepto - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwrepuestos_codigodepto_checkColumnConstraints(p_codigodepto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codigodepto LIKE vwrepuestos.codigodepto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwrepuestos_codigodepto_checkColumnConstraints
-
-{<BLOCK Name="fct.vwrepuestos_departamento_checkColumnConstraints">}
-#+ Check constraints on the "vwrepuestos.departamento" column
-#+
-#+ @param p_departamento - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwrepuestos_departamento_checkColumnConstraints(p_departamento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_departamento LIKE vwrepuestos.departamento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwrepuestos_departamento_checkColumnConstraints
-
-{<BLOCK Name="fct.vwrepuestos_codigomovimiento_checkColumnConstraints">}
-#+ Check constraints on the "vwrepuestos.codigomovimiento" column
-#+
-#+ @param p_codigomovimiento - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwrepuestos_codigomovimiento_checkColumnConstraints(p_codigomovimiento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codigomovimiento LIKE vwrepuestos.codigomovimiento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwrepuestos_codigomovimiento_checkColumnConstraints
-
-{<BLOCK Name="fct.vwrepuestos_transaccion_checkColumnConstraints">}
-#+ Check constraints on the "vwrepuestos.transaccion" column
-#+
-#+ @param p_transaccion - VARCHAR2(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwrepuestos_transaccion_checkColumnConstraints(p_transaccion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_transaccion LIKE vwrepuestos.transaccion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwrepuestos_transaccion_checkColumnConstraints
-
-{<BLOCK Name="fct.vwrepuestos_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "vwrepuestos.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwrepuestos_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE vwrepuestos.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwrepuestos_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.vwrepuestos_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "vwrepuestos.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwrepuestos_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE vwrepuestos.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwrepuestos_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.vwrepuestos_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "vwrepuestos.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwrepuestos_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE vwrepuestos.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwrepuestos_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.vwrepuestos_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "vwrepuestos.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwrepuestos_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE vwrepuestos.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwrepuestos_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.vwrepuestos_codigo_checkColumnConstraints">}
-#+ Check constraints on the "vwrepuestos.codigo" column
-#+
-#+ @param p_codigo - CHAR(120) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwrepuestos_codigo_checkColumnConstraints(p_codigo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codigo LIKE vwrepuestos.codigo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwrepuestos_codigo_checkColumnConstraints
-
-{<BLOCK Name="fct.vwrepuestos_nombreporducto_checkColumnConstraints">}
-#+ Check constraints on the "vwrepuestos.nombreporducto" column
-#+
-#+ @param p_nombreporducto - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwrepuestos_nombreporducto_checkColumnConstraints(p_nombreporducto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombreporducto LIKE vwrepuestos.nombreporducto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwrepuestos_nombreporducto_checkColumnConstraints
-
-{<BLOCK Name="fct.vwrepuestos_unidad_med_checkColumnConstraints">}
-#+ Check constraints on the "vwrepuestos.unidad_med" column
-#+
-#+ @param p_unidad_med - CHAR(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwrepuestos_unidad_med_checkColumnConstraints(p_unidad_med)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_unidad_med LIKE vwrepuestos.unidad_med
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwrepuestos_unidad_med_checkColumnConstraints
-
-{<BLOCK Name="fct.vwrepuestos_cantidad_checkColumnConstraints">}
-#+ Check constraints on the "vwrepuestos.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwrepuestos_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE vwrepuestos.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwrepuestos_cantidad_checkColumnConstraints
-
-{<BLOCK Name="fct.vwrepuestos_costo_checkColumnConstraints">}
-#+ Check constraints on the "vwrepuestos.costo" column
-#+
-#+ @param p_costo - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwrepuestos_costo_checkColumnConstraints(p_costo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_costo LIKE vwrepuestos.costo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwrepuestos_costo_checkColumnConstraints
-
-{<BLOCK Name="fct.vwrepuestos_numerodocumento_checkColumnConstraints">}
-#+ Check constraints on the "vwrepuestos.numerodocumento" column
-#+
-#+ @param p_numerodocumento - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwrepuestos_numerodocumento_checkColumnConstraints(p_numerodocumento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_numerodocumento LIKE vwrepuestos.numerodocumento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwrepuestos_numerodocumento_checkColumnConstraints
-
-{<BLOCK Name="fct.vwrepuestos_fecha_checkColumnConstraints">}
-#+ Check constraints on the "vwrepuestos.fecha" column
-#+
-#+ @param p_fecha - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwrepuestos_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE vwrepuestos.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwrepuestos_fecha_checkColumnConstraints
-
-{<BLOCK Name="fct.vwrepuestos_ordencompra_checkColumnConstraints">}
-#+ Check constraints on the "vwrepuestos.ordencompra" column
-#+
-#+ @param p_ordencompra - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwrepuestos_ordencompra_checkColumnConstraints(p_ordencompra)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ordencompra LIKE vwrepuestos.ordencompra
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwrepuestos_ordencompra_checkColumnConstraints
-
-{<BLOCK Name="fct.vwrepuestos_conduce_checkColumnConstraints">}
-#+ Check constraints on the "vwrepuestos.conduce" column
-#+
-#+ @param p_conduce - VARCHAR2(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwrepuestos_conduce_checkColumnConstraints(p_conduce)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_conduce LIKE vwrepuestos.conduce
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwrepuestos_conduce_checkColumnConstraints
-
-{<BLOCK Name="fct.vwrepuestos_codigomaquina_checkColumnConstraints">}
-#+ Check constraints on the "vwrepuestos.codigomaquina" column
-#+
-#+ @param p_codigomaquina - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwrepuestos_codigomaquina_checkColumnConstraints(p_codigomaquina)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codigomaquina LIKE vwrepuestos.codigomaquina
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwrepuestos_codigomaquina_checkColumnConstraints
-
-{<BLOCK Name="fct.vwrepuestos_maquina_checkColumnConstraints">}
-#+ Check constraints on the "vwrepuestos.maquina" column
-#+
-#+ @param p_maquina - VARCHAR2(25) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwrepuestos_maquina_checkColumnConstraints(p_maquina)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_maquina LIKE vwrepuestos.maquina
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwrepuestos_maquina_checkColumnConstraints
-
-{<BLOCK Name="fct.vwrepuestos_valor_checkColumnConstraints">}
-#+ Check constraints on the "vwrepuestos.valor" column
-#+
-#+ @param p_valor - DECIMAL(23,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwrepuestos_valor_checkColumnConstraints(p_valor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valor LIKE vwrepuestos.valor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwrepuestos_valor_checkColumnConstraints
-
-{<BLOCK Name="fct.vwprovincias_checkTableConstraints">}
-#+ Check constraints on the "vwprovincias" table
-#+
-#+ @param p_data - a row data LIKE vwprovincias.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwprovincias_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vwprovincias.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vwprovincias_cod_zona_checkColumnConstraints(p_data.cod_zona) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwprovincias_zona_checkColumnConstraints(p_data.zona) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwprovincias_provincia_checkColumnConstraints(p_data.provincia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwprovincias_cod_provincia_checkColumnConstraints(p_data.cod_provincia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwprovincias_tipo_cliente_checkColumnConstraints(p_data.tipo_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwprovincias_sec_cliente_checkColumnConstraints(p_data.sec_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwprovincias_nombre_checkColumnConstraints(p_data.nombre) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwprovincias_telefono_checkColumnConstraints(p_data.telefono) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwprovincias_fax_checkColumnConstraints(p_data.fax) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwprovincias_celular_checkColumnConstraints(p_data.celular) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwprovincias_email_checkColumnConstraints(p_data.email) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwprovincias_num_rnc_checkColumnConstraints(p_data.num_rnc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwprovincias_contacto_checkColumnConstraints(p_data.contacto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwprovincias_telefono_casa_checkColumnConstraints(p_data.telefono_casa) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwprovincias_tiponegocio_checkColumnConstraints(p_data.tiponegocio) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwprovincias_vendedor_checkColumnConstraints(p_data.vendedor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwprovincias_ciudad_checkColumnConstraints(p_data.ciudad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwprovincias_contacto_cliente_checkColumnConstraints(p_data.contacto_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwprovincias_puesto_checkColumnConstraints(p_data.puesto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwprovincias_email_contacto_checkColumnConstraints(p_data.email_contacto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwprovincias_celular_contacto_checkColumnConstraints(p_data.celular_contacto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwprovincias_telefono_oficina_checkColumnConstraints(p_data.telefono_oficina) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwprovincias_telefono_casa_contacto_checkColumnConstraints(p_data.telefono_casa_contacto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwprovincias_direccion_checkColumnConstraints(p_data.direccion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwprovincias_puestocontacto_checkColumnConstraints(p_data.puestocontacto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwprovincias_checkTableConstraints
-
-{<BLOCK Name="fct.vwprovincias_cod_zona_checkColumnConstraints">}
-#+ Check constraints on the "vwprovincias.cod_zona" column
-#+
-#+ @param p_cod_zona - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwprovincias_cod_zona_checkColumnConstraints(p_cod_zona)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_zona LIKE vwprovincias.cod_zona
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwprovincias_cod_zona_checkColumnConstraints
-
-{<BLOCK Name="fct.vwprovincias_zona_checkColumnConstraints">}
-#+ Check constraints on the "vwprovincias.zona" column
-#+
-#+ @param p_zona - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwprovincias_zona_checkColumnConstraints(p_zona)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_zona LIKE vwprovincias.zona
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwprovincias_zona_checkColumnConstraints
-
-{<BLOCK Name="fct.vwprovincias_provincia_checkColumnConstraints">}
-#+ Check constraints on the "vwprovincias.provincia" column
-#+
-#+ @param p_provincia - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwprovincias_provincia_checkColumnConstraints(p_provincia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_provincia LIKE vwprovincias.provincia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwprovincias_provincia_checkColumnConstraints
-
-{<BLOCK Name="fct.vwprovincias_cod_provincia_checkColumnConstraints">}
-#+ Check constraints on the "vwprovincias.cod_provincia" column
-#+
-#+ @param p_cod_provincia - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwprovincias_cod_provincia_checkColumnConstraints(p_cod_provincia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_provincia LIKE vwprovincias.cod_provincia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwprovincias_cod_provincia_checkColumnConstraints
-
-{<BLOCK Name="fct.vwprovincias_tipo_cliente_checkColumnConstraints">}
-#+ Check constraints on the "vwprovincias.tipo_cliente" column
-#+
-#+ @param p_tipo_cliente - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwprovincias_tipo_cliente_checkColumnConstraints(p_tipo_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_cliente LIKE vwprovincias.tipo_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwprovincias_tipo_cliente_checkColumnConstraints
-
-{<BLOCK Name="fct.vwprovincias_sec_cliente_checkColumnConstraints">}
-#+ Check constraints on the "vwprovincias.sec_cliente" column
-#+
-#+ @param p_sec_cliente - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwprovincias_sec_cliente_checkColumnConstraints(p_sec_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_cliente LIKE vwprovincias.sec_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwprovincias_sec_cliente_checkColumnConstraints
-
-{<BLOCK Name="fct.vwprovincias_nombre_checkColumnConstraints">}
-#+ Check constraints on the "vwprovincias.nombre" column
-#+
-#+ @param p_nombre - CHAR(100) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwprovincias_nombre_checkColumnConstraints(p_nombre)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombre LIKE vwprovincias.nombre
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwprovincias_nombre_checkColumnConstraints
-
-{<BLOCK Name="fct.vwprovincias_telefono_checkColumnConstraints">}
-#+ Check constraints on the "vwprovincias.telefono" column
-#+
-#+ @param p_telefono - CHAR(16) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwprovincias_telefono_checkColumnConstraints(p_telefono)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_telefono LIKE vwprovincias.telefono
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwprovincias_telefono_checkColumnConstraints
-
-{<BLOCK Name="fct.vwprovincias_fax_checkColumnConstraints">}
-#+ Check constraints on the "vwprovincias.fax" column
-#+
-#+ @param p_fax - CHAR(16) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwprovincias_fax_checkColumnConstraints(p_fax)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fax LIKE vwprovincias.fax
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwprovincias_fax_checkColumnConstraints
-
-{<BLOCK Name="fct.vwprovincias_celular_checkColumnConstraints">}
-#+ Check constraints on the "vwprovincias.celular" column
-#+
-#+ @param p_celular - CHAR(16) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwprovincias_celular_checkColumnConstraints(p_celular)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_celular LIKE vwprovincias.celular
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwprovincias_celular_checkColumnConstraints
-
-{<BLOCK Name="fct.vwprovincias_email_checkColumnConstraints">}
-#+ Check constraints on the "vwprovincias.email" column
-#+
-#+ @param p_email - VARCHAR2(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwprovincias_email_checkColumnConstraints(p_email)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_email LIKE vwprovincias.email
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwprovincias_email_checkColumnConstraints
-
-{<BLOCK Name="fct.vwprovincias_num_rnc_checkColumnConstraints">}
-#+ Check constraints on the "vwprovincias.num_rnc" column
-#+
-#+ @param p_num_rnc - CHAR(11) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwprovincias_num_rnc_checkColumnConstraints(p_num_rnc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_rnc LIKE vwprovincias.num_rnc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwprovincias_num_rnc_checkColumnConstraints
-
-{<BLOCK Name="fct.vwprovincias_contacto_checkColumnConstraints">}
-#+ Check constraints on the "vwprovincias.contacto" column
-#+
-#+ @param p_contacto - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwprovincias_contacto_checkColumnConstraints(p_contacto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_contacto LIKE vwprovincias.contacto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwprovincias_contacto_checkColumnConstraints
-
-{<BLOCK Name="fct.vwprovincias_telefono_casa_checkColumnConstraints">}
-#+ Check constraints on the "vwprovincias.telefono_casa" column
-#+
-#+ @param p_telefono_casa - CHAR(15) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwprovincias_telefono_casa_checkColumnConstraints(p_telefono_casa)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_telefono_casa LIKE vwprovincias.telefono_casa
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwprovincias_telefono_casa_checkColumnConstraints
-
-{<BLOCK Name="fct.vwprovincias_tiponegocio_checkColumnConstraints">}
-#+ Check constraints on the "vwprovincias.tiponegocio" column
-#+
-#+ @param p_tiponegocio - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwprovincias_tiponegocio_checkColumnConstraints(p_tiponegocio)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tiponegocio LIKE vwprovincias.tiponegocio
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwprovincias_tiponegocio_checkColumnConstraints
-
-{<BLOCK Name="fct.vwprovincias_vendedor_checkColumnConstraints">}
-#+ Check constraints on the "vwprovincias.vendedor" column
-#+
-#+ @param p_vendedor - VARCHAR2(31) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwprovincias_vendedor_checkColumnConstraints(p_vendedor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_vendedor LIKE vwprovincias.vendedor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwprovincias_vendedor_checkColumnConstraints
-
-{<BLOCK Name="fct.vwprovincias_ciudad_checkColumnConstraints">}
-#+ Check constraints on the "vwprovincias.ciudad" column
-#+
-#+ @param p_ciudad - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwprovincias_ciudad_checkColumnConstraints(p_ciudad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ciudad LIKE vwprovincias.ciudad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwprovincias_ciudad_checkColumnConstraints
-
-{<BLOCK Name="fct.vwprovincias_contacto_cliente_checkColumnConstraints">}
-#+ Check constraints on the "vwprovincias.contacto_cliente" column
-#+
-#+ @param p_contacto_cliente - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwprovincias_contacto_cliente_checkColumnConstraints(p_contacto_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_contacto_cliente LIKE vwprovincias.contacto_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwprovincias_contacto_cliente_checkColumnConstraints
-
-{<BLOCK Name="fct.vwprovincias_puesto_checkColumnConstraints">}
-#+ Check constraints on the "vwprovincias.puesto" column
-#+
-#+ @param p_puesto - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwprovincias_puesto_checkColumnConstraints(p_puesto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_puesto LIKE vwprovincias.puesto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwprovincias_puesto_checkColumnConstraints
-
-{<BLOCK Name="fct.vwprovincias_email_contacto_checkColumnConstraints">}
-#+ Check constraints on the "vwprovincias.email_contacto" column
-#+
-#+ @param p_email_contacto - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwprovincias_email_contacto_checkColumnConstraints(p_email_contacto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_email_contacto LIKE vwprovincias.email_contacto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwprovincias_email_contacto_checkColumnConstraints
-
-{<BLOCK Name="fct.vwprovincias_celular_contacto_checkColumnConstraints">}
-#+ Check constraints on the "vwprovincias.celular_contacto" column
-#+
-#+ @param p_celular_contacto - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwprovincias_celular_contacto_checkColumnConstraints(p_celular_contacto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_celular_contacto LIKE vwprovincias.celular_contacto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwprovincias_celular_contacto_checkColumnConstraints
-
-{<BLOCK Name="fct.vwprovincias_telefono_oficina_checkColumnConstraints">}
-#+ Check constraints on the "vwprovincias.telefono_oficina" column
-#+
-#+ @param p_telefono_oficina - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwprovincias_telefono_oficina_checkColumnConstraints(p_telefono_oficina)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_telefono_oficina LIKE vwprovincias.telefono_oficina
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwprovincias_telefono_oficina_checkColumnConstraints
-
-{<BLOCK Name="fct.vwprovincias_telefono_casa_contacto_checkColumnConstraints">}
-#+ Check constraints on the "vwprovincias.telefono_casa_contacto" column
-#+
-#+ @param p_telefono_casa_contacto - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwprovincias_telefono_casa_contacto_checkColumnConstraints(p_telefono_casa_contacto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_telefono_casa_contacto LIKE vwprovincias.telefono_casa_contacto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwprovincias_telefono_casa_contacto_checkColumnConstraints
-
-{<BLOCK Name="fct.vwprovincias_direccion_checkColumnConstraints">}
-#+ Check constraints on the "vwprovincias.direccion" column
-#+
-#+ @param p_direccion - VARCHAR2(133) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwprovincias_direccion_checkColumnConstraints(p_direccion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_direccion LIKE vwprovincias.direccion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwprovincias_direccion_checkColumnConstraints
-
-{<BLOCK Name="fct.vwprovincias_puestocontacto_checkColumnConstraints">}
-#+ Check constraints on the "vwprovincias.puestocontacto" column
-#+
-#+ @param p_puestocontacto - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwprovincias_puestocontacto_checkColumnConstraints(p_puestocontacto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_puestocontacto LIKE vwprovincias.puestocontacto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwprovincias_puestocontacto_checkColumnConstraints
-
-{<BLOCK Name="fct.vwproductos_checkTableConstraints">}
-#+ Check constraints on the "vwproductos" table
-#+
-#+ @param p_data - a row data LIKE vwproductos.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproductos_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vwproductos.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vwproductos_descrip_esp_checkColumnConstraints(p_data.descrip_esp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproductos_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproductos_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproductos_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproductos_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproductos_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproductos_precio_checkColumnConstraints(p_data.precio) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproductos_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproductos_cod_cia_checkColumnConstraints(p_data.cod_cia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproductos_tipo_checkColumnConstraints(p_data.tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproductos_grupo_checkColumnConstraints(p_data.grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproductos_origen_checkColumnConstraints(p_data.origen) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproductos_expr1_checkColumnConstraints(p_data.expr1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwproductos_checkTableConstraints
-
-{<BLOCK Name="fct.vwproductos_descrip_esp_checkColumnConstraints">}
-#+ Check constraints on the "vwproductos.descrip_esp" column
-#+
-#+ @param p_descrip_esp - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproductos_descrip_esp_checkColumnConstraints(p_descrip_esp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descrip_esp LIKE vwproductos.descrip_esp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_descrip_esp IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- descrip_esp: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwproductos_descrip_esp_checkColumnConstraints
-
-{<BLOCK Name="fct.vwproductos_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "vwproductos.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproductos_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE vwproductos.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_sec IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_sec: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwproductos_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.vwproductos_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "vwproductos.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproductos_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE vwproductos.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_tipo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_tipo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwproductos_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.vwproductos_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "vwproductos.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproductos_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE vwproductos.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_grupo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_grupo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwproductos_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.vwproductos_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "vwproductos.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproductos_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE vwproductos.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_n IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_n: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwproductos_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.vwproductos_descripcion_checkColumnConstraints">}
-#+ Check constraints on the "vwproductos.descripcion" column
-#+
-#+ @param p_descripcion - VARCHAR2(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproductos_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE vwproductos.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwproductos_descripcion_checkColumnConstraints
-
-{<BLOCK Name="fct.vwproductos_precio_checkColumnConstraints">}
-#+ Check constraints on the "vwproductos.precio" column
-#+
-#+ @param p_precio - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproductos_precio_checkColumnConstraints(p_precio)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_precio LIKE vwproductos.precio
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwproductos_precio_checkColumnConstraints
-
-{<BLOCK Name="fct.vwproductos_status_t_checkColumnConstraints">}
-#+ Check constraints on the "vwproductos.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproductos_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE vwproductos.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwproductos_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.vwproductos_cod_cia_checkColumnConstraints">}
-#+ Check constraints on the "vwproductos.cod_cia" column
-#+
-#+ @param p_cod_cia - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproductos_cod_cia_checkColumnConstraints(p_cod_cia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_cia LIKE vwproductos.cod_cia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_cia IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_cia: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwproductos_cod_cia_checkColumnConstraints
-
-{<BLOCK Name="fct.vwproductos_tipo_checkColumnConstraints">}
-#+ Check constraints on the "vwproductos.tipo" column
-#+
-#+ @param p_tipo - VARCHAR2(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproductos_tipo_checkColumnConstraints(p_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo LIKE vwproductos.tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwproductos_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.vwproductos_grupo_checkColumnConstraints">}
-#+ Check constraints on the "vwproductos.grupo" column
-#+
-#+ @param p_grupo - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproductos_grupo_checkColumnConstraints(p_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_grupo LIKE vwproductos.grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwproductos_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.vwproductos_origen_checkColumnConstraints">}
-#+ Check constraints on the "vwproductos.origen" column
-#+
-#+ @param p_origen - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproductos_origen_checkColumnConstraints(p_origen)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_origen LIKE vwproductos.origen
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwproductos_origen_checkColumnConstraints
-
-{<BLOCK Name="fct.vwproductos_expr1_checkColumnConstraints">}
-#+ Check constraints on the "vwproductos.expr1" column
-#+
-#+ @param p_expr1 - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproductos_expr1_checkColumnConstraints(p_expr1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_expr1 LIKE vwproductos.expr1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwproductos_expr1_checkColumnConstraints
-
-{<BLOCK Name="fct.vwproduccionvsventas_checkTableConstraints">}
-#+ Check constraints on the "vwproduccionvsventas" table
-#+
-#+ @param p_data - a row data LIKE vwproduccionvsventas.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccionvsventas_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vwproduccionvsventas.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vwproduccionvsventas_tipotransaccion_checkColumnConstraints(p_data.tipotransaccion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccionvsventas_ano_checkColumnConstraints(p_data.ano) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccionvsventas_mes_checkColumnConstraints(p_data.mes) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccionvsventas_producto_checkColumnConstraints(p_data.producto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccionvsventas_grupo_checkColumnConstraints(p_data.grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccionvsventas_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccionvsventas_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccionvsventas_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccionvsventas_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccionvsventas_descripcionp_checkColumnConstraints(p_data.descripcionp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccionvsventas_ventas_checkColumnConstraints(p_data.ventas) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccionvsventas_produccion_checkColumnConstraints(p_data.produccion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccionvsventas_documento_checkColumnConstraints(p_data.documento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwproduccionvsventas_checkTableConstraints
-
-{<BLOCK Name="fct.vwproduccionvsventas_tipotransaccion_checkColumnConstraints">}
-#+ Check constraints on the "vwproduccionvsventas.tipotransaccion" column
-#+
-#+ @param p_tipotransaccion - VARCHAR2(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccionvsventas_tipotransaccion_checkColumnConstraints(p_tipotransaccion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipotransaccion LIKE vwproduccionvsventas.tipotransaccion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_tipotransaccion IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- tipotransaccion: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwproduccionvsventas_tipotransaccion_checkColumnConstraints
-
-{<BLOCK Name="fct.vwproduccionvsventas_ano_checkColumnConstraints">}
-#+ Check constraints on the "vwproduccionvsventas.ano" column
-#+
-#+ @param p_ano - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccionvsventas_ano_checkColumnConstraints(p_ano)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ano LIKE vwproduccionvsventas.ano
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwproduccionvsventas_ano_checkColumnConstraints
-
-{<BLOCK Name="fct.vwproduccionvsventas_mes_checkColumnConstraints">}
-#+ Check constraints on the "vwproduccionvsventas.mes" column
-#+
-#+ @param p_mes - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccionvsventas_mes_checkColumnConstraints(p_mes)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mes LIKE vwproduccionvsventas.mes
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwproduccionvsventas_mes_checkColumnConstraints
-
-{<BLOCK Name="fct.vwproduccionvsventas_producto_checkColumnConstraints">}
-#+ Check constraints on the "vwproduccionvsventas.producto" column
-#+
-#+ @param p_producto - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccionvsventas_producto_checkColumnConstraints(p_producto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_producto LIKE vwproduccionvsventas.producto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwproduccionvsventas_producto_checkColumnConstraints
-
-{<BLOCK Name="fct.vwproduccionvsventas_grupo_checkColumnConstraints">}
-#+ Check constraints on the "vwproduccionvsventas.grupo" column
-#+
-#+ @param p_grupo - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccionvsventas_grupo_checkColumnConstraints(p_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_grupo LIKE vwproduccionvsventas.grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwproduccionvsventas_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.vwproduccionvsventas_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "vwproduccionvsventas.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccionvsventas_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE vwproduccionvsventas.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwproduccionvsventas_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.vwproduccionvsventas_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "vwproduccionvsventas.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccionvsventas_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE vwproduccionvsventas.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwproduccionvsventas_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.vwproduccionvsventas_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "vwproduccionvsventas.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccionvsventas_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE vwproduccionvsventas.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwproduccionvsventas_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.vwproduccionvsventas_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "vwproduccionvsventas.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccionvsventas_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE vwproduccionvsventas.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwproduccionvsventas_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.vwproduccionvsventas_descripcionp_checkColumnConstraints">}
-#+ Check constraints on the "vwproduccionvsventas.descripcionp" column
-#+
-#+ @param p_descripcionp - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccionvsventas_descripcionp_checkColumnConstraints(p_descripcionp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcionp LIKE vwproduccionvsventas.descripcionp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwproduccionvsventas_descripcionp_checkColumnConstraints
-
-{<BLOCK Name="fct.vwproduccionvsventas_ventas_checkColumnConstraints">}
-#+ Check constraints on the "vwproduccionvsventas.ventas" column
-#+
-#+ @param p_ventas - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccionvsventas_ventas_checkColumnConstraints(p_ventas)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ventas LIKE vwproduccionvsventas.ventas
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwproduccionvsventas_ventas_checkColumnConstraints
-
-{<BLOCK Name="fct.vwproduccionvsventas_produccion_checkColumnConstraints">}
-#+ Check constraints on the "vwproduccionvsventas.produccion" column
-#+
-#+ @param p_produccion - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccionvsventas_produccion_checkColumnConstraints(p_produccion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_produccion LIKE vwproduccionvsventas.produccion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_produccion IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- produccion: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwproduccionvsventas_produccion_checkColumnConstraints
-
-{<BLOCK Name="fct.vwproduccionvsventas_documento_checkColumnConstraints">}
-#+ Check constraints on the "vwproduccionvsventas.documento" column
-#+
-#+ @param p_documento - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccionvsventas_documento_checkColumnConstraints(p_documento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_documento LIKE vwproduccionvsventas.documento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwproduccionvsventas_documento_checkColumnConstraints
-
-{<BLOCK Name="fct.vwproducciont_checkTableConstraints">}
-#+ Check constraints on the "vwproducciont" table
-#+
-#+ @param p_data - a row data LIKE vwproducciont.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproducciont_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vwproducciont.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vwproducciont_codigomov_checkColumnConstraints(p_data.codigomov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproducciont_descripcionmov_checkColumnConstraints(p_data.descripcionmov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproducciont_codigodepto_checkColumnConstraints(p_data.codigodepto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproducciont_descripciondpto_checkColumnConstraints(p_data.descripciondpto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproducciont_documento_checkColumnConstraints(p_data.documento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproducciont_fechadoc_checkColumnConstraints(p_data.fechadoc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproducciont_orden_checkColumnConstraints(p_data.orden) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproducciont_producto_checkColumnConstraints(p_data.producto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproducciont_grupo_checkColumnConstraints(p_data.grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproducciont_origen_checkColumnConstraints(p_data.origen) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproducciont_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproducciont_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproducciont_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproducciont_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproducciont_descripcionp_checkColumnConstraints(p_data.descripcionp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproducciont_unidadmed_checkColumnConstraints(p_data.unidadmed) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproducciont_unidades_checkColumnConstraints(p_data.unidades) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproducciont_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproducciont_nombrecliente_checkColumnConstraints(p_data.nombrecliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproducciont_cantidadorden_checkColumnConstraints(p_data.cantidadorden) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproducciont_ano_checkColumnConstraints(p_data.ano) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproducciont_mes_checkColumnConstraints(p_data.mes) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproducciont_metrosadicionales_checkColumnConstraints(p_data.metrosadicionales) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwproducciont_checkTableConstraints
-
-{<BLOCK Name="fct.vwproducciont_codigomov_checkColumnConstraints">}
-#+ Check constraints on the "vwproducciont.codigomov" column
-#+
-#+ @param p_codigomov - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproducciont_codigomov_checkColumnConstraints(p_codigomov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codigomov LIKE vwproducciont.codigomov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_codigomov IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- codigomov: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwproducciont_codigomov_checkColumnConstraints
-
-{<BLOCK Name="fct.vwproducciont_descripcionmov_checkColumnConstraints">}
-#+ Check constraints on the "vwproducciont.descripcionmov" column
-#+
-#+ @param p_descripcionmov - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproducciont_descripcionmov_checkColumnConstraints(p_descripcionmov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcionmov LIKE vwproducciont.descripcionmov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwproducciont_descripcionmov_checkColumnConstraints
-
-{<BLOCK Name="fct.vwproducciont_codigodepto_checkColumnConstraints">}
-#+ Check constraints on the "vwproducciont.codigodepto" column
-#+
-#+ @param p_codigodepto - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproducciont_codigodepto_checkColumnConstraints(p_codigodepto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codigodepto LIKE vwproducciont.codigodepto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwproducciont_codigodepto_checkColumnConstraints
-
-{<BLOCK Name="fct.vwproducciont_descripciondpto_checkColumnConstraints">}
-#+ Check constraints on the "vwproducciont.descripciondpto" column
-#+
-#+ @param p_descripciondpto - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproducciont_descripciondpto_checkColumnConstraints(p_descripciondpto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripciondpto LIKE vwproducciont.descripciondpto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwproducciont_descripciondpto_checkColumnConstraints
-
-{<BLOCK Name="fct.vwproducciont_documento_checkColumnConstraints">}
-#+ Check constraints on the "vwproducciont.documento" column
-#+
-#+ @param p_documento - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproducciont_documento_checkColumnConstraints(p_documento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_documento LIKE vwproducciont.documento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_documento IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- documento: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwproducciont_documento_checkColumnConstraints
-
-{<BLOCK Name="fct.vwproducciont_fechadoc_checkColumnConstraints">}
-#+ Check constraints on the "vwproducciont.fechadoc" column
-#+
-#+ @param p_fechadoc - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproducciont_fechadoc_checkColumnConstraints(p_fechadoc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fechadoc LIKE vwproducciont.fechadoc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_fechadoc IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- fechadoc: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwproducciont_fechadoc_checkColumnConstraints
-
-{<BLOCK Name="fct.vwproducciont_orden_checkColumnConstraints">}
-#+ Check constraints on the "vwproducciont.orden" column
-#+
-#+ @param p_orden - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproducciont_orden_checkColumnConstraints(p_orden)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_orden LIKE vwproducciont.orden
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwproducciont_orden_checkColumnConstraints
-
-{<BLOCK Name="fct.vwproducciont_producto_checkColumnConstraints">}
-#+ Check constraints on the "vwproducciont.producto" column
-#+
-#+ @param p_producto - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproducciont_producto_checkColumnConstraints(p_producto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_producto LIKE vwproducciont.producto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwproducciont_producto_checkColumnConstraints
-
-{<BLOCK Name="fct.vwproducciont_grupo_checkColumnConstraints">}
-#+ Check constraints on the "vwproducciont.grupo" column
-#+
-#+ @param p_grupo - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproducciont_grupo_checkColumnConstraints(p_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_grupo LIKE vwproducciont.grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwproducciont_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.vwproducciont_origen_checkColumnConstraints">}
-#+ Check constraints on the "vwproducciont.origen" column
-#+
-#+ @param p_origen - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproducciont_origen_checkColumnConstraints(p_origen)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_origen LIKE vwproducciont.origen
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwproducciont_origen_checkColumnConstraints
-
-{<BLOCK Name="fct.vwproducciont_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "vwproducciont.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproducciont_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE vwproducciont.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_n IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_n: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwproducciont_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.vwproducciont_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "vwproducciont.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproducciont_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE vwproducciont.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_grupo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_grupo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwproducciont_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.vwproducciont_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "vwproducciont.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproducciont_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE vwproducciont.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_tipo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_tipo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwproducciont_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.vwproducciont_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "vwproducciont.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproducciont_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE vwproducciont.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_sec IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_sec: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwproducciont_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.vwproducciont_descripcionp_checkColumnConstraints">}
-#+ Check constraints on the "vwproducciont.descripcionp" column
-#+
-#+ @param p_descripcionp - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproducciont_descripcionp_checkColumnConstraints(p_descripcionp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcionp LIKE vwproducciont.descripcionp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_descripcionp IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- descripcionp: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwproducciont_descripcionp_checkColumnConstraints
-
-{<BLOCK Name="fct.vwproducciont_unidadmed_checkColumnConstraints">}
-#+ Check constraints on the "vwproducciont.unidadmed" column
-#+
-#+ @param p_unidadmed - CHAR(4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproducciont_unidadmed_checkColumnConstraints(p_unidadmed)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_unidadmed LIKE vwproducciont.unidadmed
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwproducciont_unidadmed_checkColumnConstraints
-
-{<BLOCK Name="fct.vwproducciont_unidades_checkColumnConstraints">}
-#+ Check constraints on the "vwproducciont.unidades" column
-#+
-#+ @param p_unidades - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproducciont_unidades_checkColumnConstraints(p_unidades)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_unidades LIKE vwproducciont.unidades
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwproducciont_unidades_checkColumnConstraints
-
-{<BLOCK Name="fct.vwproducciont_cantidad_checkColumnConstraints">}
-#+ Check constraints on the "vwproducciont.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproducciont_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE vwproducciont.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cantidad IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cantidad: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwproducciont_cantidad_checkColumnConstraints
-
-{<BLOCK Name="fct.vwproducciont_nombrecliente_checkColumnConstraints">}
-#+ Check constraints on the "vwproducciont.nombrecliente" column
-#+
-#+ @param p_nombrecliente - CHAR(100) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproducciont_nombrecliente_checkColumnConstraints(p_nombrecliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombrecliente LIKE vwproducciont.nombrecliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwproducciont_nombrecliente_checkColumnConstraints
-
-{<BLOCK Name="fct.vwproducciont_cantidadorden_checkColumnConstraints">}
-#+ Check constraints on the "vwproducciont.cantidadorden" column
-#+
-#+ @param p_cantidadorden - DECIMAL(38,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproducciont_cantidadorden_checkColumnConstraints(p_cantidadorden)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidadorden LIKE vwproducciont.cantidadorden
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwproducciont_cantidadorden_checkColumnConstraints
-
-{<BLOCK Name="fct.vwproducciont_ano_checkColumnConstraints">}
-#+ Check constraints on the "vwproducciont.ano" column
-#+
-#+ @param p_ano - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproducciont_ano_checkColumnConstraints(p_ano)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ano LIKE vwproducciont.ano
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwproducciont_ano_checkColumnConstraints
-
-{<BLOCK Name="fct.vwproducciont_mes_checkColumnConstraints">}
-#+ Check constraints on the "vwproducciont.mes" column
-#+
-#+ @param p_mes - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproducciont_mes_checkColumnConstraints(p_mes)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mes LIKE vwproducciont.mes
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwproducciont_mes_checkColumnConstraints
-
-{<BLOCK Name="fct.vwproducciont_metrosadicionales_checkColumnConstraints">}
-#+ Check constraints on the "vwproducciont.metrosadicionales" column
-#+
-#+ @param p_metrosadicionales - DECIMAL(25,10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproducciont_metrosadicionales_checkColumnConstraints(p_metrosadicionales)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_metrosadicionales LIKE vwproducciont.metrosadicionales
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwproducciont_metrosadicionales_checkColumnConstraints
-
-{<BLOCK Name="fct.vwproduccionf_checkTableConstraints">}
-#+ Check constraints on the "vwproduccionf" table
-#+
-#+ @param p_data - a row data LIKE vwproduccionf.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccionf_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vwproduccionf.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vwproduccionf_ano_checkColumnConstraints(p_data.ano) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccionf_dia_checkColumnConstraints(p_data.dia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccionf_mes_checkColumnConstraints(p_data.mes) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccionf_semana_checkColumnConstraints(p_data.semana) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccionf_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccionf_documento_checkColumnConstraints(p_data.documento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccionf_codigosemi_checkColumnConstraints(p_data.codigosemi) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccionf_descripcionsemi_checkColumnConstraints(p_data.descripcionsemi) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccionf_uniadmed_checkColumnConstraints(p_data.uniadmed) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccionf_codigodepto_checkColumnConstraints(p_data.codigodepto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccionf_nombredto_checkColumnConstraints(p_data.nombredto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccionf_ficha_checkColumnConstraints(p_data.ficha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccionf_nombre_checkColumnConstraints(p_data.nombre) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccionf_apellido_checkColumnConstraints(p_data.apellido) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccionf_normalesd_checkColumnConstraints(p_data.normalesd) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccionf_normalesind_checkColumnConstraints(p_data.normalesind) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccionf_extrasdirecta_checkColumnConstraints(p_data.extrasdirecta) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccionf_extrasind_checkColumnConstraints(p_data.extrasind) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccionf_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccionf_bloque_checkColumnConstraints(p_data.bloque) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccionf_cantidadprep_checkColumnConstraints(p_data.cantidadprep) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccionf_grupodepto_checkColumnConstraints(p_data.grupodepto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccionf_turno_checkColumnConstraints(p_data.turno) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccionf_costolabor_checkColumnConstraints(p_data.costolabor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccionf_costogastos_checkColumnConstraints(p_data.costogastos) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccionf_valorlabor_checkColumnConstraints(p_data.valorlabor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccionf_valorgasto_checkColumnConstraints(p_data.valorgasto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccionf_estado_checkColumnConstraints(p_data.estado) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccionf_docalmacen_checkColumnConstraints(p_data.docalmacen) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccionf_cantidadtrx_checkColumnConstraints(p_data.cantidadtrx) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccionf_cod_mov_checkColumnConstraints(p_data.cod_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccionf_descrip_mov_checkColumnConstraints(p_data.descrip_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccionf_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccionf_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccionf_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccionf_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccionf_descrip_esp_checkColumnConstraints(p_data.descrip_esp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwproduccionf_checkTableConstraints
-
-{<BLOCK Name="fct.vwproduccionf_ano_checkColumnConstraints">}
-#+ Check constraints on the "vwproduccionf.ano" column
-#+
-#+ @param p_ano - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccionf_ano_checkColumnConstraints(p_ano)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ano LIKE vwproduccionf.ano
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwproduccionf_ano_checkColumnConstraints
-
-{<BLOCK Name="fct.vwproduccionf_dia_checkColumnConstraints">}
-#+ Check constraints on the "vwproduccionf.dia" column
-#+
-#+ @param p_dia - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccionf_dia_checkColumnConstraints(p_dia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_dia LIKE vwproduccionf.dia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwproduccionf_dia_checkColumnConstraints
-
-{<BLOCK Name="fct.vwproduccionf_mes_checkColumnConstraints">}
-#+ Check constraints on the "vwproduccionf.mes" column
-#+
-#+ @param p_mes - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccionf_mes_checkColumnConstraints(p_mes)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mes LIKE vwproduccionf.mes
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwproduccionf_mes_checkColumnConstraints
-
-{<BLOCK Name="fct.vwproduccionf_semana_checkColumnConstraints">}
-#+ Check constraints on the "vwproduccionf.semana" column
-#+
-#+ @param p_semana - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccionf_semana_checkColumnConstraints(p_semana)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_semana LIKE vwproduccionf.semana
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwproduccionf_semana_checkColumnConstraints
-
-{<BLOCK Name="fct.vwproduccionf_fecha_checkColumnConstraints">}
-#+ Check constraints on the "vwproduccionf.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccionf_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE vwproduccionf.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_fecha IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- fecha: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwproduccionf_fecha_checkColumnConstraints
-
-{<BLOCK Name="fct.vwproduccionf_documento_checkColumnConstraints">}
-#+ Check constraints on the "vwproduccionf.documento" column
-#+
-#+ @param p_documento - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccionf_documento_checkColumnConstraints(p_documento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_documento LIKE vwproduccionf.documento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_documento IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- documento: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwproduccionf_documento_checkColumnConstraints
-
-{<BLOCK Name="fct.vwproduccionf_codigosemi_checkColumnConstraints">}
-#+ Check constraints on the "vwproduccionf.codigosemi" column
-#+
-#+ @param p_codigosemi - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccionf_codigosemi_checkColumnConstraints(p_codigosemi)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codigosemi LIKE vwproduccionf.codigosemi
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_codigosemi IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- codigosemi: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwproduccionf_codigosemi_checkColumnConstraints
-
-{<BLOCK Name="fct.vwproduccionf_descripcionsemi_checkColumnConstraints">}
-#+ Check constraints on the "vwproduccionf.descripcionsemi" column
-#+
-#+ @param p_descripcionsemi - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccionf_descripcionsemi_checkColumnConstraints(p_descripcionsemi)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcionsemi LIKE vwproduccionf.descripcionsemi
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwproduccionf_descripcionsemi_checkColumnConstraints
-
-{<BLOCK Name="fct.vwproduccionf_uniadmed_checkColumnConstraints">}
-#+ Check constraints on the "vwproduccionf.uniadmed" column
-#+
-#+ @param p_uniadmed - CHAR(4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccionf_uniadmed_checkColumnConstraints(p_uniadmed)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_uniadmed LIKE vwproduccionf.uniadmed
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwproduccionf_uniadmed_checkColumnConstraints
-
-{<BLOCK Name="fct.vwproduccionf_codigodepto_checkColumnConstraints">}
-#+ Check constraints on the "vwproduccionf.codigodepto" column
-#+
-#+ @param p_codigodepto - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccionf_codigodepto_checkColumnConstraints(p_codigodepto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codigodepto LIKE vwproduccionf.codigodepto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwproduccionf_codigodepto_checkColumnConstraints
-
-{<BLOCK Name="fct.vwproduccionf_nombredto_checkColumnConstraints">}
-#+ Check constraints on the "vwproduccionf.nombredto" column
-#+
-#+ @param p_nombredto - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccionf_nombredto_checkColumnConstraints(p_nombredto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombredto LIKE vwproduccionf.nombredto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwproduccionf_nombredto_checkColumnConstraints
-
-{<BLOCK Name="fct.vwproduccionf_ficha_checkColumnConstraints">}
-#+ Check constraints on the "vwproduccionf.ficha" column
-#+
-#+ @param p_ficha - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccionf_ficha_checkColumnConstraints(p_ficha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ficha LIKE vwproduccionf.ficha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_ficha IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- ficha: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwproduccionf_ficha_checkColumnConstraints
-
-{<BLOCK Name="fct.vwproduccionf_nombre_checkColumnConstraints">}
-#+ Check constraints on the "vwproduccionf.nombre" column
-#+
-#+ @param p_nombre - CHAR(15) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccionf_nombre_checkColumnConstraints(p_nombre)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombre LIKE vwproduccionf.nombre
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwproduccionf_nombre_checkColumnConstraints
-
-{<BLOCK Name="fct.vwproduccionf_apellido_checkColumnConstraints">}
-#+ Check constraints on the "vwproduccionf.apellido" column
-#+
-#+ @param p_apellido - CHAR(15) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccionf_apellido_checkColumnConstraints(p_apellido)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_apellido LIKE vwproduccionf.apellido
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwproduccionf_apellido_checkColumnConstraints
-
-{<BLOCK Name="fct.vwproduccionf_normalesd_checkColumnConstraints">}
-#+ Check constraints on the "vwproduccionf.normalesd" column
-#+
-#+ @param p_normalesd - DECIMAL(8,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccionf_normalesd_checkColumnConstraints(p_normalesd)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_normalesd LIKE vwproduccionf.normalesd
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwproduccionf_normalesd_checkColumnConstraints
-
-{<BLOCK Name="fct.vwproduccionf_normalesind_checkColumnConstraints">}
-#+ Check constraints on the "vwproduccionf.normalesind" column
-#+
-#+ @param p_normalesind - DECIMAL(8,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccionf_normalesind_checkColumnConstraints(p_normalesind)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_normalesind LIKE vwproduccionf.normalesind
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwproduccionf_normalesind_checkColumnConstraints
-
-{<BLOCK Name="fct.vwproduccionf_extrasdirecta_checkColumnConstraints">}
-#+ Check constraints on the "vwproduccionf.extrasdirecta" column
-#+
-#+ @param p_extrasdirecta - DECIMAL(8,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccionf_extrasdirecta_checkColumnConstraints(p_extrasdirecta)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_extrasdirecta LIKE vwproduccionf.extrasdirecta
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwproduccionf_extrasdirecta_checkColumnConstraints
-
-{<BLOCK Name="fct.vwproduccionf_extrasind_checkColumnConstraints">}
-#+ Check constraints on the "vwproduccionf.extrasind" column
-#+
-#+ @param p_extrasind - DECIMAL(8,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccionf_extrasind_checkColumnConstraints(p_extrasind)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_extrasind LIKE vwproduccionf.extrasind
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwproduccionf_extrasind_checkColumnConstraints
-
-{<BLOCK Name="fct.vwproduccionf_cantidad_checkColumnConstraints">}
-#+ Check constraints on the "vwproduccionf.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccionf_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE vwproduccionf.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwproduccionf_cantidad_checkColumnConstraints
-
-{<BLOCK Name="fct.vwproduccionf_bloque_checkColumnConstraints">}
-#+ Check constraints on the "vwproduccionf.bloque" column
-#+
-#+ @param p_bloque - CHAR(25) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccionf_bloque_checkColumnConstraints(p_bloque)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_bloque LIKE vwproduccionf.bloque
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwproduccionf_bloque_checkColumnConstraints
-
-{<BLOCK Name="fct.vwproduccionf_cantidadprep_checkColumnConstraints">}
-#+ Check constraints on the "vwproduccionf.cantidadprep" column
-#+
-#+ @param p_cantidadprep - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccionf_cantidadprep_checkColumnConstraints(p_cantidadprep)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidadprep LIKE vwproduccionf.cantidadprep
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwproduccionf_cantidadprep_checkColumnConstraints
-
-{<BLOCK Name="fct.vwproduccionf_grupodepto_checkColumnConstraints">}
-#+ Check constraints on the "vwproduccionf.grupodepto" column
-#+
-#+ @param p_grupodepto - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccionf_grupodepto_checkColumnConstraints(p_grupodepto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_grupodepto LIKE vwproduccionf.grupodepto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwproduccionf_grupodepto_checkColumnConstraints
-
-{<BLOCK Name="fct.vwproduccionf_turno_checkColumnConstraints">}
-#+ Check constraints on the "vwproduccionf.turno" column
-#+
-#+ @param p_turno - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccionf_turno_checkColumnConstraints(p_turno)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_turno LIKE vwproduccionf.turno
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwproduccionf_turno_checkColumnConstraints
-
-{<BLOCK Name="fct.vwproduccionf_costolabor_checkColumnConstraints">}
-#+ Check constraints on the "vwproduccionf.costolabor" column
-#+
-#+ @param p_costolabor - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccionf_costolabor_checkColumnConstraints(p_costolabor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_costolabor LIKE vwproduccionf.costolabor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwproduccionf_costolabor_checkColumnConstraints
-
-{<BLOCK Name="fct.vwproduccionf_costogastos_checkColumnConstraints">}
-#+ Check constraints on the "vwproduccionf.costogastos" column
-#+
-#+ @param p_costogastos - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccionf_costogastos_checkColumnConstraints(p_costogastos)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_costogastos LIKE vwproduccionf.costogastos
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwproduccionf_costogastos_checkColumnConstraints
-
-{<BLOCK Name="fct.vwproduccionf_valorlabor_checkColumnConstraints">}
-#+ Check constraints on the "vwproduccionf.valorlabor" column
-#+
-#+ @param p_valorlabor - DECIMAL(25,7) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccionf_valorlabor_checkColumnConstraints(p_valorlabor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valorlabor LIKE vwproduccionf.valorlabor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwproduccionf_valorlabor_checkColumnConstraints
-
-{<BLOCK Name="fct.vwproduccionf_valorgasto_checkColumnConstraints">}
-#+ Check constraints on the "vwproduccionf.valorgasto" column
-#+
-#+ @param p_valorgasto - DECIMAL(25,7) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccionf_valorgasto_checkColumnConstraints(p_valorgasto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valorgasto LIKE vwproduccionf.valorgasto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwproduccionf_valorgasto_checkColumnConstraints
-
-{<BLOCK Name="fct.vwproduccionf_estado_checkColumnConstraints">}
-#+ Check constraints on the "vwproduccionf.estado" column
-#+
-#+ @param p_estado - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccionf_estado_checkColumnConstraints(p_estado)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_estado LIKE vwproduccionf.estado
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwproduccionf_estado_checkColumnConstraints
-
-{<BLOCK Name="fct.vwproduccionf_docalmacen_checkColumnConstraints">}
-#+ Check constraints on the "vwproduccionf.docalmacen" column
-#+
-#+ @param p_docalmacen - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccionf_docalmacen_checkColumnConstraints(p_docalmacen)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_docalmacen LIKE vwproduccionf.docalmacen
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwproduccionf_docalmacen_checkColumnConstraints
-
-{<BLOCK Name="fct.vwproduccionf_cantidadtrx_checkColumnConstraints">}
-#+ Check constraints on the "vwproduccionf.cantidadtrx" column
-#+
-#+ @param p_cantidadtrx - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccionf_cantidadtrx_checkColumnConstraints(p_cantidadtrx)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidadtrx LIKE vwproduccionf.cantidadtrx
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwproduccionf_cantidadtrx_checkColumnConstraints
-
-{<BLOCK Name="fct.vwproduccionf_cod_mov_checkColumnConstraints">}
-#+ Check constraints on the "vwproduccionf.cod_mov" column
-#+
-#+ @param p_cod_mov - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccionf_cod_mov_checkColumnConstraints(p_cod_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mov LIKE vwproduccionf.cod_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwproduccionf_cod_mov_checkColumnConstraints
-
-{<BLOCK Name="fct.vwproduccionf_descrip_mov_checkColumnConstraints">}
-#+ Check constraints on the "vwproduccionf.descrip_mov" column
-#+
-#+ @param p_descrip_mov - VARCHAR2(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccionf_descrip_mov_checkColumnConstraints(p_descrip_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descrip_mov LIKE vwproduccionf.descrip_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwproduccionf_descrip_mov_checkColumnConstraints
-
-{<BLOCK Name="fct.vwproduccionf_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "vwproduccionf.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccionf_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE vwproduccionf.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwproduccionf_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.vwproduccionf_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "vwproduccionf.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccionf_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE vwproduccionf.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwproduccionf_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.vwproduccionf_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "vwproduccionf.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccionf_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE vwproduccionf.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwproduccionf_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.vwproduccionf_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "vwproduccionf.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccionf_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE vwproduccionf.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwproduccionf_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.vwproduccionf_descrip_esp_checkColumnConstraints">}
-#+ Check constraints on the "vwproduccionf.descrip_esp" column
-#+
-#+ @param p_descrip_esp - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccionf_descrip_esp_checkColumnConstraints(p_descrip_esp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descrip_esp LIKE vwproduccionf.descrip_esp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwproduccionf_descrip_esp_checkColumnConstraints
-
-{<BLOCK Name="fct.vwproduccion_checkTableConstraints">}
-#+ Check constraints on the "vwproduccion" table
-#+
-#+ @param p_data - a row data LIKE vwproduccion.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccion_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vwproduccion.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vwproduccion_ano_checkColumnConstraints(p_data.ano) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccion_dia_checkColumnConstraints(p_data.dia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccion_mes_checkColumnConstraints(p_data.mes) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccion_semana_checkColumnConstraints(p_data.semana) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccion_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccion_documento_checkColumnConstraints(p_data.documento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccion_codigosemi_checkColumnConstraints(p_data.codigosemi) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccion_descripcionsemi_checkColumnConstraints(p_data.descripcionsemi) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccion_uniadmed_checkColumnConstraints(p_data.uniadmed) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccion_codigodepto_checkColumnConstraints(p_data.codigodepto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccion_nombredto_checkColumnConstraints(p_data.nombredto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccion_ficha_checkColumnConstraints(p_data.ficha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccion_nombre_checkColumnConstraints(p_data.nombre) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccion_apellido_checkColumnConstraints(p_data.apellido) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccion_normalesd_checkColumnConstraints(p_data.normalesd) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccion_normalesind_checkColumnConstraints(p_data.normalesind) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccion_extrasdirecta_checkColumnConstraints(p_data.extrasdirecta) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccion_extrasind_checkColumnConstraints(p_data.extrasind) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccion_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccion_bloque_checkColumnConstraints(p_data.bloque) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccion_grupodepto_checkColumnConstraints(p_data.grupodepto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccion_turno_checkColumnConstraints(p_data.turno) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccion_expr1_checkColumnConstraints(p_data.expr1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccion_descrip_mov_checkColumnConstraints(p_data.descrip_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccion_cod_mov_checkColumnConstraints(p_data.cod_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccion_expr2_checkColumnConstraints(p_data.expr2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwproduccion_medida_checkColumnConstraints(p_data.medida) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwproduccion_checkTableConstraints
-
-{<BLOCK Name="fct.vwproduccion_ano_checkColumnConstraints">}
-#+ Check constraints on the "vwproduccion.ano" column
-#+
-#+ @param p_ano - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccion_ano_checkColumnConstraints(p_ano)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ano LIKE vwproduccion.ano
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwproduccion_ano_checkColumnConstraints
-
-{<BLOCK Name="fct.vwproduccion_dia_checkColumnConstraints">}
-#+ Check constraints on the "vwproduccion.dia" column
-#+
-#+ @param p_dia - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccion_dia_checkColumnConstraints(p_dia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_dia LIKE vwproduccion.dia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwproduccion_dia_checkColumnConstraints
-
-{<BLOCK Name="fct.vwproduccion_mes_checkColumnConstraints">}
-#+ Check constraints on the "vwproduccion.mes" column
-#+
-#+ @param p_mes - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccion_mes_checkColumnConstraints(p_mes)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mes LIKE vwproduccion.mes
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwproduccion_mes_checkColumnConstraints
-
-{<BLOCK Name="fct.vwproduccion_semana_checkColumnConstraints">}
-#+ Check constraints on the "vwproduccion.semana" column
-#+
-#+ @param p_semana - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccion_semana_checkColumnConstraints(p_semana)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_semana LIKE vwproduccion.semana
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwproduccion_semana_checkColumnConstraints
-
-{<BLOCK Name="fct.vwproduccion_fecha_checkColumnConstraints">}
-#+ Check constraints on the "vwproduccion.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccion_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE vwproduccion.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_fecha IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- fecha: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwproduccion_fecha_checkColumnConstraints
-
-{<BLOCK Name="fct.vwproduccion_documento_checkColumnConstraints">}
-#+ Check constraints on the "vwproduccion.documento" column
-#+
-#+ @param p_documento - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccion_documento_checkColumnConstraints(p_documento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_documento LIKE vwproduccion.documento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_documento IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- documento: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwproduccion_documento_checkColumnConstraints
-
-{<BLOCK Name="fct.vwproduccion_codigosemi_checkColumnConstraints">}
-#+ Check constraints on the "vwproduccion.codigosemi" column
-#+
-#+ @param p_codigosemi - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccion_codigosemi_checkColumnConstraints(p_codigosemi)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codigosemi LIKE vwproduccion.codigosemi
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_codigosemi IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- codigosemi: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwproduccion_codigosemi_checkColumnConstraints
-
-{<BLOCK Name="fct.vwproduccion_descripcionsemi_checkColumnConstraints">}
-#+ Check constraints on the "vwproduccion.descripcionsemi" column
-#+
-#+ @param p_descripcionsemi - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccion_descripcionsemi_checkColumnConstraints(p_descripcionsemi)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcionsemi LIKE vwproduccion.descripcionsemi
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwproduccion_descripcionsemi_checkColumnConstraints
-
-{<BLOCK Name="fct.vwproduccion_uniadmed_checkColumnConstraints">}
-#+ Check constraints on the "vwproduccion.uniadmed" column
-#+
-#+ @param p_uniadmed - CHAR(4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccion_uniadmed_checkColumnConstraints(p_uniadmed)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_uniadmed LIKE vwproduccion.uniadmed
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwproduccion_uniadmed_checkColumnConstraints
-
-{<BLOCK Name="fct.vwproduccion_codigodepto_checkColumnConstraints">}
-#+ Check constraints on the "vwproduccion.codigodepto" column
-#+
-#+ @param p_codigodepto - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccion_codigodepto_checkColumnConstraints(p_codigodepto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codigodepto LIKE vwproduccion.codigodepto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwproduccion_codigodepto_checkColumnConstraints
-
-{<BLOCK Name="fct.vwproduccion_nombredto_checkColumnConstraints">}
-#+ Check constraints on the "vwproduccion.nombredto" column
-#+
-#+ @param p_nombredto - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccion_nombredto_checkColumnConstraints(p_nombredto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombredto LIKE vwproduccion.nombredto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwproduccion_nombredto_checkColumnConstraints
-
-{<BLOCK Name="fct.vwproduccion_ficha_checkColumnConstraints">}
-#+ Check constraints on the "vwproduccion.ficha" column
-#+
-#+ @param p_ficha - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccion_ficha_checkColumnConstraints(p_ficha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ficha LIKE vwproduccion.ficha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_ficha IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- ficha: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwproduccion_ficha_checkColumnConstraints
-
-{<BLOCK Name="fct.vwproduccion_nombre_checkColumnConstraints">}
-#+ Check constraints on the "vwproduccion.nombre" column
-#+
-#+ @param p_nombre - CHAR(15) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccion_nombre_checkColumnConstraints(p_nombre)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombre LIKE vwproduccion.nombre
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwproduccion_nombre_checkColumnConstraints
-
-{<BLOCK Name="fct.vwproduccion_apellido_checkColumnConstraints">}
-#+ Check constraints on the "vwproduccion.apellido" column
-#+
-#+ @param p_apellido - CHAR(15) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccion_apellido_checkColumnConstraints(p_apellido)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_apellido LIKE vwproduccion.apellido
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwproduccion_apellido_checkColumnConstraints
-
-{<BLOCK Name="fct.vwproduccion_normalesd_checkColumnConstraints">}
-#+ Check constraints on the "vwproduccion.normalesd" column
-#+
-#+ @param p_normalesd - DECIMAL(8,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccion_normalesd_checkColumnConstraints(p_normalesd)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_normalesd LIKE vwproduccion.normalesd
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwproduccion_normalesd_checkColumnConstraints
-
-{<BLOCK Name="fct.vwproduccion_normalesind_checkColumnConstraints">}
-#+ Check constraints on the "vwproduccion.normalesind" column
-#+
-#+ @param p_normalesind - DECIMAL(8,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccion_normalesind_checkColumnConstraints(p_normalesind)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_normalesind LIKE vwproduccion.normalesind
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwproduccion_normalesind_checkColumnConstraints
-
-{<BLOCK Name="fct.vwproduccion_extrasdirecta_checkColumnConstraints">}
-#+ Check constraints on the "vwproduccion.extrasdirecta" column
-#+
-#+ @param p_extrasdirecta - DECIMAL(8,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccion_extrasdirecta_checkColumnConstraints(p_extrasdirecta)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_extrasdirecta LIKE vwproduccion.extrasdirecta
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwproduccion_extrasdirecta_checkColumnConstraints
-
-{<BLOCK Name="fct.vwproduccion_extrasind_checkColumnConstraints">}
-#+ Check constraints on the "vwproduccion.extrasind" column
-#+
-#+ @param p_extrasind - DECIMAL(8,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccion_extrasind_checkColumnConstraints(p_extrasind)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_extrasind LIKE vwproduccion.extrasind
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwproduccion_extrasind_checkColumnConstraints
-
-{<BLOCK Name="fct.vwproduccion_cantidad_checkColumnConstraints">}
-#+ Check constraints on the "vwproduccion.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccion_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE vwproduccion.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwproduccion_cantidad_checkColumnConstraints
-
-{<BLOCK Name="fct.vwproduccion_bloque_checkColumnConstraints">}
-#+ Check constraints on the "vwproduccion.bloque" column
-#+
-#+ @param p_bloque - CHAR(25) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccion_bloque_checkColumnConstraints(p_bloque)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_bloque LIKE vwproduccion.bloque
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwproduccion_bloque_checkColumnConstraints
-
-{<BLOCK Name="fct.vwproduccion_grupodepto_checkColumnConstraints">}
-#+ Check constraints on the "vwproduccion.grupodepto" column
-#+
-#+ @param p_grupodepto - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccion_grupodepto_checkColumnConstraints(p_grupodepto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_grupodepto LIKE vwproduccion.grupodepto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwproduccion_grupodepto_checkColumnConstraints
-
-{<BLOCK Name="fct.vwproduccion_turno_checkColumnConstraints">}
-#+ Check constraints on the "vwproduccion.turno" column
-#+
-#+ @param p_turno - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccion_turno_checkColumnConstraints(p_turno)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_turno LIKE vwproduccion.turno
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwproduccion_turno_checkColumnConstraints
-
-{<BLOCK Name="fct.vwproduccion_expr1_checkColumnConstraints">}
-#+ Check constraints on the "vwproduccion.expr1" column
-#+
-#+ @param p_expr1 - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccion_expr1_checkColumnConstraints(p_expr1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_expr1 LIKE vwproduccion.expr1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwproduccion_expr1_checkColumnConstraints
-
-{<BLOCK Name="fct.vwproduccion_descrip_mov_checkColumnConstraints">}
-#+ Check constraints on the "vwproduccion.descrip_mov" column
-#+
-#+ @param p_descrip_mov - VARCHAR2(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccion_descrip_mov_checkColumnConstraints(p_descrip_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descrip_mov LIKE vwproduccion.descrip_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwproduccion_descrip_mov_checkColumnConstraints
-
-{<BLOCK Name="fct.vwproduccion_cod_mov_checkColumnConstraints">}
-#+ Check constraints on the "vwproduccion.cod_mov" column
-#+
-#+ @param p_cod_mov - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccion_cod_mov_checkColumnConstraints(p_cod_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mov LIKE vwproduccion.cod_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwproduccion_cod_mov_checkColumnConstraints
-
-{<BLOCK Name="fct.vwproduccion_expr2_checkColumnConstraints">}
-#+ Check constraints on the "vwproduccion.expr2" column
-#+
-#+ @param p_expr2 - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccion_expr2_checkColumnConstraints(p_expr2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_expr2 LIKE vwproduccion.expr2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwproduccion_expr2_checkColumnConstraints
-
-{<BLOCK Name="fct.vwproduccion_medida_checkColumnConstraints">}
-#+ Check constraints on the "vwproduccion.medida" column
-#+
-#+ @param p_medida - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwproduccion_medida_checkColumnConstraints(p_medida)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_medida LIKE vwproduccion.medida
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwproduccion_medida_checkColumnConstraints
-
-{<BLOCK Name="fct.vwprecios_checkTableConstraints">}
-#+ Check constraints on the "vwprecios" table
-#+
-#+ @param p_data - a row data LIKE vwprecios.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwprecios_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vwprecios.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vwprecios_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwprecios_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwprecios_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwprecios_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwprecios_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwprecios_descrip_esp_checkColumnConstraints(p_data.descrip_esp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwprecios_unidad_med_checkColumnConstraints(p_data.unidad_med) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwprecios_precio_checkColumnConstraints(p_data.precio) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwprecios_simbolo_checkColumnConstraints(p_data.simbolo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwprecios_checkTableConstraints
-
-{<BLOCK Name="fct.vwprecios_descripcion_checkColumnConstraints">}
-#+ Check constraints on the "vwprecios.descripcion" column
-#+
-#+ @param p_descripcion - VARCHAR2(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwprecios_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE vwprecios.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwprecios_descripcion_checkColumnConstraints
-
-{<BLOCK Name="fct.vwprecios_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "vwprecios.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwprecios_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE vwprecios.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_n IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_n: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwprecios_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.vwprecios_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "vwprecios.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwprecios_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE vwprecios.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_grupo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_grupo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwprecios_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.vwprecios_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "vwprecios.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwprecios_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE vwprecios.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_tipo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_tipo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwprecios_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.vwprecios_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "vwprecios.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwprecios_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE vwprecios.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_sec IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_sec: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwprecios_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.vwprecios_descrip_esp_checkColumnConstraints">}
-#+ Check constraints on the "vwprecios.descrip_esp" column
-#+
-#+ @param p_descrip_esp - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwprecios_descrip_esp_checkColumnConstraints(p_descrip_esp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descrip_esp LIKE vwprecios.descrip_esp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_descrip_esp IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- descrip_esp: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwprecios_descrip_esp_checkColumnConstraints
-
-{<BLOCK Name="fct.vwprecios_unidad_med_checkColumnConstraints">}
-#+ Check constraints on the "vwprecios.unidad_med" column
-#+
-#+ @param p_unidad_med - CHAR(4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwprecios_unidad_med_checkColumnConstraints(p_unidad_med)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_unidad_med LIKE vwprecios.unidad_med
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwprecios_unidad_med_checkColumnConstraints
-
-{<BLOCK Name="fct.vwprecios_precio_checkColumnConstraints">}
-#+ Check constraints on the "vwprecios.precio" column
-#+
-#+ @param p_precio - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwprecios_precio_checkColumnConstraints(p_precio)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_precio LIKE vwprecios.precio
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwprecios_precio_checkColumnConstraints
-
-{<BLOCK Name="fct.vwprecios_simbolo_checkColumnConstraints">}
-#+ Check constraints on the "vwprecios.simbolo" column
-#+
-#+ @param p_simbolo - VARCHAR2(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwprecios_simbolo_checkColumnConstraints(p_simbolo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_simbolo LIKE vwprecios.simbolo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwprecios_simbolo_checkColumnConstraints
-
-{<BLOCK Name="fct.vwmatprima_checkTableConstraints">}
-#+ Check constraints on the "vwmatprima" table
-#+
-#+ @param p_data - a row data LIKE vwmatprima.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwmatprima_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vwmatprima.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vwmatprima_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwmatprima_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwmatprima_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwmatprima_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwmatprima_descrip_esp_checkColumnConstraints(p_data.descrip_esp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwmatprima_unidad_med_checkColumnConstraints(p_data.unidad_med) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwmatprima_cod_mov_checkColumnConstraints(p_data.cod_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwmatprima_transaccion_checkColumnConstraints(p_data.transaccion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwmatprima_costo_st_checkColumnConstraints(p_data.costo_st) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwmatprima_valor_checkColumnConstraints(p_data.valor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwmatprima_cantidad_2_checkColumnConstraints(p_data.cantidad_2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwmatprima_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwmatprima_num_doc_checkColumnConstraints(p_data.num_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwmatprima_fact_no_checkColumnConstraints(p_data.fact_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwmatprima_conduce_no_checkColumnConstraints(p_data.conduce_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwmatprima_orden_compra_checkColumnConstraints(p_data.orden_compra) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwmatprima_tipo_checkColumnConstraints(p_data.tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwmatprima_ano_checkColumnConstraints(p_data.ano) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwmatprima_numero_mes_checkColumnConstraints(p_data.numero_mes) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwmatprima_mes_checkColumnConstraints(p_data.mes) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwmatprima_depto_a_checkColumnConstraints(p_data.depto_a) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwmatprima_nom_dpto_checkColumnConstraints(p_data.nom_dpto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwmatprima_origen_checkColumnConstraints(p_data.origen) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwmatprima_existencia_checkColumnConstraints(p_data.existencia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwmatprima_checkTableConstraints
-
-{<BLOCK Name="fct.vwmatprima_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "vwmatprima.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwmatprima_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE vwmatprima.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_n IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_n: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwmatprima_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.vwmatprima_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "vwmatprima.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwmatprima_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE vwmatprima.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_grupo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_grupo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwmatprima_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.vwmatprima_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "vwmatprima.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwmatprima_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE vwmatprima.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_tipo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_tipo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwmatprima_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.vwmatprima_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "vwmatprima.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwmatprima_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE vwmatprima.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_sec IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_sec: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwmatprima_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.vwmatprima_descrip_esp_checkColumnConstraints">}
-#+ Check constraints on the "vwmatprima.descrip_esp" column
-#+
-#+ @param p_descrip_esp - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwmatprima_descrip_esp_checkColumnConstraints(p_descrip_esp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descrip_esp LIKE vwmatprima.descrip_esp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_descrip_esp IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- descrip_esp: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwmatprima_descrip_esp_checkColumnConstraints
-
-{<BLOCK Name="fct.vwmatprima_unidad_med_checkColumnConstraints">}
-#+ Check constraints on the "vwmatprima.unidad_med" column
-#+
-#+ @param p_unidad_med - CHAR(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwmatprima_unidad_med_checkColumnConstraints(p_unidad_med)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_unidad_med LIKE vwmatprima.unidad_med
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwmatprima_unidad_med_checkColumnConstraints
-
-{<BLOCK Name="fct.vwmatprima_cod_mov_checkColumnConstraints">}
-#+ Check constraints on the "vwmatprima.cod_mov" column
-#+
-#+ @param p_cod_mov - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwmatprima_cod_mov_checkColumnConstraints(p_cod_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mov LIKE vwmatprima.cod_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_mov IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_mov: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwmatprima_cod_mov_checkColumnConstraints
-
-{<BLOCK Name="fct.vwmatprima_transaccion_checkColumnConstraints">}
-#+ Check constraints on the "vwmatprima.transaccion" column
-#+
-#+ @param p_transaccion - VARCHAR2(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwmatprima_transaccion_checkColumnConstraints(p_transaccion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_transaccion LIKE vwmatprima.transaccion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwmatprima_transaccion_checkColumnConstraints
-
-{<BLOCK Name="fct.vwmatprima_costo_st_checkColumnConstraints">}
-#+ Check constraints on the "vwmatprima.costo_st" column
-#+
-#+ @param p_costo_st - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwmatprima_costo_st_checkColumnConstraints(p_costo_st)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_costo_st LIKE vwmatprima.costo_st
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwmatprima_costo_st_checkColumnConstraints
-
-{<BLOCK Name="fct.vwmatprima_valor_checkColumnConstraints">}
-#+ Check constraints on the "vwmatprima.valor" column
-#+
-#+ @param p_valor - DECIMAL(23,6) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwmatprima_valor_checkColumnConstraints(p_valor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valor LIKE vwmatprima.valor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwmatprima_valor_checkColumnConstraints
-
-{<BLOCK Name="fct.vwmatprima_cantidad_2_checkColumnConstraints">}
-#+ Check constraints on the "vwmatprima.cantidad_2" column
-#+
-#+ @param p_cantidad_2 - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwmatprima_cantidad_2_checkColumnConstraints(p_cantidad_2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad_2 LIKE vwmatprima.cantidad_2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwmatprima_cantidad_2_checkColumnConstraints
-
-{<BLOCK Name="fct.vwmatprima_fecha_checkColumnConstraints">}
-#+ Check constraints on the "vwmatprima.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwmatprima_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE vwmatprima.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwmatprima_fecha_checkColumnConstraints
-
-{<BLOCK Name="fct.vwmatprima_num_doc_checkColumnConstraints">}
-#+ Check constraints on the "vwmatprima.num_doc" column
-#+
-#+ @param p_num_doc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwmatprima_num_doc_checkColumnConstraints(p_num_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_doc LIKE vwmatprima.num_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_num_doc IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- num_doc: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwmatprima_num_doc_checkColumnConstraints
-
-{<BLOCK Name="fct.vwmatprima_fact_no_checkColumnConstraints">}
-#+ Check constraints on the "vwmatprima.fact_no" column
-#+
-#+ @param p_fact_no - VARCHAR2(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwmatprima_fact_no_checkColumnConstraints(p_fact_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fact_no LIKE vwmatprima.fact_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwmatprima_fact_no_checkColumnConstraints
-
-{<BLOCK Name="fct.vwmatprima_conduce_no_checkColumnConstraints">}
-#+ Check constraints on the "vwmatprima.conduce_no" column
-#+
-#+ @param p_conduce_no - VARCHAR2(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwmatprima_conduce_no_checkColumnConstraints(p_conduce_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_conduce_no LIKE vwmatprima.conduce_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwmatprima_conduce_no_checkColumnConstraints
-
-{<BLOCK Name="fct.vwmatprima_orden_compra_checkColumnConstraints">}
-#+ Check constraints on the "vwmatprima.orden_compra" column
-#+
-#+ @param p_orden_compra - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwmatprima_orden_compra_checkColumnConstraints(p_orden_compra)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_orden_compra LIKE vwmatprima.orden_compra
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwmatprima_orden_compra_checkColumnConstraints
-
-{<BLOCK Name="fct.vwmatprima_tipo_checkColumnConstraints">}
-#+ Check constraints on the "vwmatprima.tipo" column
-#+
-#+ @param p_tipo - VARCHAR2(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwmatprima_tipo_checkColumnConstraints(p_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo LIKE vwmatprima.tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwmatprima_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.vwmatprima_ano_checkColumnConstraints">}
-#+ Check constraints on the "vwmatprima.ano" column
-#+
-#+ @param p_ano - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwmatprima_ano_checkColumnConstraints(p_ano)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ano LIKE vwmatprima.ano
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwmatprima_ano_checkColumnConstraints
-
-{<BLOCK Name="fct.vwmatprima_numero_mes_checkColumnConstraints">}
-#+ Check constraints on the "vwmatprima.numero_mes" column
-#+
-#+ @param p_numero_mes - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwmatprima_numero_mes_checkColumnConstraints(p_numero_mes)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_numero_mes LIKE vwmatprima.numero_mes
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwmatprima_numero_mes_checkColumnConstraints
-
-{<BLOCK Name="fct.vwmatprima_mes_checkColumnConstraints">}
-#+ Check constraints on the "vwmatprima.mes" column
-#+
-#+ @param p_mes - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwmatprima_mes_checkColumnConstraints(p_mes)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mes LIKE vwmatprima.mes
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwmatprima_mes_checkColumnConstraints
-
-{<BLOCK Name="fct.vwmatprima_depto_a_checkColumnConstraints">}
-#+ Check constraints on the "vwmatprima.depto_a" column
-#+
-#+ @param p_depto_a - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwmatprima_depto_a_checkColumnConstraints(p_depto_a)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_depto_a LIKE vwmatprima.depto_a
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwmatprima_depto_a_checkColumnConstraints
-
-{<BLOCK Name="fct.vwmatprima_nom_dpto_checkColumnConstraints">}
-#+ Check constraints on the "vwmatprima.nom_dpto" column
-#+
-#+ @param p_nom_dpto - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwmatprima_nom_dpto_checkColumnConstraints(p_nom_dpto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nom_dpto LIKE vwmatprima.nom_dpto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwmatprima_nom_dpto_checkColumnConstraints
-
-{<BLOCK Name="fct.vwmatprima_origen_checkColumnConstraints">}
-#+ Check constraints on the "vwmatprima.origen" column
-#+
-#+ @param p_origen - VARCHAR2(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwmatprima_origen_checkColumnConstraints(p_origen)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_origen LIKE vwmatprima.origen
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_origen IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- origen: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwmatprima_origen_checkColumnConstraints
-
-{<BLOCK Name="fct.vwmatprima_existencia_checkColumnConstraints">}
-#+ Check constraints on the "vwmatprima.existencia" column
-#+
-#+ @param p_existencia - DECIMAL(38,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwmatprima_existencia_checkColumnConstraints(p_existencia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_existencia LIKE vwmatprima.existencia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwmatprima_existencia_checkColumnConstraints
-
-{<BLOCK Name="fct.vwipprodterm_checkTableConstraints">}
-#+ Check constraints on the "vwipprodterm" table
-#+
-#+ @param p_data - a row data LIKE vwipprodterm.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwipprodterm_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vwipprodterm.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vwipprodterm_ano_checkColumnConstraints(p_data.ano) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwipprodterm_mes_checkColumnConstraints(p_data.mes) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwipprodterm_mes_orden_checkColumnConstraints(p_data.mes_orden) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwipprodterm_cod_origen_checkColumnConstraints(p_data.cod_origen) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwipprodterm_origen_checkColumnConstraints(p_data.origen) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwipprodterm_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwipprodterm_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwipprodterm_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwipprodterm_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwipprodterm_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwipprodterm_unidad_med_checkColumnConstraints(p_data.unidad_med) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwipprodterm_numero_doc_checkColumnConstraints(p_data.numero_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwipprodterm_orden_compra_checkColumnConstraints(p_data.orden_compra) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwipprodterm_orden_pedido_checkColumnConstraints(p_data.orden_pedido) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwipprodterm_codigo_mov_checkColumnConstraints(p_data.codigo_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwipprodterm_descripcion_mov_checkColumnConstraints(p_data.descripcion_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwipprodterm_cantidad1_checkColumnConstraints(p_data.cantidad1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwipprodterm_cantidad2_checkColumnConstraints(p_data.cantidad2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwipprodterm_costo_standard_checkColumnConstraints(p_data.costo_standard) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwipprodterm_valorstd_checkColumnConstraints(p_data.valorstd) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwipprodterm_producto_checkColumnConstraints(p_data.producto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwipprodterm_checkTableConstraints
-
-{<BLOCK Name="fct.vwipprodterm_ano_checkColumnConstraints">}
-#+ Check constraints on the "vwipprodterm.ano" column
-#+
-#+ @param p_ano - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwipprodterm_ano_checkColumnConstraints(p_ano)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ano LIKE vwipprodterm.ano
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwipprodterm_ano_checkColumnConstraints
-
-{<BLOCK Name="fct.vwipprodterm_mes_checkColumnConstraints">}
-#+ Check constraints on the "vwipprodterm.mes" column
-#+
-#+ @param p_mes - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwipprodterm_mes_checkColumnConstraints(p_mes)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mes LIKE vwipprodterm.mes
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwipprodterm_mes_checkColumnConstraints
-
-{<BLOCK Name="fct.vwipprodterm_mes_orden_checkColumnConstraints">}
-#+ Check constraints on the "vwipprodterm.mes_orden" column
-#+
-#+ @param p_mes_orden - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwipprodterm_mes_orden_checkColumnConstraints(p_mes_orden)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mes_orden LIKE vwipprodterm.mes_orden
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwipprodterm_mes_orden_checkColumnConstraints
-
-{<BLOCK Name="fct.vwipprodterm_cod_origen_checkColumnConstraints">}
-#+ Check constraints on the "vwipprodterm.cod_origen" column
-#+
-#+ @param p_cod_origen - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwipprodterm_cod_origen_checkColumnConstraints(p_cod_origen)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_origen LIKE vwipprodterm.cod_origen
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_origen IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_origen: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwipprodterm_cod_origen_checkColumnConstraints
-
-{<BLOCK Name="fct.vwipprodterm_origen_checkColumnConstraints">}
-#+ Check constraints on the "vwipprodterm.origen" column
-#+
-#+ @param p_origen - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwipprodterm_origen_checkColumnConstraints(p_origen)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_origen LIKE vwipprodterm.origen
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwipprodterm_origen_checkColumnConstraints
-
-{<BLOCK Name="fct.vwipprodterm_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "vwipprodterm.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwipprodterm_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE vwipprodterm.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_n IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_n: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwipprodterm_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.vwipprodterm_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "vwipprodterm.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwipprodterm_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE vwipprodterm.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_grupo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_grupo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwipprodterm_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.vwipprodterm_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "vwipprodterm.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwipprodterm_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE vwipprodterm.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_tipo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_tipo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwipprodterm_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.vwipprodterm_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "vwipprodterm.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwipprodterm_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE vwipprodterm.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_sec IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_sec: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwipprodterm_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.vwipprodterm_descripcion_checkColumnConstraints">}
-#+ Check constraints on the "vwipprodterm.descripcion" column
-#+
-#+ @param p_descripcion - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwipprodterm_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE vwipprodterm.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_descripcion IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- descripcion: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwipprodterm_descripcion_checkColumnConstraints
-
-{<BLOCK Name="fct.vwipprodterm_unidad_med_checkColumnConstraints">}
-#+ Check constraints on the "vwipprodterm.unidad_med" column
-#+
-#+ @param p_unidad_med - CHAR(4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwipprodterm_unidad_med_checkColumnConstraints(p_unidad_med)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_unidad_med LIKE vwipprodterm.unidad_med
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwipprodterm_unidad_med_checkColumnConstraints
-
-{<BLOCK Name="fct.vwipprodterm_numero_doc_checkColumnConstraints">}
-#+ Check constraints on the "vwipprodterm.numero_doc" column
-#+
-#+ @param p_numero_doc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwipprodterm_numero_doc_checkColumnConstraints(p_numero_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_numero_doc LIKE vwipprodterm.numero_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_numero_doc IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- numero_doc: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwipprodterm_numero_doc_checkColumnConstraints
-
-{<BLOCK Name="fct.vwipprodterm_orden_compra_checkColumnConstraints">}
-#+ Check constraints on the "vwipprodterm.orden_compra" column
-#+
-#+ @param p_orden_compra - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwipprodterm_orden_compra_checkColumnConstraints(p_orden_compra)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_orden_compra LIKE vwipprodterm.orden_compra
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwipprodterm_orden_compra_checkColumnConstraints
-
-{<BLOCK Name="fct.vwipprodterm_orden_pedido_checkColumnConstraints">}
-#+ Check constraints on the "vwipprodterm.orden_pedido" column
-#+
-#+ @param p_orden_pedido - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwipprodterm_orden_pedido_checkColumnConstraints(p_orden_pedido)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_orden_pedido LIKE vwipprodterm.orden_pedido
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwipprodterm_orden_pedido_checkColumnConstraints
-
-{<BLOCK Name="fct.vwipprodterm_codigo_mov_checkColumnConstraints">}
-#+ Check constraints on the "vwipprodterm.codigo_mov" column
-#+
-#+ @param p_codigo_mov - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwipprodterm_codigo_mov_checkColumnConstraints(p_codigo_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codigo_mov LIKE vwipprodterm.codigo_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_codigo_mov IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- codigo_mov: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwipprodterm_codigo_mov_checkColumnConstraints
-
-{<BLOCK Name="fct.vwipprodterm_descripcion_mov_checkColumnConstraints">}
-#+ Check constraints on the "vwipprodterm.descripcion_mov" column
-#+
-#+ @param p_descripcion_mov - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwipprodterm_descripcion_mov_checkColumnConstraints(p_descripcion_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion_mov LIKE vwipprodterm.descripcion_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwipprodterm_descripcion_mov_checkColumnConstraints
-
-{<BLOCK Name="fct.vwipprodterm_cantidad1_checkColumnConstraints">}
-#+ Check constraints on the "vwipprodterm.cantidad1" column
-#+
-#+ @param p_cantidad1 - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwipprodterm_cantidad1_checkColumnConstraints(p_cantidad1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad1 LIKE vwipprodterm.cantidad1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwipprodterm_cantidad1_checkColumnConstraints
-
-{<BLOCK Name="fct.vwipprodterm_cantidad2_checkColumnConstraints">}
-#+ Check constraints on the "vwipprodterm.cantidad2" column
-#+
-#+ @param p_cantidad2 - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwipprodterm_cantidad2_checkColumnConstraints(p_cantidad2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad2 LIKE vwipprodterm.cantidad2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cantidad2 IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cantidad2: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwipprodterm_cantidad2_checkColumnConstraints
-
-{<BLOCK Name="fct.vwipprodterm_costo_standard_checkColumnConstraints">}
-#+ Check constraints on the "vwipprodterm.costo_standard" column
-#+
-#+ @param p_costo_standard - DECIMAL(14,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwipprodterm_costo_standard_checkColumnConstraints(p_costo_standard)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_costo_standard LIKE vwipprodterm.costo_standard
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwipprodterm_costo_standard_checkColumnConstraints
-
-{<BLOCK Name="fct.vwipprodterm_valorstd_checkColumnConstraints">}
-#+ Check constraints on the "vwipprodterm.valorstd" column
-#+
-#+ @param p_valorstd - DECIMAL(27,9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwipprodterm_valorstd_checkColumnConstraints(p_valorstd)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valorstd LIKE vwipprodterm.valorstd
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwipprodterm_valorstd_checkColumnConstraints
-
-{<BLOCK Name="fct.vwipprodterm_producto_checkColumnConstraints">}
-#+ Check constraints on the "vwipprodterm.producto" column
-#+
-#+ @param p_producto - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwipprodterm_producto_checkColumnConstraints(p_producto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_producto LIKE vwipprodterm.producto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwipprodterm_producto_checkColumnConstraints
-
-{<BLOCK Name="fct.vwipconteopda_checkTableConstraints">}
-#+ Check constraints on the "vwipconteopda" table
-#+
-#+ @param p_data - a row data LIKE vwipconteopda.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwipconteopda_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vwipconteopda.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vwipconteopda_idtrx_checkColumnConstraints(p_data.idtrx) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwipconteopda_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwipconteopda_bodega_checkColumnConstraints(p_data.bodega) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwipconteopda_cod_seccion_checkColumnConstraints(p_data.cod_seccion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwipconteopda_cod_tramo_checkColumnConstraints(p_data.cod_tramo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwipconteopda_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwipconteopda_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwipconteopda_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwipconteopda_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwipconteopda_descrip_esp_checkColumnConstraints(p_data.descrip_esp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwipconteopda_almacen_checkColumnConstraints(p_data.almacen) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwipconteopda_seccion_checkColumnConstraints(p_data.seccion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwipconteopda_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwipconteopda_usariopda_checkColumnConstraints(p_data.usariopda) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwipconteopda_fecharegistro_checkColumnConstraints(p_data.fecharegistro) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwipconteopda_checkTableConstraints
-
-{<BLOCK Name="fct.vwipconteopda_idtrx_checkColumnConstraints">}
-#+ Check constraints on the "vwipconteopda.idtrx" column
-#+
-#+ @param p_idtrx - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwipconteopda_idtrx_checkColumnConstraints(p_idtrx)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_idtrx LIKE vwipconteopda.idtrx
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwipconteopda_idtrx_checkColumnConstraints
-
-{<BLOCK Name="fct.vwipconteopda_fecha_checkColumnConstraints">}
-#+ Check constraints on the "vwipconteopda.fecha" column
-#+
-#+ @param p_fecha - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwipconteopda_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE vwipconteopda.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwipconteopda_fecha_checkColumnConstraints
-
-{<BLOCK Name="fct.vwipconteopda_bodega_checkColumnConstraints">}
-#+ Check constraints on the "vwipconteopda.bodega" column
-#+
-#+ @param p_bodega - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwipconteopda_bodega_checkColumnConstraints(p_bodega)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_bodega LIKE vwipconteopda.bodega
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwipconteopda_bodega_checkColumnConstraints
-
-{<BLOCK Name="fct.vwipconteopda_cod_seccion_checkColumnConstraints">}
-#+ Check constraints on the "vwipconteopda.cod_seccion" column
-#+
-#+ @param p_cod_seccion - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwipconteopda_cod_seccion_checkColumnConstraints(p_cod_seccion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_seccion LIKE vwipconteopda.cod_seccion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwipconteopda_cod_seccion_checkColumnConstraints
-
-{<BLOCK Name="fct.vwipconteopda_cod_tramo_checkColumnConstraints">}
-#+ Check constraints on the "vwipconteopda.cod_tramo" column
-#+
-#+ @param p_cod_tramo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwipconteopda_cod_tramo_checkColumnConstraints(p_cod_tramo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tramo LIKE vwipconteopda.cod_tramo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwipconteopda_cod_tramo_checkColumnConstraints
-
-{<BLOCK Name="fct.vwipconteopda_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "vwipconteopda.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwipconteopda_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE vwipconteopda.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwipconteopda_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.vwipconteopda_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "vwipconteopda.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwipconteopda_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE vwipconteopda.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwipconteopda_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.vwipconteopda_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "vwipconteopda.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwipconteopda_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE vwipconteopda.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwipconteopda_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.vwipconteopda_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "vwipconteopda.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwipconteopda_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE vwipconteopda.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwipconteopda_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.vwipconteopda_descrip_esp_checkColumnConstraints">}
-#+ Check constraints on the "vwipconteopda.descrip_esp" column
-#+
-#+ @param p_descrip_esp - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwipconteopda_descrip_esp_checkColumnConstraints(p_descrip_esp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descrip_esp LIKE vwipconteopda.descrip_esp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_descrip_esp IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- descrip_esp: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwipconteopda_descrip_esp_checkColumnConstraints
-
-{<BLOCK Name="fct.vwipconteopda_almacen_checkColumnConstraints">}
-#+ Check constraints on the "vwipconteopda.almacen" column
-#+
-#+ @param p_almacen - VARCHAR2(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwipconteopda_almacen_checkColumnConstraints(p_almacen)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_almacen LIKE vwipconteopda.almacen
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwipconteopda_almacen_checkColumnConstraints
-
-{<BLOCK Name="fct.vwipconteopda_seccion_checkColumnConstraints">}
-#+ Check constraints on the "vwipconteopda.seccion" column
-#+
-#+ @param p_seccion - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwipconteopda_seccion_checkColumnConstraints(p_seccion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_seccion LIKE vwipconteopda.seccion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwipconteopda_seccion_checkColumnConstraints
-
-{<BLOCK Name="fct.vwipconteopda_cantidad_checkColumnConstraints">}
-#+ Check constraints on the "vwipconteopda.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwipconteopda_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE vwipconteopda.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwipconteopda_cantidad_checkColumnConstraints
-
-{<BLOCK Name="fct.vwipconteopda_usariopda_checkColumnConstraints">}
-#+ Check constraints on the "vwipconteopda.usariopda" column
-#+
-#+ @param p_usariopda - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwipconteopda_usariopda_checkColumnConstraints(p_usariopda)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_usariopda LIKE vwipconteopda.usariopda
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwipconteopda_usariopda_checkColumnConstraints
-
-{<BLOCK Name="fct.vwipconteopda_fecharegistro_checkColumnConstraints">}
-#+ Check constraints on the "vwipconteopda.fecharegistro" column
-#+
-#+ @param p_fecharegistro - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwipconteopda_fecharegistro_checkColumnConstraints(p_fecharegistro)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecharegistro LIKE vwipconteopda.fecharegistro
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwipconteopda_fecharegistro_checkColumnConstraints
-
-{<BLOCK Name="fct.vwestadoordenes_checkTableConstraints">}
-#+ Check constraints on the "vwestadoordenes" table
-#+
-#+ @param p_data - a row data LIKE vwestadoordenes.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwestadoordenes_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vwestadoordenes.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vwestadoordenes_orden_checkColumnConstraints(p_data.orden) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwestadoordenes_fecha_orden_checkColumnConstraints(p_data.fecha_orden) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwestadoordenes_estatus_checkColumnConstraints(p_data.estatus) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwestadoordenes_cliente_checkColumnConstraints(p_data.cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwestadoordenes_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwestadoordenes_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwestadoordenes_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwestadoordenes_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwestadoordenes_producto_checkColumnConstraints(p_data.producto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwestadoordenes_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwestadoordenes_ano_checkColumnConstraints(p_data.ano) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwestadoordenes_numero_mes_checkColumnConstraints(p_data.numero_mes) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwestadoordenes_mes_checkColumnConstraints(p_data.mes) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwestadoordenes_cantidaddespacho_checkColumnConstraints(p_data.cantidaddespacho) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwestadoordenes_num_doc_checkColumnConstraints(p_data.num_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwestadoordenes_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwestadoordenes_cod_mov_checkColumnConstraints(p_data.cod_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwestadoordenes_detalle_checkColumnConstraints(p_data.detalle) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwestadoordenes_area_checkColumnConstraints(p_data.area) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwestadoordenes_vendedor_checkColumnConstraints(p_data.vendedor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwestadoordenes_cotizacion_no_checkColumnConstraints(p_data.cotizacion_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwestadoordenes_fecha_compromiso_checkColumnConstraints(p_data.fecha_compromiso) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwestadoordenes_estado_produccion_checkColumnConstraints(p_data.estado_produccion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwestadoordenes_checkTableConstraints
-
-{<BLOCK Name="fct.vwestadoordenes_orden_checkColumnConstraints">}
-#+ Check constraints on the "vwestadoordenes.orden" column
-#+
-#+ @param p_orden - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwestadoordenes_orden_checkColumnConstraints(p_orden)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_orden LIKE vwestadoordenes.orden
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_orden IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- orden: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwestadoordenes_orden_checkColumnConstraints
-
-{<BLOCK Name="fct.vwestadoordenes_fecha_orden_checkColumnConstraints">}
-#+ Check constraints on the "vwestadoordenes.fecha_orden" column
-#+
-#+ @param p_fecha_orden - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwestadoordenes_fecha_orden_checkColumnConstraints(p_fecha_orden)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_orden LIKE vwestadoordenes.fecha_orden
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_fecha_orden IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- fecha_orden: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwestadoordenes_fecha_orden_checkColumnConstraints
-
-{<BLOCK Name="fct.vwestadoordenes_estatus_checkColumnConstraints">}
-#+ Check constraints on the "vwestadoordenes.estatus" column
-#+
-#+ @param p_estatus - VARCHAR2(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwestadoordenes_estatus_checkColumnConstraints(p_estatus)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_estatus LIKE vwestadoordenes.estatus
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_estatus IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- estatus: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwestadoordenes_estatus_checkColumnConstraints
-
-{<BLOCK Name="fct.vwestadoordenes_cliente_checkColumnConstraints">}
-#+ Check constraints on the "vwestadoordenes.cliente" column
-#+
-#+ @param p_cliente - CHAR(100) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwestadoordenes_cliente_checkColumnConstraints(p_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cliente LIKE vwestadoordenes.cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwestadoordenes_cliente_checkColumnConstraints
-
-{<BLOCK Name="fct.vwestadoordenes_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "vwestadoordenes.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwestadoordenes_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE vwestadoordenes.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_n IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_n: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwestadoordenes_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.vwestadoordenes_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "vwestadoordenes.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwestadoordenes_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE vwestadoordenes.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_grupo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_grupo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwestadoordenes_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.vwestadoordenes_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "vwestadoordenes.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwestadoordenes_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE vwestadoordenes.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_tipo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_tipo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwestadoordenes_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.vwestadoordenes_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "vwestadoordenes.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwestadoordenes_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE vwestadoordenes.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_sec IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_sec: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwestadoordenes_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.vwestadoordenes_producto_checkColumnConstraints">}
-#+ Check constraints on the "vwestadoordenes.producto" column
-#+
-#+ @param p_producto - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwestadoordenes_producto_checkColumnConstraints(p_producto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_producto LIKE vwestadoordenes.producto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_producto IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- producto: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwestadoordenes_producto_checkColumnConstraints
-
-{<BLOCK Name="fct.vwestadoordenes_cantidad_checkColumnConstraints">}
-#+ Check constraints on the "vwestadoordenes.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwestadoordenes_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE vwestadoordenes.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwestadoordenes_cantidad_checkColumnConstraints
-
-{<BLOCK Name="fct.vwestadoordenes_ano_checkColumnConstraints">}
-#+ Check constraints on the "vwestadoordenes.ano" column
-#+
-#+ @param p_ano - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwestadoordenes_ano_checkColumnConstraints(p_ano)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ano LIKE vwestadoordenes.ano
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwestadoordenes_ano_checkColumnConstraints
-
-{<BLOCK Name="fct.vwestadoordenes_numero_mes_checkColumnConstraints">}
-#+ Check constraints on the "vwestadoordenes.numero_mes" column
-#+
-#+ @param p_numero_mes - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwestadoordenes_numero_mes_checkColumnConstraints(p_numero_mes)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_numero_mes LIKE vwestadoordenes.numero_mes
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwestadoordenes_numero_mes_checkColumnConstraints
-
-{<BLOCK Name="fct.vwestadoordenes_mes_checkColumnConstraints">}
-#+ Check constraints on the "vwestadoordenes.mes" column
-#+
-#+ @param p_mes - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwestadoordenes_mes_checkColumnConstraints(p_mes)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mes LIKE vwestadoordenes.mes
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwestadoordenes_mes_checkColumnConstraints
-
-{<BLOCK Name="fct.vwestadoordenes_cantidaddespacho_checkColumnConstraints">}
-#+ Check constraints on the "vwestadoordenes.cantidaddespacho" column
-#+
-#+ @param p_cantidaddespacho - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwestadoordenes_cantidaddespacho_checkColumnConstraints(p_cantidaddespacho)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidaddespacho LIKE vwestadoordenes.cantidaddespacho
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwestadoordenes_cantidaddespacho_checkColumnConstraints
-
-{<BLOCK Name="fct.vwestadoordenes_num_doc_checkColumnConstraints">}
-#+ Check constraints on the "vwestadoordenes.num_doc" column
-#+
-#+ @param p_num_doc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwestadoordenes_num_doc_checkColumnConstraints(p_num_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_doc LIKE vwestadoordenes.num_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwestadoordenes_num_doc_checkColumnConstraints
-
-{<BLOCK Name="fct.vwestadoordenes_fecha_checkColumnConstraints">}
-#+ Check constraints on the "vwestadoordenes.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwestadoordenes_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE vwestadoordenes.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwestadoordenes_fecha_checkColumnConstraints
-
-{<BLOCK Name="fct.vwestadoordenes_cod_mov_checkColumnConstraints">}
-#+ Check constraints on the "vwestadoordenes.cod_mov" column
-#+
-#+ @param p_cod_mov - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwestadoordenes_cod_mov_checkColumnConstraints(p_cod_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mov LIKE vwestadoordenes.cod_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwestadoordenes_cod_mov_checkColumnConstraints
-
-{<BLOCK Name="fct.vwestadoordenes_detalle_checkColumnConstraints">}
-#+ Check constraints on the "vwestadoordenes.detalle" column
-#+
-#+ @param p_detalle - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwestadoordenes_detalle_checkColumnConstraints(p_detalle)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_detalle LIKE vwestadoordenes.detalle
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwestadoordenes_detalle_checkColumnConstraints
-
-{<BLOCK Name="fct.vwestadoordenes_area_checkColumnConstraints">}
-#+ Check constraints on the "vwestadoordenes.area" column
-#+
-#+ @param p_area - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwestadoordenes_area_checkColumnConstraints(p_area)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_area LIKE vwestadoordenes.area
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwestadoordenes_area_checkColumnConstraints
-
-{<BLOCK Name="fct.vwestadoordenes_vendedor_checkColumnConstraints">}
-#+ Check constraints on the "vwestadoordenes.vendedor" column
-#+
-#+ @param p_vendedor - VARCHAR2(63) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwestadoordenes_vendedor_checkColumnConstraints(p_vendedor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_vendedor LIKE vwestadoordenes.vendedor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwestadoordenes_vendedor_checkColumnConstraints
-
-{<BLOCK Name="fct.vwestadoordenes_cotizacion_no_checkColumnConstraints">}
-#+ Check constraints on the "vwestadoordenes.cotizacion_no" column
-#+
-#+ @param p_cotizacion_no - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwestadoordenes_cotizacion_no_checkColumnConstraints(p_cotizacion_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cotizacion_no LIKE vwestadoordenes.cotizacion_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwestadoordenes_cotizacion_no_checkColumnConstraints
-
-{<BLOCK Name="fct.vwestadoordenes_fecha_compromiso_checkColumnConstraints">}
-#+ Check constraints on the "vwestadoordenes.fecha_compromiso" column
-#+
-#+ @param p_fecha_compromiso - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwestadoordenes_fecha_compromiso_checkColumnConstraints(p_fecha_compromiso)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_compromiso LIKE vwestadoordenes.fecha_compromiso
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwestadoordenes_fecha_compromiso_checkColumnConstraints
-
-{<BLOCK Name="fct.vwestadoordenes_estado_produccion_checkColumnConstraints">}
-#+ Check constraints on the "vwestadoordenes.estado_produccion" column
-#+
-#+ @param p_estado_produccion - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwestadoordenes_estado_produccion_checkColumnConstraints(p_estado_produccion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_estado_produccion LIKE vwestadoordenes.estado_produccion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwestadoordenes_estado_produccion_checkColumnConstraints
-
-{<BLOCK Name="fct.vwestado_checkTableConstraints">}
-#+ Check constraints on the "vwestado" table
-#+
-#+ @param p_data - a row data LIKE vwestado.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwestado_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vwestado.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vwestado_cuenta_no_checkColumnConstraints(p_data.cuenta_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwestado_estado_a_checkColumnConstraints(p_data.estado_a) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwestado_estado_m_checkColumnConstraints(p_data.estado_m) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwestado_balance_ant_checkColumnConstraints(p_data.balance_ant) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwestado_actividad_checkColumnConstraints(p_data.actividad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwestado_balance_act_checkColumnConstraints(p_data.balance_act) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwestado_checkTableConstraints
-
-{<BLOCK Name="fct.vwestado_cuenta_no_checkColumnConstraints">}
-#+ Check constraints on the "vwestado.cuenta_no" column
-#+
-#+ @param p_cuenta_no - CHAR(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwestado_cuenta_no_checkColumnConstraints(p_cuenta_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cuenta_no LIKE vwestado.cuenta_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwestado_cuenta_no_checkColumnConstraints
-
-{<BLOCK Name="fct.vwestado_estado_a_checkColumnConstraints">}
-#+ Check constraints on the "vwestado.estado_a" column
-#+
-#+ @param p_estado_a - CHAR(4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwestado_estado_a_checkColumnConstraints(p_estado_a)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_estado_a LIKE vwestado.estado_a
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwestado_estado_a_checkColumnConstraints
-
-{<BLOCK Name="fct.vwestado_estado_m_checkColumnConstraints">}
-#+ Check constraints on the "vwestado.estado_m" column
-#+
-#+ @param p_estado_m - CHAR(4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwestado_estado_m_checkColumnConstraints(p_estado_m)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_estado_m LIKE vwestado.estado_m
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwestado_estado_m_checkColumnConstraints
-
-{<BLOCK Name="fct.vwestado_balance_ant_checkColumnConstraints">}
-#+ Check constraints on the "vwestado.balance_ant" column
-#+
-#+ @param p_balance_ant - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwestado_balance_ant_checkColumnConstraints(p_balance_ant)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_balance_ant LIKE vwestado.balance_ant
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwestado_balance_ant_checkColumnConstraints
-
-{<BLOCK Name="fct.vwestado_actividad_checkColumnConstraints">}
-#+ Check constraints on the "vwestado.actividad" column
-#+
-#+ @param p_actividad - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwestado_actividad_checkColumnConstraints(p_actividad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_actividad LIKE vwestado.actividad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwestado_actividad_checkColumnConstraints
-
-{<BLOCK Name="fct.vwestado_balance_act_checkColumnConstraints">}
-#+ Check constraints on the "vwestado.balance_act" column
-#+
-#+ @param p_balance_act - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwestado_balance_act_checkColumnConstraints(p_balance_act)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_balance_act LIKE vwestado.balance_act
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwestado_balance_act_checkColumnConstraints
-
-{<BLOCK Name="fct.vwcxc_checkTableConstraints">}
-#+ Check constraints on the "vwcxc" table
-#+
-#+ @param p_data - a row data LIKE vwcxc.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcxc_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vwcxc.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vwcxc_fecha_orig_checkColumnConstraints(p_data.fecha_orig) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcxc_fecha_ven_checkColumnConstraints(p_data.fecha_ven) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcxc_num_doc_checkColumnConstraints(p_data.num_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcxc_tipodocumento_checkColumnConstraints(p_data.tipodocumento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcxc_tipo_cliente_checkColumnConstraints(p_data.tipo_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcxc_sec_cliente_checkColumnConstraints(p_data.sec_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcxc_valor_checkColumnConstraints(p_data.valor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcxc_monto_desc_checkColumnConstraints(p_data.monto_desc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcxc_cliente_checkColumnConstraints(p_data.cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcxc_ano_checkColumnConstraints(p_data.ano) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcxc_numeromes_checkColumnConstraints(p_data.numeromes) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcxc_mes_checkColumnConstraints(p_data.mes) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcxc_codigovendedor_checkColumnConstraints(p_data.codigovendedor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcxc_vendedor_checkColumnConstraints(p_data.vendedor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcxc_balance_checkColumnConstraints(p_data.balance) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcxc_fecha_corte_checkColumnConstraints(p_data.fecha_corte) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcxc_documentoaplica_checkColumnConstraints(p_data.documentoaplica) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwcxc_checkTableConstraints
-
-{<BLOCK Name="fct.vwcxc_fecha_orig_checkColumnConstraints">}
-#+ Check constraints on the "vwcxc.fecha_orig" column
-#+
-#+ @param p_fecha_orig - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcxc_fecha_orig_checkColumnConstraints(p_fecha_orig)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_orig LIKE vwcxc.fecha_orig
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwcxc_fecha_orig_checkColumnConstraints
-
-{<BLOCK Name="fct.vwcxc_fecha_ven_checkColumnConstraints">}
-#+ Check constraints on the "vwcxc.fecha_ven" column
-#+
-#+ @param p_fecha_ven - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcxc_fecha_ven_checkColumnConstraints(p_fecha_ven)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_ven LIKE vwcxc.fecha_ven
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwcxc_fecha_ven_checkColumnConstraints
-
-{<BLOCK Name="fct.vwcxc_num_doc_checkColumnConstraints">}
-#+ Check constraints on the "vwcxc.num_doc" column
-#+
-#+ @param p_num_doc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcxc_num_doc_checkColumnConstraints(p_num_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_doc LIKE vwcxc.num_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_num_doc IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- num_doc: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwcxc_num_doc_checkColumnConstraints
-
-{<BLOCK Name="fct.vwcxc_tipodocumento_checkColumnConstraints">}
-#+ Check constraints on the "vwcxc.tipodocumento" column
-#+
-#+ @param p_tipodocumento - CHAR(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcxc_tipodocumento_checkColumnConstraints(p_tipodocumento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipodocumento LIKE vwcxc.tipodocumento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwcxc_tipodocumento_checkColumnConstraints
-
-{<BLOCK Name="fct.vwcxc_tipo_cliente_checkColumnConstraints">}
-#+ Check constraints on the "vwcxc.tipo_cliente" column
-#+
-#+ @param p_tipo_cliente - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcxc_tipo_cliente_checkColumnConstraints(p_tipo_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_cliente LIKE vwcxc.tipo_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwcxc_tipo_cliente_checkColumnConstraints
-
-{<BLOCK Name="fct.vwcxc_sec_cliente_checkColumnConstraints">}
-#+ Check constraints on the "vwcxc.sec_cliente" column
-#+
-#+ @param p_sec_cliente - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcxc_sec_cliente_checkColumnConstraints(p_sec_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_cliente LIKE vwcxc.sec_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwcxc_sec_cliente_checkColumnConstraints
-
-{<BLOCK Name="fct.vwcxc_valor_checkColumnConstraints">}
-#+ Check constraints on the "vwcxc.valor" column
-#+
-#+ @param p_valor - DECIMAL(14,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcxc_valor_checkColumnConstraints(p_valor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valor LIKE vwcxc.valor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwcxc_valor_checkColumnConstraints
-
-{<BLOCK Name="fct.vwcxc_monto_desc_checkColumnConstraints">}
-#+ Check constraints on the "vwcxc.monto_desc" column
-#+
-#+ @param p_monto_desc - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcxc_monto_desc_checkColumnConstraints(p_monto_desc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_monto_desc LIKE vwcxc.monto_desc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwcxc_monto_desc_checkColumnConstraints
-
-{<BLOCK Name="fct.vwcxc_cliente_checkColumnConstraints">}
-#+ Check constraints on the "vwcxc.cliente" column
-#+
-#+ @param p_cliente - CHAR(100) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcxc_cliente_checkColumnConstraints(p_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cliente LIKE vwcxc.cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwcxc_cliente_checkColumnConstraints
-
-{<BLOCK Name="fct.vwcxc_ano_checkColumnConstraints">}
-#+ Check constraints on the "vwcxc.ano" column
-#+
-#+ @param p_ano - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcxc_ano_checkColumnConstraints(p_ano)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ano LIKE vwcxc.ano
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwcxc_ano_checkColumnConstraints
-
-{<BLOCK Name="fct.vwcxc_numeromes_checkColumnConstraints">}
-#+ Check constraints on the "vwcxc.numeromes" column
-#+
-#+ @param p_numeromes - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcxc_numeromes_checkColumnConstraints(p_numeromes)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_numeromes LIKE vwcxc.numeromes
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwcxc_numeromes_checkColumnConstraints
-
-{<BLOCK Name="fct.vwcxc_mes_checkColumnConstraints">}
-#+ Check constraints on the "vwcxc.mes" column
-#+
-#+ @param p_mes - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcxc_mes_checkColumnConstraints(p_mes)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mes LIKE vwcxc.mes
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwcxc_mes_checkColumnConstraints
-
-{<BLOCK Name="fct.vwcxc_codigovendedor_checkColumnConstraints">}
-#+ Check constraints on the "vwcxc.codigovendedor" column
-#+
-#+ @param p_codigovendedor - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcxc_codigovendedor_checkColumnConstraints(p_codigovendedor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codigovendedor LIKE vwcxc.codigovendedor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_codigovendedor IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- codigovendedor: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwcxc_codigovendedor_checkColumnConstraints
-
-{<BLOCK Name="fct.vwcxc_vendedor_checkColumnConstraints">}
-#+ Check constraints on the "vwcxc.vendedor" column
-#+
-#+ @param p_vendedor - VARCHAR2(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcxc_vendedor_checkColumnConstraints(p_vendedor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_vendedor LIKE vwcxc.vendedor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwcxc_vendedor_checkColumnConstraints
-
-{<BLOCK Name="fct.vwcxc_balance_checkColumnConstraints">}
-#+ Check constraints on the "vwcxc.balance" column
-#+
-#+ @param p_balance - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcxc_balance_checkColumnConstraints(p_balance)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_balance LIKE vwcxc.balance
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwcxc_balance_checkColumnConstraints
-
-{<BLOCK Name="fct.vwcxc_fecha_corte_checkColumnConstraints">}
-#+ Check constraints on the "vwcxc.fecha_corte" column
-#+
-#+ @param p_fecha_corte - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcxc_fecha_corte_checkColumnConstraints(p_fecha_corte)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_corte LIKE vwcxc.fecha_corte
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwcxc_fecha_corte_checkColumnConstraints
-
-{<BLOCK Name="fct.vwcxc_documentoaplica_checkColumnConstraints">}
-#+ Check constraints on the "vwcxc.documentoaplica" column
-#+
-#+ @param p_documentoaplica - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcxc_documentoaplica_checkColumnConstraints(p_documentoaplica)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_documentoaplica LIKE vwcxc.documentoaplica
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwcxc_documentoaplica_checkColumnConstraints
-
-{<BLOCK Name="fct.vwcontactosclientes_checkTableConstraints">}
-#+ Check constraints on the "vwcontactosclientes" table
-#+
-#+ @param p_data - a row data LIKE vwcontactosclientes.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcontactosclientes_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vwcontactosclientes.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vwcontactosclientes_codigovendedor_checkColumnConstraints(p_data.codigovendedor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcontactosclientes_vendedor_checkColumnConstraints(p_data.vendedor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcontactosclientes_clientes_checkColumnConstraints(p_data.clientes) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcontactosclientes_contactos_checkColumnConstraints(p_data.contactos) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcontactosclientes_tiponegocio_checkColumnConstraints(p_data.tiponegocio) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcontactosclientes_nombrecliente_checkColumnConstraints(p_data.nombrecliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwcontactosclientes_checkTableConstraints
-
-{<BLOCK Name="fct.vwcontactosclientes_codigovendedor_checkColumnConstraints">}
-#+ Check constraints on the "vwcontactosclientes.codigovendedor" column
-#+
-#+ @param p_codigovendedor - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcontactosclientes_codigovendedor_checkColumnConstraints(p_codigovendedor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codigovendedor LIKE vwcontactosclientes.codigovendedor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_codigovendedor IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- codigovendedor: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwcontactosclientes_codigovendedor_checkColumnConstraints
-
-{<BLOCK Name="fct.vwcontactosclientes_vendedor_checkColumnConstraints">}
-#+ Check constraints on the "vwcontactosclientes.vendedor" column
-#+
-#+ @param p_vendedor - VARCHAR2(31) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcontactosclientes_vendedor_checkColumnConstraints(p_vendedor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_vendedor LIKE vwcontactosclientes.vendedor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_vendedor IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- vendedor: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwcontactosclientes_vendedor_checkColumnConstraints
-
-{<BLOCK Name="fct.vwcontactosclientes_clientes_checkColumnConstraints">}
-#+ Check constraints on the "vwcontactosclientes.clientes" column
-#+
-#+ @param p_clientes - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcontactosclientes_clientes_checkColumnConstraints(p_clientes)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_clientes LIKE vwcontactosclientes.clientes
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwcontactosclientes_clientes_checkColumnConstraints
-
-{<BLOCK Name="fct.vwcontactosclientes_contactos_checkColumnConstraints">}
-#+ Check constraints on the "vwcontactosclientes.contactos" column
-#+
-#+ @param p_contactos - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcontactosclientes_contactos_checkColumnConstraints(p_contactos)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_contactos LIKE vwcontactosclientes.contactos
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwcontactosclientes_contactos_checkColumnConstraints
-
-{<BLOCK Name="fct.vwcontactosclientes_tiponegocio_checkColumnConstraints">}
-#+ Check constraints on the "vwcontactosclientes.tiponegocio" column
-#+
-#+ @param p_tiponegocio - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcontactosclientes_tiponegocio_checkColumnConstraints(p_tiponegocio)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tiponegocio LIKE vwcontactosclientes.tiponegocio
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_tiponegocio IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- tiponegocio: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwcontactosclientes_tiponegocio_checkColumnConstraints
-
-{<BLOCK Name="fct.vwcontactosclientes_nombrecliente_checkColumnConstraints">}
-#+ Check constraints on the "vwcontactosclientes.nombrecliente" column
-#+
-#+ @param p_nombrecliente - CHAR(100) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcontactosclientes_nombrecliente_checkColumnConstraints(p_nombrecliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombrecliente LIKE vwcontactosclientes.nombrecliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwcontactosclientes_nombrecliente_checkColumnConstraints
-
-{<BLOCK Name="fct.vwconduces_checkTableConstraints">}
-#+ Check constraints on the "vwconduces" table
-#+
-#+ @param p_data - a row data LIKE vwconduces.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwconduces_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vwconduces.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vwconduces_ano_checkColumnConstraints(p_data.ano) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwconduces_mes_checkColumnConstraints(p_data.mes) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwconduces_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwconduces_documento_checkColumnConstraints(p_data.documento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwconduces_orden_checkColumnConstraints(p_data.orden) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwconduces_codigomov_checkColumnConstraints(p_data.codigomov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwconduces_descripcionmov_checkColumnConstraints(p_data.descripcionmov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwconduces_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwconduces_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwconduces_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwconduces_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwconduces_descripcionprod_checkColumnConstraints(p_data.descripcionprod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwconduces_unidadmed_checkColumnConstraints(p_data.unidadmed) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwconduces_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwconduces_fechafactura_checkColumnConstraints(p_data.fechafactura) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwconduces_factura_checkColumnConstraints(p_data.factura) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwconduces_nombrecliente_checkColumnConstraints(p_data.nombrecliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwconduces_tipocliente_checkColumnConstraints(p_data.tipocliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwconduces_codigocliente_checkColumnConstraints(p_data.codigocliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwconduces_neto_checkColumnConstraints(p_data.neto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwconduces_estado_checkColumnConstraints(p_data.estado) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwconduces_usuario_checkColumnConstraints(p_data.usuario) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwconduces_checkTableConstraints
-
-{<BLOCK Name="fct.vwconduces_ano_checkColumnConstraints">}
-#+ Check constraints on the "vwconduces.ano" column
-#+
-#+ @param p_ano - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwconduces_ano_checkColumnConstraints(p_ano)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ano LIKE vwconduces.ano
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwconduces_ano_checkColumnConstraints
-
-{<BLOCK Name="fct.vwconduces_mes_checkColumnConstraints">}
-#+ Check constraints on the "vwconduces.mes" column
-#+
-#+ @param p_mes - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwconduces_mes_checkColumnConstraints(p_mes)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mes LIKE vwconduces.mes
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwconduces_mes_checkColumnConstraints
-
-{<BLOCK Name="fct.vwconduces_fecha_checkColumnConstraints">}
-#+ Check constraints on the "vwconduces.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwconduces_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE vwconduces.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_fecha IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- fecha: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwconduces_fecha_checkColumnConstraints
-
-{<BLOCK Name="fct.vwconduces_documento_checkColumnConstraints">}
-#+ Check constraints on the "vwconduces.documento" column
-#+
-#+ @param p_documento - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwconduces_documento_checkColumnConstraints(p_documento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_documento LIKE vwconduces.documento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_documento IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- documento: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwconduces_documento_checkColumnConstraints
-
-{<BLOCK Name="fct.vwconduces_orden_checkColumnConstraints">}
-#+ Check constraints on the "vwconduces.orden" column
-#+
-#+ @param p_orden - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwconduces_orden_checkColumnConstraints(p_orden)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_orden LIKE vwconduces.orden
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwconduces_orden_checkColumnConstraints
-
-{<BLOCK Name="fct.vwconduces_codigomov_checkColumnConstraints">}
-#+ Check constraints on the "vwconduces.codigomov" column
-#+
-#+ @param p_codigomov - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwconduces_codigomov_checkColumnConstraints(p_codigomov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codigomov LIKE vwconduces.codigomov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_codigomov IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- codigomov: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwconduces_codigomov_checkColumnConstraints
-
-{<BLOCK Name="fct.vwconduces_descripcionmov_checkColumnConstraints">}
-#+ Check constraints on the "vwconduces.descripcionmov" column
-#+
-#+ @param p_descripcionmov - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwconduces_descripcionmov_checkColumnConstraints(p_descripcionmov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcionmov LIKE vwconduces.descripcionmov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwconduces_descripcionmov_checkColumnConstraints
-
-{<BLOCK Name="fct.vwconduces_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "vwconduces.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwconduces_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE vwconduces.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_n IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_n: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwconduces_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.vwconduces_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "vwconduces.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwconduces_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE vwconduces.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_grupo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_grupo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwconduces_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.vwconduces_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "vwconduces.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwconduces_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE vwconduces.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_tipo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_tipo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwconduces_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.vwconduces_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "vwconduces.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwconduces_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE vwconduces.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_sec IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_sec: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwconduces_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.vwconduces_descripcionprod_checkColumnConstraints">}
-#+ Check constraints on the "vwconduces.descripcionprod" column
-#+
-#+ @param p_descripcionprod - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwconduces_descripcionprod_checkColumnConstraints(p_descripcionprod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcionprod LIKE vwconduces.descripcionprod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_descripcionprod IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- descripcionprod: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwconduces_descripcionprod_checkColumnConstraints
-
-{<BLOCK Name="fct.vwconduces_unidadmed_checkColumnConstraints">}
-#+ Check constraints on the "vwconduces.unidadmed" column
-#+
-#+ @param p_unidadmed - CHAR(4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwconduces_unidadmed_checkColumnConstraints(p_unidadmed)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_unidadmed LIKE vwconduces.unidadmed
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwconduces_unidadmed_checkColumnConstraints
-
-{<BLOCK Name="fct.vwconduces_cantidad_checkColumnConstraints">}
-#+ Check constraints on the "vwconduces.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwconduces_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE vwconduces.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cantidad IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cantidad: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwconduces_cantidad_checkColumnConstraints
-
-{<BLOCK Name="fct.vwconduces_fechafactura_checkColumnConstraints">}
-#+ Check constraints on the "vwconduces.fechafactura" column
-#+
-#+ @param p_fechafactura - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwconduces_fechafactura_checkColumnConstraints(p_fechafactura)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fechafactura LIKE vwconduces.fechafactura
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwconduces_fechafactura_checkColumnConstraints
-
-{<BLOCK Name="fct.vwconduces_factura_checkColumnConstraints">}
-#+ Check constraints on the "vwconduces.factura" column
-#+
-#+ @param p_factura - CHAR(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwconduces_factura_checkColumnConstraints(p_factura)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_factura LIKE vwconduces.factura
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_factura IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- factura: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwconduces_factura_checkColumnConstraints
-
-{<BLOCK Name="fct.vwconduces_nombrecliente_checkColumnConstraints">}
-#+ Check constraints on the "vwconduces.nombrecliente" column
-#+
-#+ @param p_nombrecliente - CHAR(100) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwconduces_nombrecliente_checkColumnConstraints(p_nombrecliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombrecliente LIKE vwconduces.nombrecliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwconduces_nombrecliente_checkColumnConstraints
-
-{<BLOCK Name="fct.vwconduces_tipocliente_checkColumnConstraints">}
-#+ Check constraints on the "vwconduces.tipocliente" column
-#+
-#+ @param p_tipocliente - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwconduces_tipocliente_checkColumnConstraints(p_tipocliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipocliente LIKE vwconduces.tipocliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_tipocliente IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- tipocliente: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwconduces_tipocliente_checkColumnConstraints
-
-{<BLOCK Name="fct.vwconduces_codigocliente_checkColumnConstraints">}
-#+ Check constraints on the "vwconduces.codigocliente" column
-#+
-#+ @param p_codigocliente - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwconduces_codigocliente_checkColumnConstraints(p_codigocliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codigocliente LIKE vwconduces.codigocliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_codigocliente IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- codigocliente: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwconduces_codigocliente_checkColumnConstraints
-
-{<BLOCK Name="fct.vwconduces_neto_checkColumnConstraints">}
-#+ Check constraints on the "vwconduces.neto" column
-#+
-#+ @param p_neto - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwconduces_neto_checkColumnConstraints(p_neto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_neto LIKE vwconduces.neto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwconduces_neto_checkColumnConstraints
-
-{<BLOCK Name="fct.vwconduces_estado_checkColumnConstraints">}
-#+ Check constraints on the "vwconduces.estado" column
-#+
-#+ @param p_estado - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwconduces_estado_checkColumnConstraints(p_estado)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_estado LIKE vwconduces.estado
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwconduces_estado_checkColumnConstraints
-
-{<BLOCK Name="fct.vwconduces_usuario_checkColumnConstraints">}
-#+ Check constraints on the "vwconduces.usuario" column
-#+
-#+ @param p_usuario - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwconduces_usuario_checkColumnConstraints(p_usuario)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_usuario LIKE vwconduces.usuario
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwconduces_usuario_checkColumnConstraints
-
-{<BLOCK Name="fct.vwcompras_checkTableConstraints">}
-#+ Check constraints on the "vwcompras" table
-#+
-#+ @param p_data - a row data LIKE vwcompras.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcompras_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vwcompras.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vwcompras_tipoorden_checkColumnConstraints(p_data.tipoorden) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcompras_cod_sp_checkColumnConstraints(p_data.cod_sp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcompras_cod_sp_sec_checkColumnConstraints(p_data.cod_sp_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcompras_ano_checkColumnConstraints(p_data.ano) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcompras_mes_checkColumnConstraints(p_data.mes) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcompras_num_oc_checkColumnConstraints(p_data.num_oc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcompras_fech_oc_checkColumnConstraints(p_data.fech_oc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcompras_nom_sp_checkColumnConstraints(p_data.nom_sp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcompras_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcompras_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcompras_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcompras_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcompras_material_checkColumnConstraints(p_data.material) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcompras_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcompras_precio_checkColumnConstraints(p_data.precio) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcompras_otrarefencia_checkColumnConstraints(p_data.otrarefencia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcompras_proforma_checkColumnConstraints(p_data.proforma) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwcompras_checkTableConstraints
-
-{<BLOCK Name="fct.vwcompras_tipoorden_checkColumnConstraints">}
-#+ Check constraints on the "vwcompras.tipoorden" column
-#+
-#+ @param p_tipoorden - VARCHAR2(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcompras_tipoorden_checkColumnConstraints(p_tipoorden)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipoorden LIKE vwcompras.tipoorden
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_tipoorden IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- tipoorden: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwcompras_tipoorden_checkColumnConstraints
-
-{<BLOCK Name="fct.vwcompras_cod_sp_checkColumnConstraints">}
-#+ Check constraints on the "vwcompras.cod_sp" column
-#+
-#+ @param p_cod_sp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcompras_cod_sp_checkColumnConstraints(p_cod_sp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sp LIKE vwcompras.cod_sp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwcompras_cod_sp_checkColumnConstraints
-
-{<BLOCK Name="fct.vwcompras_cod_sp_sec_checkColumnConstraints">}
-#+ Check constraints on the "vwcompras.cod_sp_sec" column
-#+
-#+ @param p_cod_sp_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcompras_cod_sp_sec_checkColumnConstraints(p_cod_sp_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sp_sec LIKE vwcompras.cod_sp_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwcompras_cod_sp_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.vwcompras_ano_checkColumnConstraints">}
-#+ Check constraints on the "vwcompras.ano" column
-#+
-#+ @param p_ano - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcompras_ano_checkColumnConstraints(p_ano)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ano LIKE vwcompras.ano
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwcompras_ano_checkColumnConstraints
-
-{<BLOCK Name="fct.vwcompras_mes_checkColumnConstraints">}
-#+ Check constraints on the "vwcompras.mes" column
-#+
-#+ @param p_mes - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcompras_mes_checkColumnConstraints(p_mes)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mes LIKE vwcompras.mes
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwcompras_mes_checkColumnConstraints
-
-{<BLOCK Name="fct.vwcompras_num_oc_checkColumnConstraints">}
-#+ Check constraints on the "vwcompras.num_oc" column
-#+
-#+ @param p_num_oc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcompras_num_oc_checkColumnConstraints(p_num_oc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_oc LIKE vwcompras.num_oc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_num_oc IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- num_oc: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwcompras_num_oc_checkColumnConstraints
-
-{<BLOCK Name="fct.vwcompras_fech_oc_checkColumnConstraints">}
-#+ Check constraints on the "vwcompras.fech_oc" column
-#+
-#+ @param p_fech_oc - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcompras_fech_oc_checkColumnConstraints(p_fech_oc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_oc LIKE vwcompras.fech_oc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwcompras_fech_oc_checkColumnConstraints
-
-{<BLOCK Name="fct.vwcompras_nom_sp_checkColumnConstraints">}
-#+ Check constraints on the "vwcompras.nom_sp" column
-#+
-#+ @param p_nom_sp - VARCHAR2(41) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcompras_nom_sp_checkColumnConstraints(p_nom_sp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nom_sp LIKE vwcompras.nom_sp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwcompras_nom_sp_checkColumnConstraints
-
-{<BLOCK Name="fct.vwcompras_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "vwcompras.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcompras_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE vwcompras.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_n IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_n: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwcompras_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.vwcompras_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "vwcompras.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcompras_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE vwcompras.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_grupo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_grupo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwcompras_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.vwcompras_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "vwcompras.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcompras_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE vwcompras.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_tipo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_tipo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwcompras_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.vwcompras_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "vwcompras.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcompras_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE vwcompras.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_sec IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_sec: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwcompras_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.vwcompras_material_checkColumnConstraints">}
-#+ Check constraints on the "vwcompras.material" column
-#+
-#+ @param p_material - VARCHAR2(105) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcompras_material_checkColumnConstraints(p_material)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_material LIKE vwcompras.material
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwcompras_material_checkColumnConstraints
-
-{<BLOCK Name="fct.vwcompras_cantidad_checkColumnConstraints">}
-#+ Check constraints on the "vwcompras.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcompras_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE vwcompras.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwcompras_cantidad_checkColumnConstraints
-
-{<BLOCK Name="fct.vwcompras_precio_checkColumnConstraints">}
-#+ Check constraints on the "vwcompras.precio" column
-#+
-#+ @param p_precio - DECIMAL(11,3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcompras_precio_checkColumnConstraints(p_precio)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_precio LIKE vwcompras.precio
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwcompras_precio_checkColumnConstraints
-
-{<BLOCK Name="fct.vwcompras_otrarefencia_checkColumnConstraints">}
-#+ Check constraints on the "vwcompras.otrarefencia" column
-#+
-#+ @param p_otrarefencia - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcompras_otrarefencia_checkColumnConstraints(p_otrarefencia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_otrarefencia LIKE vwcompras.otrarefencia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwcompras_otrarefencia_checkColumnConstraints
-
-{<BLOCK Name="fct.vwcompras_proforma_checkColumnConstraints">}
-#+ Check constraints on the "vwcompras.proforma" column
-#+
-#+ @param p_proforma - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcompras_proforma_checkColumnConstraints(p_proforma)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_proforma LIKE vwcompras.proforma
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwcompras_proforma_checkColumnConstraints
-
-{<BLOCK Name="fct.vwcomisiones_checkTableConstraints">}
-#+ Check constraints on the "vwcomisiones" table
-#+
-#+ @param p_data - a row data LIKE vwcomisiones.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcomisiones_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vwcomisiones.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vwcomisiones_tipoventas_checkColumnConstraints(p_data.tipoventas) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcomisiones_tipo_cliente_checkColumnConstraints(p_data.tipo_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcomisiones_sec_cliente_checkColumnConstraints(p_data.sec_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcomisiones_nombre_checkColumnConstraints(p_data.nombre) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcomisiones_sec_vend_checkColumnConstraints(p_data.sec_vend) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcomisiones_nombrev_checkColumnConstraints(p_data.nombrev) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcomisiones_apellidov_checkColumnConstraints(p_data.apellidov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcomisiones_porc_comisionv_checkColumnConstraints(p_data.porc_comisionv) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcomisiones_sec_vend_a_checkColumnConstraints(p_data.sec_vend_a) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcomisiones_nombre_a_checkColumnConstraints(p_data.nombre_a) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcomisiones_apellido_a_checkColumnConstraints(p_data.apellido_a) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcomisiones_porc_comisiona_checkColumnConstraints(p_data.porc_comisiona) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcomisiones_tipodocumento_checkColumnConstraints(p_data.tipodocumento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcomisiones_tipo_doc_checkColumnConstraints(p_data.tipo_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcomisiones_documento_checkColumnConstraints(p_data.documento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcomisiones_valor_checkColumnConstraints(p_data.valor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcomisiones_valor_itbi_checkColumnConstraints(p_data.valor_itbi) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcomisiones_aplica_a_checkColumnConstraints(p_data.aplica_a) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcomisiones_fechafactura_checkColumnConstraints(p_data.fechafactura) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcomisiones_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcomisiones_ano_checkColumnConstraints(p_data.ano) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcomisiones_numeromes_checkColumnConstraints(p_data.numeromes) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcomisiones_mes_checkColumnConstraints(p_data.mes) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcomisiones_valor1_checkColumnConstraints(p_data.valor1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcomisiones_valor2_checkColumnConstraints(p_data.valor2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcomisiones_valor_orig_checkColumnConstraints(p_data.valor_orig) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcomisiones_tasa_checkColumnConstraints(p_data.tasa) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcomisiones_chitbis_checkColumnConstraints(p_data.chitbis) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwcomisiones_checkTableConstraints
-
-{<BLOCK Name="fct.vwcomisiones_tipoventas_checkColumnConstraints">}
-#+ Check constraints on the "vwcomisiones.tipoventas" column
-#+
-#+ @param p_tipoventas - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcomisiones_tipoventas_checkColumnConstraints(p_tipoventas)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipoventas LIKE vwcomisiones.tipoventas
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwcomisiones_tipoventas_checkColumnConstraints
-
-{<BLOCK Name="fct.vwcomisiones_tipo_cliente_checkColumnConstraints">}
-#+ Check constraints on the "vwcomisiones.tipo_cliente" column
-#+
-#+ @param p_tipo_cliente - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcomisiones_tipo_cliente_checkColumnConstraints(p_tipo_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_cliente LIKE vwcomisiones.tipo_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwcomisiones_tipo_cliente_checkColumnConstraints
-
-{<BLOCK Name="fct.vwcomisiones_sec_cliente_checkColumnConstraints">}
-#+ Check constraints on the "vwcomisiones.sec_cliente" column
-#+
-#+ @param p_sec_cliente - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcomisiones_sec_cliente_checkColumnConstraints(p_sec_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_cliente LIKE vwcomisiones.sec_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwcomisiones_sec_cliente_checkColumnConstraints
-
-{<BLOCK Name="fct.vwcomisiones_nombre_checkColumnConstraints">}
-#+ Check constraints on the "vwcomisiones.nombre" column
-#+
-#+ @param p_nombre - CHAR(90) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcomisiones_nombre_checkColumnConstraints(p_nombre)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombre LIKE vwcomisiones.nombre
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwcomisiones_nombre_checkColumnConstraints
-
-{<BLOCK Name="fct.vwcomisiones_sec_vend_checkColumnConstraints">}
-#+ Check constraints on the "vwcomisiones.sec_vend" column
-#+
-#+ @param p_sec_vend - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcomisiones_sec_vend_checkColumnConstraints(p_sec_vend)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_vend LIKE vwcomisiones.sec_vend
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwcomisiones_sec_vend_checkColumnConstraints
-
-{<BLOCK Name="fct.vwcomisiones_nombrev_checkColumnConstraints">}
-#+ Check constraints on the "vwcomisiones.nombrev" column
-#+
-#+ @param p_nombrev - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcomisiones_nombrev_checkColumnConstraints(p_nombrev)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombrev LIKE vwcomisiones.nombrev
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwcomisiones_nombrev_checkColumnConstraints
-
-{<BLOCK Name="fct.vwcomisiones_apellidov_checkColumnConstraints">}
-#+ Check constraints on the "vwcomisiones.apellidov" column
-#+
-#+ @param p_apellidov - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcomisiones_apellidov_checkColumnConstraints(p_apellidov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_apellidov LIKE vwcomisiones.apellidov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwcomisiones_apellidov_checkColumnConstraints
-
-{<BLOCK Name="fct.vwcomisiones_porc_comisionv_checkColumnConstraints">}
-#+ Check constraints on the "vwcomisiones.porc_comisionv" column
-#+
-#+ @param p_porc_comisionv - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcomisiones_porc_comisionv_checkColumnConstraints(p_porc_comisionv)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_porc_comisionv LIKE vwcomisiones.porc_comisionv
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwcomisiones_porc_comisionv_checkColumnConstraints
-
-{<BLOCK Name="fct.vwcomisiones_sec_vend_a_checkColumnConstraints">}
-#+ Check constraints on the "vwcomisiones.sec_vend_a" column
-#+
-#+ @param p_sec_vend_a - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcomisiones_sec_vend_a_checkColumnConstraints(p_sec_vend_a)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_vend_a LIKE vwcomisiones.sec_vend_a
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwcomisiones_sec_vend_a_checkColumnConstraints
-
-{<BLOCK Name="fct.vwcomisiones_nombre_a_checkColumnConstraints">}
-#+ Check constraints on the "vwcomisiones.nombre_a" column
-#+
-#+ @param p_nombre_a - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcomisiones_nombre_a_checkColumnConstraints(p_nombre_a)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombre_a LIKE vwcomisiones.nombre_a
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwcomisiones_nombre_a_checkColumnConstraints
-
-{<BLOCK Name="fct.vwcomisiones_apellido_a_checkColumnConstraints">}
-#+ Check constraints on the "vwcomisiones.apellido_a" column
-#+
-#+ @param p_apellido_a - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcomisiones_apellido_a_checkColumnConstraints(p_apellido_a)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_apellido_a LIKE vwcomisiones.apellido_a
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwcomisiones_apellido_a_checkColumnConstraints
-
-{<BLOCK Name="fct.vwcomisiones_porc_comisiona_checkColumnConstraints">}
-#+ Check constraints on the "vwcomisiones.porc_comisiona" column
-#+
-#+ @param p_porc_comisiona - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcomisiones_porc_comisiona_checkColumnConstraints(p_porc_comisiona)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_porc_comisiona LIKE vwcomisiones.porc_comisiona
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwcomisiones_porc_comisiona_checkColumnConstraints
-
-{<BLOCK Name="fct.vwcomisiones_tipodocumento_checkColumnConstraints">}
-#+ Check constraints on the "vwcomisiones.tipodocumento" column
-#+
-#+ @param p_tipodocumento - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcomisiones_tipodocumento_checkColumnConstraints(p_tipodocumento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipodocumento LIKE vwcomisiones.tipodocumento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwcomisiones_tipodocumento_checkColumnConstraints
-
-{<BLOCK Name="fct.vwcomisiones_tipo_doc_checkColumnConstraints">}
-#+ Check constraints on the "vwcomisiones.tipo_doc" column
-#+
-#+ @param p_tipo_doc - CHAR(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcomisiones_tipo_doc_checkColumnConstraints(p_tipo_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_doc LIKE vwcomisiones.tipo_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwcomisiones_tipo_doc_checkColumnConstraints
-
-{<BLOCK Name="fct.vwcomisiones_documento_checkColumnConstraints">}
-#+ Check constraints on the "vwcomisiones.documento" column
-#+
-#+ @param p_documento - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcomisiones_documento_checkColumnConstraints(p_documento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_documento LIKE vwcomisiones.documento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwcomisiones_documento_checkColumnConstraints
-
-{<BLOCK Name="fct.vwcomisiones_valor_checkColumnConstraints">}
-#+ Check constraints on the "vwcomisiones.valor" column
-#+
-#+ @param p_valor - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcomisiones_valor_checkColumnConstraints(p_valor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valor LIKE vwcomisiones.valor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwcomisiones_valor_checkColumnConstraints
-
-{<BLOCK Name="fct.vwcomisiones_valor_itbi_checkColumnConstraints">}
-#+ Check constraints on the "vwcomisiones.valor_itbi" column
-#+
-#+ @param p_valor_itbi - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcomisiones_valor_itbi_checkColumnConstraints(p_valor_itbi)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valor_itbi LIKE vwcomisiones.valor_itbi
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwcomisiones_valor_itbi_checkColumnConstraints
-
-{<BLOCK Name="fct.vwcomisiones_aplica_a_checkColumnConstraints">}
-#+ Check constraints on the "vwcomisiones.aplica_a" column
-#+
-#+ @param p_aplica_a - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcomisiones_aplica_a_checkColumnConstraints(p_aplica_a)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_aplica_a LIKE vwcomisiones.aplica_a
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwcomisiones_aplica_a_checkColumnConstraints
-
-{<BLOCK Name="fct.vwcomisiones_fechafactura_checkColumnConstraints">}
-#+ Check constraints on the "vwcomisiones.fechafactura" column
-#+
-#+ @param p_fechafactura - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcomisiones_fechafactura_checkColumnConstraints(p_fechafactura)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fechafactura LIKE vwcomisiones.fechafactura
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwcomisiones_fechafactura_checkColumnConstraints
-
-{<BLOCK Name="fct.vwcomisiones_fecha_checkColumnConstraints">}
-#+ Check constraints on the "vwcomisiones.fecha" column
-#+
-#+ @param p_fecha - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcomisiones_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE vwcomisiones.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwcomisiones_fecha_checkColumnConstraints
-
-{<BLOCK Name="fct.vwcomisiones_ano_checkColumnConstraints">}
-#+ Check constraints on the "vwcomisiones.ano" column
-#+
-#+ @param p_ano - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcomisiones_ano_checkColumnConstraints(p_ano)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ano LIKE vwcomisiones.ano
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwcomisiones_ano_checkColumnConstraints
-
-{<BLOCK Name="fct.vwcomisiones_numeromes_checkColumnConstraints">}
-#+ Check constraints on the "vwcomisiones.numeromes" column
-#+
-#+ @param p_numeromes - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcomisiones_numeromes_checkColumnConstraints(p_numeromes)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_numeromes LIKE vwcomisiones.numeromes
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwcomisiones_numeromes_checkColumnConstraints
-
-{<BLOCK Name="fct.vwcomisiones_mes_checkColumnConstraints">}
-#+ Check constraints on the "vwcomisiones.mes" column
-#+
-#+ @param p_mes - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcomisiones_mes_checkColumnConstraints(p_mes)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mes LIKE vwcomisiones.mes
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwcomisiones_mes_checkColumnConstraints
-
-{<BLOCK Name="fct.vwcomisiones_valor1_checkColumnConstraints">}
-#+ Check constraints on the "vwcomisiones.valor1" column
-#+
-#+ @param p_valor1 - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcomisiones_valor1_checkColumnConstraints(p_valor1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valor1 LIKE vwcomisiones.valor1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwcomisiones_valor1_checkColumnConstraints
-
-{<BLOCK Name="fct.vwcomisiones_valor2_checkColumnConstraints">}
-#+ Check constraints on the "vwcomisiones.valor2" column
-#+
-#+ @param p_valor2 - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcomisiones_valor2_checkColumnConstraints(p_valor2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valor2 LIKE vwcomisiones.valor2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwcomisiones_valor2_checkColumnConstraints
-
-{<BLOCK Name="fct.vwcomisiones_valor_orig_checkColumnConstraints">}
-#+ Check constraints on the "vwcomisiones.valor_orig" column
-#+
-#+ @param p_valor_orig - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcomisiones_valor_orig_checkColumnConstraints(p_valor_orig)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valor_orig LIKE vwcomisiones.valor_orig
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwcomisiones_valor_orig_checkColumnConstraints
-
-{<BLOCK Name="fct.vwcomisiones_tasa_checkColumnConstraints">}
-#+ Check constraints on the "vwcomisiones.tasa" column
-#+
-#+ @param p_tasa - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcomisiones_tasa_checkColumnConstraints(p_tasa)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tasa LIKE vwcomisiones.tasa
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwcomisiones_tasa_checkColumnConstraints
-
-{<BLOCK Name="fct.vwcomisiones_chitbis_checkColumnConstraints">}
-#+ Check constraints on the "vwcomisiones.chitbis" column
-#+
-#+ @param p_chitbis - CHAR(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcomisiones_chitbis_checkColumnConstraints(p_chitbis)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_chitbis LIKE vwcomisiones.chitbis
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwcomisiones_chitbis_checkColumnConstraints
-
-{<BLOCK Name="fct.vwcodigosnuevos_checkTableConstraints">}
-#+ Check constraints on the "vwcodigosnuevos" table
-#+
-#+ @param p_data - a row data LIKE vwcodigosnuevos.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcodigosnuevos_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vwcodigosnuevos.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vwcodigosnuevos_cod1_checkColumnConstraints(p_data.cod1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcodigosnuevos_cod2_checkColumnConstraints(p_data.cod2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcodigosnuevos_cod3_checkColumnConstraints(p_data.cod3) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcodigosnuevos_cod4_checkColumnConstraints(p_data.cod4) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcodigosnuevos_codigonuevo_checkColumnConstraints(p_data.codigonuevo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcodigosnuevos_codigoviejo_checkColumnConstraints(p_data.codigoviejo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcodigosnuevos_cod_cia_checkColumnConstraints(p_data.cod_cia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcodigosnuevos_pcodn_checkColumnConstraints(p_data.pcodn) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcodigosnuevos_pcodgrupo_checkColumnConstraints(p_data.pcodgrupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcodigosnuevos_pcodtipo_checkColumnConstraints(p_data.pcodtipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcodigosnuevos_pcodsec_checkColumnConstraints(p_data.pcodsec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcodigosnuevos_material_checkColumnConstraints(p_data.material) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcodigosnuevos_labor_checkColumnConstraints(p_data.labor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcodigosnuevos_gastos_checkColumnConstraints(p_data.gastos) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcodigosnuevos_factor_checkColumnConstraints(p_data.factor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcodigosnuevos_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcodigosnuevos_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcodigosnuevos_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcodigosnuevos_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcodigosnuevos_existencia_checkColumnConstraints(p_data.existencia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwcodigosnuevos_checkTableConstraints
-
-{<BLOCK Name="fct.vwcodigosnuevos_cod1_checkColumnConstraints">}
-#+ Check constraints on the "vwcodigosnuevos.cod1" column
-#+
-#+ @param p_cod1 - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcodigosnuevos_cod1_checkColumnConstraints(p_cod1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod1 LIKE vwcodigosnuevos.cod1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwcodigosnuevos_cod1_checkColumnConstraints
-
-{<BLOCK Name="fct.vwcodigosnuevos_cod2_checkColumnConstraints">}
-#+ Check constraints on the "vwcodigosnuevos.cod2" column
-#+
-#+ @param p_cod2 - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcodigosnuevos_cod2_checkColumnConstraints(p_cod2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod2 LIKE vwcodigosnuevos.cod2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwcodigosnuevos_cod2_checkColumnConstraints
-
-{<BLOCK Name="fct.vwcodigosnuevos_cod3_checkColumnConstraints">}
-#+ Check constraints on the "vwcodigosnuevos.cod3" column
-#+
-#+ @param p_cod3 - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcodigosnuevos_cod3_checkColumnConstraints(p_cod3)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod3 LIKE vwcodigosnuevos.cod3
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwcodigosnuevos_cod3_checkColumnConstraints
-
-{<BLOCK Name="fct.vwcodigosnuevos_cod4_checkColumnConstraints">}
-#+ Check constraints on the "vwcodigosnuevos.cod4" column
-#+
-#+ @param p_cod4 - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcodigosnuevos_cod4_checkColumnConstraints(p_cod4)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod4 LIKE vwcodigosnuevos.cod4
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwcodigosnuevos_cod4_checkColumnConstraints
-
-{<BLOCK Name="fct.vwcodigosnuevos_codigonuevo_checkColumnConstraints">}
-#+ Check constraints on the "vwcodigosnuevos.codigonuevo" column
-#+
-#+ @param p_codigonuevo - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcodigosnuevos_codigonuevo_checkColumnConstraints(p_codigonuevo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codigonuevo LIKE vwcodigosnuevos.codigonuevo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwcodigosnuevos_codigonuevo_checkColumnConstraints
-
-{<BLOCK Name="fct.vwcodigosnuevos_codigoviejo_checkColumnConstraints">}
-#+ Check constraints on the "vwcodigosnuevos.codigoviejo" column
-#+
-#+ @param p_codigoviejo - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcodigosnuevos_codigoviejo_checkColumnConstraints(p_codigoviejo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codigoviejo LIKE vwcodigosnuevos.codigoviejo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_codigoviejo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- codigoviejo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwcodigosnuevos_codigoviejo_checkColumnConstraints
-
-{<BLOCK Name="fct.vwcodigosnuevos_cod_cia_checkColumnConstraints">}
-#+ Check constraints on the "vwcodigosnuevos.cod_cia" column
-#+
-#+ @param p_cod_cia - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcodigosnuevos_cod_cia_checkColumnConstraints(p_cod_cia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_cia LIKE vwcodigosnuevos.cod_cia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwcodigosnuevos_cod_cia_checkColumnConstraints
-
-{<BLOCK Name="fct.vwcodigosnuevos_pcodn_checkColumnConstraints">}
-#+ Check constraints on the "vwcodigosnuevos.pcodn" column
-#+
-#+ @param p_pcodn - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcodigosnuevos_pcodn_checkColumnConstraints(p_pcodn)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_pcodn LIKE vwcodigosnuevos.pcodn
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwcodigosnuevos_pcodn_checkColumnConstraints
-
-{<BLOCK Name="fct.vwcodigosnuevos_pcodgrupo_checkColumnConstraints">}
-#+ Check constraints on the "vwcodigosnuevos.pcodgrupo" column
-#+
-#+ @param p_pcodgrupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcodigosnuevos_pcodgrupo_checkColumnConstraints(p_pcodgrupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_pcodgrupo LIKE vwcodigosnuevos.pcodgrupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwcodigosnuevos_pcodgrupo_checkColumnConstraints
-
-{<BLOCK Name="fct.vwcodigosnuevos_pcodtipo_checkColumnConstraints">}
-#+ Check constraints on the "vwcodigosnuevos.pcodtipo" column
-#+
-#+ @param p_pcodtipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcodigosnuevos_pcodtipo_checkColumnConstraints(p_pcodtipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_pcodtipo LIKE vwcodigosnuevos.pcodtipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwcodigosnuevos_pcodtipo_checkColumnConstraints
-
-{<BLOCK Name="fct.vwcodigosnuevos_pcodsec_checkColumnConstraints">}
-#+ Check constraints on the "vwcodigosnuevos.pcodsec" column
-#+
-#+ @param p_pcodsec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcodigosnuevos_pcodsec_checkColumnConstraints(p_pcodsec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_pcodsec LIKE vwcodigosnuevos.pcodsec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwcodigosnuevos_pcodsec_checkColumnConstraints
-
-{<BLOCK Name="fct.vwcodigosnuevos_material_checkColumnConstraints">}
-#+ Check constraints on the "vwcodigosnuevos.material" column
-#+
-#+ @param p_material - DECIMAL(18,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcodigosnuevos_material_checkColumnConstraints(p_material)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_material LIKE vwcodigosnuevos.material
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwcodigosnuevos_material_checkColumnConstraints
-
-{<BLOCK Name="fct.vwcodigosnuevos_labor_checkColumnConstraints">}
-#+ Check constraints on the "vwcodigosnuevos.labor" column
-#+
-#+ @param p_labor - DECIMAL(18,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcodigosnuevos_labor_checkColumnConstraints(p_labor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_labor LIKE vwcodigosnuevos.labor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwcodigosnuevos_labor_checkColumnConstraints
-
-{<BLOCK Name="fct.vwcodigosnuevos_gastos_checkColumnConstraints">}
-#+ Check constraints on the "vwcodigosnuevos.gastos" column
-#+
-#+ @param p_gastos - DECIMAL(18,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcodigosnuevos_gastos_checkColumnConstraints(p_gastos)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_gastos LIKE vwcodigosnuevos.gastos
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwcodigosnuevos_gastos_checkColumnConstraints
-
-{<BLOCK Name="fct.vwcodigosnuevos_factor_checkColumnConstraints">}
-#+ Check constraints on the "vwcodigosnuevos.factor" column
-#+
-#+ @param p_factor - DECIMAL(18,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcodigosnuevos_factor_checkColumnConstraints(p_factor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_factor LIKE vwcodigosnuevos.factor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwcodigosnuevos_factor_checkColumnConstraints
-
-{<BLOCK Name="fct.vwcodigosnuevos_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "vwcodigosnuevos.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcodigosnuevos_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE vwcodigosnuevos.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_n IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_n: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwcodigosnuevos_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.vwcodigosnuevos_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "vwcodigosnuevos.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcodigosnuevos_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE vwcodigosnuevos.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_grupo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_grupo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwcodigosnuevos_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.vwcodigosnuevos_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "vwcodigosnuevos.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcodigosnuevos_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE vwcodigosnuevos.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_tipo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_tipo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwcodigosnuevos_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.vwcodigosnuevos_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "vwcodigosnuevos.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcodigosnuevos_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE vwcodigosnuevos.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_sec IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_sec: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwcodigosnuevos_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.vwcodigosnuevos_existencia_checkColumnConstraints">}
-#+ Check constraints on the "vwcodigosnuevos.existencia" column
-#+
-#+ @param p_existencia - DECIMAL(38,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcodigosnuevos_existencia_checkColumnConstraints(p_existencia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_existencia LIKE vwcodigosnuevos.existencia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwcodigosnuevos_existencia_checkColumnConstraints
-
-{<BLOCK Name="fct.vwcobros_checkTableConstraints">}
-#+ Check constraints on the "vwcobros" table
-#+
-#+ @param p_data - a row data LIKE vwcobros.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcobros_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vwcobros.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vwcobros_ficha_checkColumnConstraints(p_data.ficha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcobros_primernombre_checkColumnConstraints(p_data.primernombre) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcobros_primerapellido_checkColumnConstraints(p_data.primerapellido) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcobros_tipocobro_checkColumnConstraints(p_data.tipocobro) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcobros_valor_checkColumnConstraints(p_data.valor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcobros_valorrd_checkColumnConstraints(p_data.valorrd) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcobros_ano_checkColumnConstraints(p_data.ano) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcobros_numero_mes_checkColumnConstraints(p_data.numero_mes) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcobros_nombremes_checkColumnConstraints(p_data.nombremes) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcobros_nombresucursal_checkColumnConstraints(p_data.nombresucursal) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcobros_tasa_checkColumnConstraints(p_data.tasa) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcobros_ventas_checkColumnConstraints(p_data.ventas) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcobros_ocupacion_checkColumnConstraints(p_data.ocupacion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcobros_fecha_orig_checkColumnConstraints(p_data.fecha_orig) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcobros_num_doc_checkColumnConstraints(p_data.num_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcobros_tipo_doc_checkColumnConstraints(p_data.tipo_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcobros_tipo_cliente_checkColumnConstraints(p_data.tipo_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcobros_sec_cliente_checkColumnConstraints(p_data.sec_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwcobros_nombre_checkColumnConstraints(p_data.nombre) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwcobros_checkTableConstraints
-
-{<BLOCK Name="fct.vwcobros_ficha_checkColumnConstraints">}
-#+ Check constraints on the "vwcobros.ficha" column
-#+
-#+ @param p_ficha - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcobros_ficha_checkColumnConstraints(p_ficha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ficha LIKE vwcobros.ficha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_ficha IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- ficha: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwcobros_ficha_checkColumnConstraints
-
-{<BLOCK Name="fct.vwcobros_primernombre_checkColumnConstraints">}
-#+ Check constraints on the "vwcobros.primernombre" column
-#+
-#+ @param p_primernombre - CHAR(15) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcobros_primernombre_checkColumnConstraints(p_primernombre)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_primernombre LIKE vwcobros.primernombre
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwcobros_primernombre_checkColumnConstraints
-
-{<BLOCK Name="fct.vwcobros_primerapellido_checkColumnConstraints">}
-#+ Check constraints on the "vwcobros.primerapellido" column
-#+
-#+ @param p_primerapellido - CHAR(15) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcobros_primerapellido_checkColumnConstraints(p_primerapellido)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_primerapellido LIKE vwcobros.primerapellido
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwcobros_primerapellido_checkColumnConstraints
-
-{<BLOCK Name="fct.vwcobros_tipocobro_checkColumnConstraints">}
-#+ Check constraints on the "vwcobros.tipocobro" column
-#+
-#+ @param p_tipocobro - VARCHAR2(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcobros_tipocobro_checkColumnConstraints(p_tipocobro)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipocobro LIKE vwcobros.tipocobro
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwcobros_tipocobro_checkColumnConstraints
-
-{<BLOCK Name="fct.vwcobros_valor_checkColumnConstraints">}
-#+ Check constraints on the "vwcobros.valor" column
-#+
-#+ @param p_valor - DECIMAL(38,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcobros_valor_checkColumnConstraints(p_valor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valor LIKE vwcobros.valor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwcobros_valor_checkColumnConstraints
-
-{<BLOCK Name="fct.vwcobros_valorrd_checkColumnConstraints">}
-#+ Check constraints on the "vwcobros.valorrd" column
-#+
-#+ @param p_valorrd - DECIMAL(38,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcobros_valorrd_checkColumnConstraints(p_valorrd)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valorrd LIKE vwcobros.valorrd
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwcobros_valorrd_checkColumnConstraints
-
-{<BLOCK Name="fct.vwcobros_ano_checkColumnConstraints">}
-#+ Check constraints on the "vwcobros.ano" column
-#+
-#+ @param p_ano - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcobros_ano_checkColumnConstraints(p_ano)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ano LIKE vwcobros.ano
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwcobros_ano_checkColumnConstraints
-
-{<BLOCK Name="fct.vwcobros_numero_mes_checkColumnConstraints">}
-#+ Check constraints on the "vwcobros.numero_mes" column
-#+
-#+ @param p_numero_mes - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcobros_numero_mes_checkColumnConstraints(p_numero_mes)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_numero_mes LIKE vwcobros.numero_mes
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwcobros_numero_mes_checkColumnConstraints
-
-{<BLOCK Name="fct.vwcobros_nombremes_checkColumnConstraints">}
-#+ Check constraints on the "vwcobros.nombremes" column
-#+
-#+ @param p_nombremes - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcobros_nombremes_checkColumnConstraints(p_nombremes)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombremes LIKE vwcobros.nombremes
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwcobros_nombremes_checkColumnConstraints
-
-{<BLOCK Name="fct.vwcobros_nombresucursal_checkColumnConstraints">}
-#+ Check constraints on the "vwcobros.nombresucursal" column
-#+
-#+ @param p_nombresucursal - VARCHAR2(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcobros_nombresucursal_checkColumnConstraints(p_nombresucursal)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombresucursal LIKE vwcobros.nombresucursal
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_nombresucursal IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- nombresucursal: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwcobros_nombresucursal_checkColumnConstraints
-
-{<BLOCK Name="fct.vwcobros_tasa_checkColumnConstraints">}
-#+ Check constraints on the "vwcobros.tasa" column
-#+
-#+ @param p_tasa - DECIMAL(12,3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcobros_tasa_checkColumnConstraints(p_tasa)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tasa LIKE vwcobros.tasa
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwcobros_tasa_checkColumnConstraints
-
-{<BLOCK Name="fct.vwcobros_ventas_checkColumnConstraints">}
-#+ Check constraints on the "vwcobros.ventas" column
-#+
-#+ @param p_ventas - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcobros_ventas_checkColumnConstraints(p_ventas)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ventas LIKE vwcobros.ventas
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwcobros_ventas_checkColumnConstraints
-
-{<BLOCK Name="fct.vwcobros_ocupacion_checkColumnConstraints">}
-#+ Check constraints on the "vwcobros.ocupacion" column
-#+
-#+ @param p_ocupacion - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcobros_ocupacion_checkColumnConstraints(p_ocupacion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ocupacion LIKE vwcobros.ocupacion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwcobros_ocupacion_checkColumnConstraints
-
-{<BLOCK Name="fct.vwcobros_fecha_orig_checkColumnConstraints">}
-#+ Check constraints on the "vwcobros.fecha_orig" column
-#+
-#+ @param p_fecha_orig - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcobros_fecha_orig_checkColumnConstraints(p_fecha_orig)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_orig LIKE vwcobros.fecha_orig
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwcobros_fecha_orig_checkColumnConstraints
-
-{<BLOCK Name="fct.vwcobros_num_doc_checkColumnConstraints">}
-#+ Check constraints on the "vwcobros.num_doc" column
-#+
-#+ @param p_num_doc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcobros_num_doc_checkColumnConstraints(p_num_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_doc LIKE vwcobros.num_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_num_doc IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- num_doc: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwcobros_num_doc_checkColumnConstraints
-
-{<BLOCK Name="fct.vwcobros_tipo_doc_checkColumnConstraints">}
-#+ Check constraints on the "vwcobros.tipo_doc" column
-#+
-#+ @param p_tipo_doc - CHAR(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcobros_tipo_doc_checkColumnConstraints(p_tipo_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_doc LIKE vwcobros.tipo_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwcobros_tipo_doc_checkColumnConstraints
-
-{<BLOCK Name="fct.vwcobros_tipo_cliente_checkColumnConstraints">}
-#+ Check constraints on the "vwcobros.tipo_cliente" column
-#+
-#+ @param p_tipo_cliente - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcobros_tipo_cliente_checkColumnConstraints(p_tipo_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_cliente LIKE vwcobros.tipo_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwcobros_tipo_cliente_checkColumnConstraints
-
-{<BLOCK Name="fct.vwcobros_sec_cliente_checkColumnConstraints">}
-#+ Check constraints on the "vwcobros.sec_cliente" column
-#+
-#+ @param p_sec_cliente - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcobros_sec_cliente_checkColumnConstraints(p_sec_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_cliente LIKE vwcobros.sec_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwcobros_sec_cliente_checkColumnConstraints
-
-{<BLOCK Name="fct.vwcobros_nombre_checkColumnConstraints">}
-#+ Check constraints on the "vwcobros.nombre" column
-#+
-#+ @param p_nombre - CHAR(100) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwcobros_nombre_checkColumnConstraints(p_nombre)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombre LIKE vwcobros.nombre
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwcobros_nombre_checkColumnConstraints
-
-{<BLOCK Name="fct.vwclientesnocompran_checkTableConstraints">}
-#+ Check constraints on the "vwclientesnocompran" table
-#+
-#+ @param p_data - a row data LIKE vwclientesnocompran.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwclientesnocompran_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vwclientesnocompran.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vwclientesnocompran_vendedor_checkColumnConstraints(p_data.vendedor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwclientesnocompran_tipo_cliente_checkColumnConstraints(p_data.tipo_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwclientesnocompran_sec_cliente_checkColumnConstraints(p_data.sec_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwclientesnocompran_nombre_checkColumnConstraints(p_data.nombre) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwclientesnocompran_telefono_checkColumnConstraints(p_data.telefono) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwclientesnocompran_telefono_casa_checkColumnConstraints(p_data.telefono_casa) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwclientesnocompran_contacto_checkColumnConstraints(p_data.contacto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwclientesnocompran_mes_checkColumnConstraints(p_data.mes) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwclientesnocompran_rnc_checkColumnConstraints(p_data.rnc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwclientesnocompran_checkTableConstraints
-
-{<BLOCK Name="fct.vwclientesnocompran_vendedor_checkColumnConstraints">}
-#+ Check constraints on the "vwclientesnocompran.vendedor" column
-#+
-#+ @param p_vendedor - VARCHAR2(31) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwclientesnocompran_vendedor_checkColumnConstraints(p_vendedor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_vendedor LIKE vwclientesnocompran.vendedor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_vendedor IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- vendedor: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwclientesnocompran_vendedor_checkColumnConstraints
-
-{<BLOCK Name="fct.vwclientesnocompran_tipo_cliente_checkColumnConstraints">}
-#+ Check constraints on the "vwclientesnocompran.tipo_cliente" column
-#+
-#+ @param p_tipo_cliente - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwclientesnocompran_tipo_cliente_checkColumnConstraints(p_tipo_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_cliente LIKE vwclientesnocompran.tipo_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwclientesnocompran_tipo_cliente_checkColumnConstraints
-
-{<BLOCK Name="fct.vwclientesnocompran_sec_cliente_checkColumnConstraints">}
-#+ Check constraints on the "vwclientesnocompran.sec_cliente" column
-#+
-#+ @param p_sec_cliente - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwclientesnocompran_sec_cliente_checkColumnConstraints(p_sec_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_cliente LIKE vwclientesnocompran.sec_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwclientesnocompran_sec_cliente_checkColumnConstraints
-
-{<BLOCK Name="fct.vwclientesnocompran_nombre_checkColumnConstraints">}
-#+ Check constraints on the "vwclientesnocompran.nombre" column
-#+
-#+ @param p_nombre - CHAR(100) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwclientesnocompran_nombre_checkColumnConstraints(p_nombre)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombre LIKE vwclientesnocompran.nombre
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwclientesnocompran_nombre_checkColumnConstraints
-
-{<BLOCK Name="fct.vwclientesnocompran_telefono_checkColumnConstraints">}
-#+ Check constraints on the "vwclientesnocompran.telefono" column
-#+
-#+ @param p_telefono - CHAR(16) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwclientesnocompran_telefono_checkColumnConstraints(p_telefono)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_telefono LIKE vwclientesnocompran.telefono
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwclientesnocompran_telefono_checkColumnConstraints
-
-{<BLOCK Name="fct.vwclientesnocompran_telefono_casa_checkColumnConstraints">}
-#+ Check constraints on the "vwclientesnocompran.telefono_casa" column
-#+
-#+ @param p_telefono_casa - CHAR(15) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwclientesnocompran_telefono_casa_checkColumnConstraints(p_telefono_casa)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_telefono_casa LIKE vwclientesnocompran.telefono_casa
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwclientesnocompran_telefono_casa_checkColumnConstraints
-
-{<BLOCK Name="fct.vwclientesnocompran_contacto_checkColumnConstraints">}
-#+ Check constraints on the "vwclientesnocompran.contacto" column
-#+
-#+ @param p_contacto - VARCHAR2(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwclientesnocompran_contacto_checkColumnConstraints(p_contacto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_contacto LIKE vwclientesnocompran.contacto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwclientesnocompran_contacto_checkColumnConstraints
-
-{<BLOCK Name="fct.vwclientesnocompran_mes_checkColumnConstraints">}
-#+ Check constraints on the "vwclientesnocompran.mes" column
-#+
-#+ @param p_mes - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwclientesnocompran_mes_checkColumnConstraints(p_mes)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mes LIKE vwclientesnocompran.mes
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwclientesnocompran_mes_checkColumnConstraints
-
-{<BLOCK Name="fct.vwclientesnocompran_rnc_checkColumnConstraints">}
-#+ Check constraints on the "vwclientesnocompran.rnc" column
-#+
-#+ @param p_rnc - CHAR(11) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwclientesnocompran_rnc_checkColumnConstraints(p_rnc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_rnc LIKE vwclientesnocompran.rnc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwclientesnocompran_rnc_checkColumnConstraints
-
-{<BLOCK Name="fct.vwanaliticoh_checkTableConstraints">}
-#+ Check constraints on the "vwanaliticoh" table
-#+
-#+ @param p_data - a row data LIKE vwanaliticoh.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanaliticoh_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vwanaliticoh.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vwanaliticoh_control_checkColumnConstraints(p_data.control) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwanaliticoh_descripcionc_checkColumnConstraints(p_data.descripcionc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwanaliticoh_aplicaa_checkColumnConstraints(p_data.aplicaa) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwanaliticoh_descripcionapl_checkColumnConstraints(p_data.descripcionapl) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwanaliticoh_cuenta_checkColumnConstraints(p_data.cuenta) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwanaliticoh_descripcioncuenta_checkColumnConstraints(p_data.descripcioncuenta) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwanaliticoh_referencia_checkColumnConstraints(p_data.referencia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwanaliticoh_fechatransaccion_checkColumnConstraints(p_data.fechatransaccion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwanaliticoh_detalle1_checkColumnConstraints(p_data.detalle1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwanaliticoh_detalle2_checkColumnConstraints(p_data.detalle2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwanaliticoh_debito_checkColumnConstraints(p_data.debito) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwanaliticoh_credito_checkColumnConstraints(p_data.credito) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwanaliticoh_balance_checkColumnConstraints(p_data.balance) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwanaliticoh_ano_checkColumnConstraints(p_data.ano) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwanaliticoh_mes_checkColumnConstraints(p_data.mes) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwanaliticoh_codigodepartamento_checkColumnConstraints(p_data.codigodepartamento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwanaliticoh_nombredepartamento_checkColumnConstraints(p_data.nombredepartamento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwanaliticoh_usuariocreador_checkColumnConstraints(p_data.usuariocreador) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwanaliticoh_fechacreacion_checkColumnConstraints(p_data.fechacreacion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwanaliticoh_usuariomodificador_checkColumnConstraints(p_data.usuariomodificador) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwanaliticoh_fechamodificacion_checkColumnConstraints(p_data.fechamodificacion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwanaliticoh_banco_checkColumnConstraints(p_data.banco) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwanaliticoh_checkTableConstraints
-
-{<BLOCK Name="fct.vwanaliticoh_control_checkColumnConstraints">}
-#+ Check constraints on the "vwanaliticoh.control" column
-#+
-#+ @param p_control - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanaliticoh_control_checkColumnConstraints(p_control)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_control LIKE vwanaliticoh.control
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwanaliticoh_control_checkColumnConstraints
-
-{<BLOCK Name="fct.vwanaliticoh_descripcionc_checkColumnConstraints">}
-#+ Check constraints on the "vwanaliticoh.descripcionc" column
-#+
-#+ @param p_descripcionc - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanaliticoh_descripcionc_checkColumnConstraints(p_descripcionc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcionc LIKE vwanaliticoh.descripcionc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwanaliticoh_descripcionc_checkColumnConstraints
-
-{<BLOCK Name="fct.vwanaliticoh_aplicaa_checkColumnConstraints">}
-#+ Check constraints on the "vwanaliticoh.aplicaa" column
-#+
-#+ @param p_aplicaa - VARCHAR2(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanaliticoh_aplicaa_checkColumnConstraints(p_aplicaa)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_aplicaa LIKE vwanaliticoh.aplicaa
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwanaliticoh_aplicaa_checkColumnConstraints
-
-{<BLOCK Name="fct.vwanaliticoh_descripcionapl_checkColumnConstraints">}
-#+ Check constraints on the "vwanaliticoh.descripcionapl" column
-#+
-#+ @param p_descripcionapl - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanaliticoh_descripcionapl_checkColumnConstraints(p_descripcionapl)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcionapl LIKE vwanaliticoh.descripcionapl
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwanaliticoh_descripcionapl_checkColumnConstraints
-
-{<BLOCK Name="fct.vwanaliticoh_cuenta_checkColumnConstraints">}
-#+ Check constraints on the "vwanaliticoh.cuenta" column
-#+
-#+ @param p_cuenta - VARCHAR2(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanaliticoh_cuenta_checkColumnConstraints(p_cuenta)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cuenta LIKE vwanaliticoh.cuenta
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwanaliticoh_cuenta_checkColumnConstraints
-
-{<BLOCK Name="fct.vwanaliticoh_descripcioncuenta_checkColumnConstraints">}
-#+ Check constraints on the "vwanaliticoh.descripcioncuenta" column
-#+
-#+ @param p_descripcioncuenta - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanaliticoh_descripcioncuenta_checkColumnConstraints(p_descripcioncuenta)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcioncuenta LIKE vwanaliticoh.descripcioncuenta
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwanaliticoh_descripcioncuenta_checkColumnConstraints
-
-{<BLOCK Name="fct.vwanaliticoh_referencia_checkColumnConstraints">}
-#+ Check constraints on the "vwanaliticoh.referencia" column
-#+
-#+ @param p_referencia - VARCHAR2(14) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanaliticoh_referencia_checkColumnConstraints(p_referencia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_referencia LIKE vwanaliticoh.referencia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_referencia IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- referencia: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwanaliticoh_referencia_checkColumnConstraints
-
-{<BLOCK Name="fct.vwanaliticoh_fechatransaccion_checkColumnConstraints">}
-#+ Check constraints on the "vwanaliticoh.fechatransaccion" column
-#+
-#+ @param p_fechatransaccion - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanaliticoh_fechatransaccion_checkColumnConstraints(p_fechatransaccion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fechatransaccion LIKE vwanaliticoh.fechatransaccion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwanaliticoh_fechatransaccion_checkColumnConstraints
-
-{<BLOCK Name="fct.vwanaliticoh_detalle1_checkColumnConstraints">}
-#+ Check constraints on the "vwanaliticoh.detalle1" column
-#+
-#+ @param p_detalle1 - VARCHAR2(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanaliticoh_detalle1_checkColumnConstraints(p_detalle1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_detalle1 LIKE vwanaliticoh.detalle1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwanaliticoh_detalle1_checkColumnConstraints
-
-{<BLOCK Name="fct.vwanaliticoh_detalle2_checkColumnConstraints">}
-#+ Check constraints on the "vwanaliticoh.detalle2" column
-#+
-#+ @param p_detalle2 - VARCHAR2(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanaliticoh_detalle2_checkColumnConstraints(p_detalle2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_detalle2 LIKE vwanaliticoh.detalle2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwanaliticoh_detalle2_checkColumnConstraints
-
-{<BLOCK Name="fct.vwanaliticoh_debito_checkColumnConstraints">}
-#+ Check constraints on the "vwanaliticoh.debito" column
-#+
-#+ @param p_debito - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanaliticoh_debito_checkColumnConstraints(p_debito)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_debito LIKE vwanaliticoh.debito
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwanaliticoh_debito_checkColumnConstraints
-
-{<BLOCK Name="fct.vwanaliticoh_credito_checkColumnConstraints">}
-#+ Check constraints on the "vwanaliticoh.credito" column
-#+
-#+ @param p_credito - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanaliticoh_credito_checkColumnConstraints(p_credito)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_credito LIKE vwanaliticoh.credito
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwanaliticoh_credito_checkColumnConstraints
-
-{<BLOCK Name="fct.vwanaliticoh_balance_checkColumnConstraints">}
-#+ Check constraints on the "vwanaliticoh.balance" column
-#+
-#+ @param p_balance - DECIMAL(13,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanaliticoh_balance_checkColumnConstraints(p_balance)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_balance LIKE vwanaliticoh.balance
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwanaliticoh_balance_checkColumnConstraints
-
-{<BLOCK Name="fct.vwanaliticoh_ano_checkColumnConstraints">}
-#+ Check constraints on the "vwanaliticoh.ano" column
-#+
-#+ @param p_ano - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanaliticoh_ano_checkColumnConstraints(p_ano)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ano LIKE vwanaliticoh.ano
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwanaliticoh_ano_checkColumnConstraints
-
-{<BLOCK Name="fct.vwanaliticoh_mes_checkColumnConstraints">}
-#+ Check constraints on the "vwanaliticoh.mes" column
-#+
-#+ @param p_mes - VARCHAR2(41) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanaliticoh_mes_checkColumnConstraints(p_mes)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mes LIKE vwanaliticoh.mes
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwanaliticoh_mes_checkColumnConstraints
-
-{<BLOCK Name="fct.vwanaliticoh_codigodepartamento_checkColumnConstraints">}
-#+ Check constraints on the "vwanaliticoh.codigodepartamento" column
-#+
-#+ @param p_codigodepartamento - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanaliticoh_codigodepartamento_checkColumnConstraints(p_codigodepartamento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codigodepartamento LIKE vwanaliticoh.codigodepartamento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwanaliticoh_codigodepartamento_checkColumnConstraints
-
-{<BLOCK Name="fct.vwanaliticoh_nombredepartamento_checkColumnConstraints">}
-#+ Check constraints on the "vwanaliticoh.nombredepartamento" column
-#+
-#+ @param p_nombredepartamento - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanaliticoh_nombredepartamento_checkColumnConstraints(p_nombredepartamento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombredepartamento LIKE vwanaliticoh.nombredepartamento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwanaliticoh_nombredepartamento_checkColumnConstraints
-
-{<BLOCK Name="fct.vwanaliticoh_usuariocreador_checkColumnConstraints">}
-#+ Check constraints on the "vwanaliticoh.usuariocreador" column
-#+
-#+ @param p_usuariocreador - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanaliticoh_usuariocreador_checkColumnConstraints(p_usuariocreador)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_usuariocreador LIKE vwanaliticoh.usuariocreador
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwanaliticoh_usuariocreador_checkColumnConstraints
-
-{<BLOCK Name="fct.vwanaliticoh_fechacreacion_checkColumnConstraints">}
-#+ Check constraints on the "vwanaliticoh.fechacreacion" column
-#+
-#+ @param p_fechacreacion - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanaliticoh_fechacreacion_checkColumnConstraints(p_fechacreacion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fechacreacion LIKE vwanaliticoh.fechacreacion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwanaliticoh_fechacreacion_checkColumnConstraints
-
-{<BLOCK Name="fct.vwanaliticoh_usuariomodificador_checkColumnConstraints">}
-#+ Check constraints on the "vwanaliticoh.usuariomodificador" column
-#+
-#+ @param p_usuariomodificador - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanaliticoh_usuariomodificador_checkColumnConstraints(p_usuariomodificador)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_usuariomodificador LIKE vwanaliticoh.usuariomodificador
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwanaliticoh_usuariomodificador_checkColumnConstraints
-
-{<BLOCK Name="fct.vwanaliticoh_fechamodificacion_checkColumnConstraints">}
-#+ Check constraints on the "vwanaliticoh.fechamodificacion" column
-#+
-#+ @param p_fechamodificacion - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanaliticoh_fechamodificacion_checkColumnConstraints(p_fechamodificacion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fechamodificacion LIKE vwanaliticoh.fechamodificacion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwanaliticoh_fechamodificacion_checkColumnConstraints
-
-{<BLOCK Name="fct.vwanaliticoh_banco_checkColumnConstraints">}
-#+ Check constraints on the "vwanaliticoh.banco" column
-#+
-#+ @param p_banco - VARCHAR2(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanaliticoh_banco_checkColumnConstraints(p_banco)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_banco LIKE vwanaliticoh.banco
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwanaliticoh_banco_checkColumnConstraints
-
-{<BLOCK Name="fct.vwanalitico_checkTableConstraints">}
-#+ Check constraints on the "vwanalitico" table
-#+
-#+ @param p_data - a row data LIKE vwanalitico.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanalitico_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vwanalitico.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vwanalitico_control_checkColumnConstraints(p_data.control) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwanalitico_descripcionc_checkColumnConstraints(p_data.descripcionc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwanalitico_aplicaa_checkColumnConstraints(p_data.aplicaa) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwanalitico_descripcionapl_checkColumnConstraints(p_data.descripcionapl) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwanalitico_cuenta_checkColumnConstraints(p_data.cuenta) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwanalitico_descripcioncuenta_checkColumnConstraints(p_data.descripcioncuenta) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwanalitico_referencia_checkColumnConstraints(p_data.referencia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwanalitico_fechatransaccion_checkColumnConstraints(p_data.fechatransaccion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwanalitico_detalle1_checkColumnConstraints(p_data.detalle1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwanalitico_detalle2_checkColumnConstraints(p_data.detalle2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwanalitico_debito_checkColumnConstraints(p_data.debito) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwanalitico_credito_checkColumnConstraints(p_data.credito) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwanalitico_balance_checkColumnConstraints(p_data.balance) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwanalitico_ano_checkColumnConstraints(p_data.ano) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwanalitico_mes_checkColumnConstraints(p_data.mes) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwanalitico_codigodepartamento_checkColumnConstraints(p_data.codigodepartamento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwanalitico_nombredepartamento_checkColumnConstraints(p_data.nombredepartamento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwanalitico_usuariocreador_checkColumnConstraints(p_data.usuariocreador) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwanalitico_fechacreacion_checkColumnConstraints(p_data.fechacreacion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwanalitico_usuariomodificador_checkColumnConstraints(p_data.usuariomodificador) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwanalitico_fechamodificacion_checkColumnConstraints(p_data.fechamodificacion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwanalitico_banco_checkColumnConstraints(p_data.banco) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwanalitico_checkTableConstraints
-
-{<BLOCK Name="fct.vwanalitico_control_checkColumnConstraints">}
-#+ Check constraints on the "vwanalitico.control" column
-#+
-#+ @param p_control - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanalitico_control_checkColumnConstraints(p_control)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_control LIKE vwanalitico.control
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwanalitico_control_checkColumnConstraints
-
-{<BLOCK Name="fct.vwanalitico_descripcionc_checkColumnConstraints">}
-#+ Check constraints on the "vwanalitico.descripcionc" column
-#+
-#+ @param p_descripcionc - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanalitico_descripcionc_checkColumnConstraints(p_descripcionc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcionc LIKE vwanalitico.descripcionc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwanalitico_descripcionc_checkColumnConstraints
-
-{<BLOCK Name="fct.vwanalitico_aplicaa_checkColumnConstraints">}
-#+ Check constraints on the "vwanalitico.aplicaa" column
-#+
-#+ @param p_aplicaa - VARCHAR2(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanalitico_aplicaa_checkColumnConstraints(p_aplicaa)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_aplicaa LIKE vwanalitico.aplicaa
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwanalitico_aplicaa_checkColumnConstraints
-
-{<BLOCK Name="fct.vwanalitico_descripcionapl_checkColumnConstraints">}
-#+ Check constraints on the "vwanalitico.descripcionapl" column
-#+
-#+ @param p_descripcionapl - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanalitico_descripcionapl_checkColumnConstraints(p_descripcionapl)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcionapl LIKE vwanalitico.descripcionapl
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwanalitico_descripcionapl_checkColumnConstraints
-
-{<BLOCK Name="fct.vwanalitico_cuenta_checkColumnConstraints">}
-#+ Check constraints on the "vwanalitico.cuenta" column
-#+
-#+ @param p_cuenta - VARCHAR2(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanalitico_cuenta_checkColumnConstraints(p_cuenta)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cuenta LIKE vwanalitico.cuenta
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwanalitico_cuenta_checkColumnConstraints
-
-{<BLOCK Name="fct.vwanalitico_descripcioncuenta_checkColumnConstraints">}
-#+ Check constraints on the "vwanalitico.descripcioncuenta" column
-#+
-#+ @param p_descripcioncuenta - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanalitico_descripcioncuenta_checkColumnConstraints(p_descripcioncuenta)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcioncuenta LIKE vwanalitico.descripcioncuenta
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwanalitico_descripcioncuenta_checkColumnConstraints
-
-{<BLOCK Name="fct.vwanalitico_referencia_checkColumnConstraints">}
-#+ Check constraints on the "vwanalitico.referencia" column
-#+
-#+ @param p_referencia - VARCHAR2(14) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanalitico_referencia_checkColumnConstraints(p_referencia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_referencia LIKE vwanalitico.referencia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_referencia IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- referencia: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwanalitico_referencia_checkColumnConstraints
-
-{<BLOCK Name="fct.vwanalitico_fechatransaccion_checkColumnConstraints">}
-#+ Check constraints on the "vwanalitico.fechatransaccion" column
-#+
-#+ @param p_fechatransaccion - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanalitico_fechatransaccion_checkColumnConstraints(p_fechatransaccion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fechatransaccion LIKE vwanalitico.fechatransaccion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwanalitico_fechatransaccion_checkColumnConstraints
-
-{<BLOCK Name="fct.vwanalitico_detalle1_checkColumnConstraints">}
-#+ Check constraints on the "vwanalitico.detalle1" column
-#+
-#+ @param p_detalle1 - VARCHAR2(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanalitico_detalle1_checkColumnConstraints(p_detalle1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_detalle1 LIKE vwanalitico.detalle1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwanalitico_detalle1_checkColumnConstraints
-
-{<BLOCK Name="fct.vwanalitico_detalle2_checkColumnConstraints">}
-#+ Check constraints on the "vwanalitico.detalle2" column
-#+
-#+ @param p_detalle2 - VARCHAR2(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanalitico_detalle2_checkColumnConstraints(p_detalle2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_detalle2 LIKE vwanalitico.detalle2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwanalitico_detalle2_checkColumnConstraints
-
-{<BLOCK Name="fct.vwanalitico_debito_checkColumnConstraints">}
-#+ Check constraints on the "vwanalitico.debito" column
-#+
-#+ @param p_debito - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanalitico_debito_checkColumnConstraints(p_debito)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_debito LIKE vwanalitico.debito
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwanalitico_debito_checkColumnConstraints
-
-{<BLOCK Name="fct.vwanalitico_credito_checkColumnConstraints">}
-#+ Check constraints on the "vwanalitico.credito" column
-#+
-#+ @param p_credito - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanalitico_credito_checkColumnConstraints(p_credito)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_credito LIKE vwanalitico.credito
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwanalitico_credito_checkColumnConstraints
-
-{<BLOCK Name="fct.vwanalitico_balance_checkColumnConstraints">}
-#+ Check constraints on the "vwanalitico.balance" column
-#+
-#+ @param p_balance - DECIMAL(13,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanalitico_balance_checkColumnConstraints(p_balance)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_balance LIKE vwanalitico.balance
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwanalitico_balance_checkColumnConstraints
-
-{<BLOCK Name="fct.vwanalitico_ano_checkColumnConstraints">}
-#+ Check constraints on the "vwanalitico.ano" column
-#+
-#+ @param p_ano - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanalitico_ano_checkColumnConstraints(p_ano)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ano LIKE vwanalitico.ano
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwanalitico_ano_checkColumnConstraints
-
-{<BLOCK Name="fct.vwanalitico_mes_checkColumnConstraints">}
-#+ Check constraints on the "vwanalitico.mes" column
-#+
-#+ @param p_mes - VARCHAR2(41) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanalitico_mes_checkColumnConstraints(p_mes)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mes LIKE vwanalitico.mes
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwanalitico_mes_checkColumnConstraints
-
-{<BLOCK Name="fct.vwanalitico_codigodepartamento_checkColumnConstraints">}
-#+ Check constraints on the "vwanalitico.codigodepartamento" column
-#+
-#+ @param p_codigodepartamento - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanalitico_codigodepartamento_checkColumnConstraints(p_codigodepartamento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codigodepartamento LIKE vwanalitico.codigodepartamento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwanalitico_codigodepartamento_checkColumnConstraints
-
-{<BLOCK Name="fct.vwanalitico_nombredepartamento_checkColumnConstraints">}
-#+ Check constraints on the "vwanalitico.nombredepartamento" column
-#+
-#+ @param p_nombredepartamento - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanalitico_nombredepartamento_checkColumnConstraints(p_nombredepartamento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombredepartamento LIKE vwanalitico.nombredepartamento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwanalitico_nombredepartamento_checkColumnConstraints
-
-{<BLOCK Name="fct.vwanalitico_usuariocreador_checkColumnConstraints">}
-#+ Check constraints on the "vwanalitico.usuariocreador" column
-#+
-#+ @param p_usuariocreador - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanalitico_usuariocreador_checkColumnConstraints(p_usuariocreador)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_usuariocreador LIKE vwanalitico.usuariocreador
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwanalitico_usuariocreador_checkColumnConstraints
-
-{<BLOCK Name="fct.vwanalitico_fechacreacion_checkColumnConstraints">}
-#+ Check constraints on the "vwanalitico.fechacreacion" column
-#+
-#+ @param p_fechacreacion - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanalitico_fechacreacion_checkColumnConstraints(p_fechacreacion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fechacreacion LIKE vwanalitico.fechacreacion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwanalitico_fechacreacion_checkColumnConstraints
-
-{<BLOCK Name="fct.vwanalitico_usuariomodificador_checkColumnConstraints">}
-#+ Check constraints on the "vwanalitico.usuariomodificador" column
-#+
-#+ @param p_usuariomodificador - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanalitico_usuariomodificador_checkColumnConstraints(p_usuariomodificador)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_usuariomodificador LIKE vwanalitico.usuariomodificador
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwanalitico_usuariomodificador_checkColumnConstraints
-
-{<BLOCK Name="fct.vwanalitico_fechamodificacion_checkColumnConstraints">}
-#+ Check constraints on the "vwanalitico.fechamodificacion" column
-#+
-#+ @param p_fechamodificacion - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanalitico_fechamodificacion_checkColumnConstraints(p_fechamodificacion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fechamodificacion LIKE vwanalitico.fechamodificacion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwanalitico_fechamodificacion_checkColumnConstraints
-
-{<BLOCK Name="fct.vwanalitico_banco_checkColumnConstraints">}
-#+ Check constraints on the "vwanalitico.banco" column
-#+
-#+ @param p_banco - VARCHAR2(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanalitico_banco_checkColumnConstraints(p_banco)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_banco LIKE vwanalitico.banco
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwanalitico_banco_checkColumnConstraints
-
-{<BLOCK Name="fct.vwanalisisventas_checkTableConstraints">}
-#+ Check constraints on the "vwanalisisventas" table
-#+
-#+ @param p_data - a row data LIKE vwanalisisventas.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanalisisventas_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vwanalisisventas.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vwanalisisventas_control_checkColumnConstraints(p_data.control) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwanalisisventas_descripcionc_checkColumnConstraints(p_data.descripcionc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwanalisisventas_aplicaa_checkColumnConstraints(p_data.aplicaa) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwanalisisventas_descripcionapl_checkColumnConstraints(p_data.descripcionapl) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwanalisisventas_cuenta_checkColumnConstraints(p_data.cuenta) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwanalisisventas_descripcioncuenta_checkColumnConstraints(p_data.descripcioncuenta) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwanalisisventas_referencia_checkColumnConstraints(p_data.referencia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwanalisisventas_fechatransaccion_checkColumnConstraints(p_data.fechatransaccion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwanalisisventas_detalle1_checkColumnConstraints(p_data.detalle1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwanalisisventas_detalle2_checkColumnConstraints(p_data.detalle2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwanalisisventas_debito_checkColumnConstraints(p_data.debito) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwanalisisventas_credito_checkColumnConstraints(p_data.credito) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwanalisisventas_balance_checkColumnConstraints(p_data.balance) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwanalisisventas_ano_checkColumnConstraints(p_data.ano) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwanalisisventas_mes_checkColumnConstraints(p_data.mes) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwanalisisventas_codigodepartamento_checkColumnConstraints(p_data.codigodepartamento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwanalisisventas_nombredepartamento_checkColumnConstraints(p_data.nombredepartamento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwanalisisventas_usuariocreador_checkColumnConstraints(p_data.usuariocreador) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwanalisisventas_fechacreacion_checkColumnConstraints(p_data.fechacreacion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwanalisisventas_usuariomodificador_checkColumnConstraints(p_data.usuariomodificador) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwanalisisventas_fechamodificacion_checkColumnConstraints(p_data.fechamodificacion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vwanalisisventas_banco_checkColumnConstraints(p_data.banco) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwanalisisventas_checkTableConstraints
-
-{<BLOCK Name="fct.vwanalisisventas_control_checkColumnConstraints">}
-#+ Check constraints on the "vwanalisisventas.control" column
-#+
-#+ @param p_control - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanalisisventas_control_checkColumnConstraints(p_control)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_control LIKE vwanalisisventas.control
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwanalisisventas_control_checkColumnConstraints
-
-{<BLOCK Name="fct.vwanalisisventas_descripcionc_checkColumnConstraints">}
-#+ Check constraints on the "vwanalisisventas.descripcionc" column
-#+
-#+ @param p_descripcionc - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanalisisventas_descripcionc_checkColumnConstraints(p_descripcionc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcionc LIKE vwanalisisventas.descripcionc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwanalisisventas_descripcionc_checkColumnConstraints
-
-{<BLOCK Name="fct.vwanalisisventas_aplicaa_checkColumnConstraints">}
-#+ Check constraints on the "vwanalisisventas.aplicaa" column
-#+
-#+ @param p_aplicaa - VARCHAR2(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanalisisventas_aplicaa_checkColumnConstraints(p_aplicaa)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_aplicaa LIKE vwanalisisventas.aplicaa
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwanalisisventas_aplicaa_checkColumnConstraints
-
-{<BLOCK Name="fct.vwanalisisventas_descripcionapl_checkColumnConstraints">}
-#+ Check constraints on the "vwanalisisventas.descripcionapl" column
-#+
-#+ @param p_descripcionapl - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanalisisventas_descripcionapl_checkColumnConstraints(p_descripcionapl)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcionapl LIKE vwanalisisventas.descripcionapl
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwanalisisventas_descripcionapl_checkColumnConstraints
-
-{<BLOCK Name="fct.vwanalisisventas_cuenta_checkColumnConstraints">}
-#+ Check constraints on the "vwanalisisventas.cuenta" column
-#+
-#+ @param p_cuenta - VARCHAR2(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanalisisventas_cuenta_checkColumnConstraints(p_cuenta)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cuenta LIKE vwanalisisventas.cuenta
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwanalisisventas_cuenta_checkColumnConstraints
-
-{<BLOCK Name="fct.vwanalisisventas_descripcioncuenta_checkColumnConstraints">}
-#+ Check constraints on the "vwanalisisventas.descripcioncuenta" column
-#+
-#+ @param p_descripcioncuenta - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanalisisventas_descripcioncuenta_checkColumnConstraints(p_descripcioncuenta)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcioncuenta LIKE vwanalisisventas.descripcioncuenta
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwanalisisventas_descripcioncuenta_checkColumnConstraints
-
-{<BLOCK Name="fct.vwanalisisventas_referencia_checkColumnConstraints">}
-#+ Check constraints on the "vwanalisisventas.referencia" column
-#+
-#+ @param p_referencia - VARCHAR2(14) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanalisisventas_referencia_checkColumnConstraints(p_referencia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_referencia LIKE vwanalisisventas.referencia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_referencia IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- referencia: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwanalisisventas_referencia_checkColumnConstraints
-
-{<BLOCK Name="fct.vwanalisisventas_fechatransaccion_checkColumnConstraints">}
-#+ Check constraints on the "vwanalisisventas.fechatransaccion" column
-#+
-#+ @param p_fechatransaccion - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanalisisventas_fechatransaccion_checkColumnConstraints(p_fechatransaccion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fechatransaccion LIKE vwanalisisventas.fechatransaccion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwanalisisventas_fechatransaccion_checkColumnConstraints
-
-{<BLOCK Name="fct.vwanalisisventas_detalle1_checkColumnConstraints">}
-#+ Check constraints on the "vwanalisisventas.detalle1" column
-#+
-#+ @param p_detalle1 - VARCHAR2(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanalisisventas_detalle1_checkColumnConstraints(p_detalle1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_detalle1 LIKE vwanalisisventas.detalle1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwanalisisventas_detalle1_checkColumnConstraints
-
-{<BLOCK Name="fct.vwanalisisventas_detalle2_checkColumnConstraints">}
-#+ Check constraints on the "vwanalisisventas.detalle2" column
-#+
-#+ @param p_detalle2 - VARCHAR2(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanalisisventas_detalle2_checkColumnConstraints(p_detalle2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_detalle2 LIKE vwanalisisventas.detalle2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwanalisisventas_detalle2_checkColumnConstraints
-
-{<BLOCK Name="fct.vwanalisisventas_debito_checkColumnConstraints">}
-#+ Check constraints on the "vwanalisisventas.debito" column
-#+
-#+ @param p_debito - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanalisisventas_debito_checkColumnConstraints(p_debito)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_debito LIKE vwanalisisventas.debito
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwanalisisventas_debito_checkColumnConstraints
-
-{<BLOCK Name="fct.vwanalisisventas_credito_checkColumnConstraints">}
-#+ Check constraints on the "vwanalisisventas.credito" column
-#+
-#+ @param p_credito - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanalisisventas_credito_checkColumnConstraints(p_credito)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_credito LIKE vwanalisisventas.credito
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwanalisisventas_credito_checkColumnConstraints
-
-{<BLOCK Name="fct.vwanalisisventas_balance_checkColumnConstraints">}
-#+ Check constraints on the "vwanalisisventas.balance" column
-#+
-#+ @param p_balance - DECIMAL(13,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanalisisventas_balance_checkColumnConstraints(p_balance)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_balance LIKE vwanalisisventas.balance
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwanalisisventas_balance_checkColumnConstraints
-
-{<BLOCK Name="fct.vwanalisisventas_ano_checkColumnConstraints">}
-#+ Check constraints on the "vwanalisisventas.ano" column
-#+
-#+ @param p_ano - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanalisisventas_ano_checkColumnConstraints(p_ano)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ano LIKE vwanalisisventas.ano
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwanalisisventas_ano_checkColumnConstraints
-
-{<BLOCK Name="fct.vwanalisisventas_mes_checkColumnConstraints">}
-#+ Check constraints on the "vwanalisisventas.mes" column
-#+
-#+ @param p_mes - VARCHAR2(41) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanalisisventas_mes_checkColumnConstraints(p_mes)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mes LIKE vwanalisisventas.mes
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwanalisisventas_mes_checkColumnConstraints
-
-{<BLOCK Name="fct.vwanalisisventas_codigodepartamento_checkColumnConstraints">}
-#+ Check constraints on the "vwanalisisventas.codigodepartamento" column
-#+
-#+ @param p_codigodepartamento - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanalisisventas_codigodepartamento_checkColumnConstraints(p_codigodepartamento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codigodepartamento LIKE vwanalisisventas.codigodepartamento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwanalisisventas_codigodepartamento_checkColumnConstraints
-
-{<BLOCK Name="fct.vwanalisisventas_nombredepartamento_checkColumnConstraints">}
-#+ Check constraints on the "vwanalisisventas.nombredepartamento" column
-#+
-#+ @param p_nombredepartamento - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanalisisventas_nombredepartamento_checkColumnConstraints(p_nombredepartamento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombredepartamento LIKE vwanalisisventas.nombredepartamento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwanalisisventas_nombredepartamento_checkColumnConstraints
-
-{<BLOCK Name="fct.vwanalisisventas_usuariocreador_checkColumnConstraints">}
-#+ Check constraints on the "vwanalisisventas.usuariocreador" column
-#+
-#+ @param p_usuariocreador - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanalisisventas_usuariocreador_checkColumnConstraints(p_usuariocreador)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_usuariocreador LIKE vwanalisisventas.usuariocreador
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwanalisisventas_usuariocreador_checkColumnConstraints
-
-{<BLOCK Name="fct.vwanalisisventas_fechacreacion_checkColumnConstraints">}
-#+ Check constraints on the "vwanalisisventas.fechacreacion" column
-#+
-#+ @param p_fechacreacion - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanalisisventas_fechacreacion_checkColumnConstraints(p_fechacreacion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fechacreacion LIKE vwanalisisventas.fechacreacion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwanalisisventas_fechacreacion_checkColumnConstraints
-
-{<BLOCK Name="fct.vwanalisisventas_usuariomodificador_checkColumnConstraints">}
-#+ Check constraints on the "vwanalisisventas.usuariomodificador" column
-#+
-#+ @param p_usuariomodificador - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanalisisventas_usuariomodificador_checkColumnConstraints(p_usuariomodificador)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_usuariomodificador LIKE vwanalisisventas.usuariomodificador
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwanalisisventas_usuariomodificador_checkColumnConstraints
-
-{<BLOCK Name="fct.vwanalisisventas_fechamodificacion_checkColumnConstraints">}
-#+ Check constraints on the "vwanalisisventas.fechamodificacion" column
-#+
-#+ @param p_fechamodificacion - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanalisisventas_fechamodificacion_checkColumnConstraints(p_fechamodificacion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fechamodificacion LIKE vwanalisisventas.fechamodificacion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwanalisisventas_fechamodificacion_checkColumnConstraints
-
-{<BLOCK Name="fct.vwanalisisventas_banco_checkColumnConstraints">}
-#+ Check constraints on the "vwanalisisventas.banco" column
-#+
-#+ @param p_banco - VARCHAR2(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vwanalisisventas_banco_checkColumnConstraints(p_banco)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_banco LIKE vwanalisisventas.banco
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vwanalisisventas_banco_checkColumnConstraints
-
-{<BLOCK Name="fct.viejo1_checkTableConstraints">}
-#+ Check constraints on the "viejo1" table
-#+
-#+ @param p_data - a row data LIKE viejo1.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_viejo1_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE viejo1.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_viejo1_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_viejo1_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_viejo1_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_viejo1_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_viejo1_codn_checkColumnConstraints(p_data.codn) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_viejo1_codgrupo_checkColumnConstraints(p_data.codgrupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_viejo1_codtipo_checkColumnConstraints(p_data.codtipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_viejo1_codsec_checkColumnConstraints(p_data.codsec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.viejo1_checkTableConstraints
-
-{<BLOCK Name="fct.viejo1_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "viejo1.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_viejo1_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE viejo1.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.viejo1_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.viejo1_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "viejo1.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_viejo1_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE viejo1.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.viejo1_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.viejo1_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "viejo1.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_viejo1_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE viejo1.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.viejo1_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.viejo1_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "viejo1.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_viejo1_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE viejo1.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.viejo1_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.viejo1_codn_checkColumnConstraints">}
-#+ Check constraints on the "viejo1.codn" column
-#+
-#+ @param p_codn - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_viejo1_codn_checkColumnConstraints(p_codn)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codn LIKE viejo1.codn
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.viejo1_codn_checkColumnConstraints
-
-{<BLOCK Name="fct.viejo1_codgrupo_checkColumnConstraints">}
-#+ Check constraints on the "viejo1.codgrupo" column
-#+
-#+ @param p_codgrupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_viejo1_codgrupo_checkColumnConstraints(p_codgrupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codgrupo LIKE viejo1.codgrupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.viejo1_codgrupo_checkColumnConstraints
-
-{<BLOCK Name="fct.viejo1_codtipo_checkColumnConstraints">}
-#+ Check constraints on the "viejo1.codtipo" column
-#+
-#+ @param p_codtipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_viejo1_codtipo_checkColumnConstraints(p_codtipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codtipo LIKE viejo1.codtipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.viejo1_codtipo_checkColumnConstraints
-
-{<BLOCK Name="fct.viejo1_codsec_checkColumnConstraints">}
-#+ Check constraints on the "viejo1.codsec" column
-#+
-#+ @param p_codsec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_viejo1_codsec_checkColumnConstraints(p_codsec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codsec LIKE viejo1.codsec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.viejo1_codsec_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00090_checkTableConstraints">}
-#+ Check constraints on the "vetb00090" table
-#+
-#+ @param p_data - a row data LIKE vetb00090.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00090_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vetb00090.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vetb00090_tipo_cliente_checkColumnConstraints(p_data.tipo_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00090_sec_cliente_checkColumnConstraints(p_data.sec_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00090_porc_comision_checkColumnConstraints(p_data.porc_comision) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00090_fecha_termino_checkColumnConstraints(p_data.fecha_termino) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00090_sec_vend_checkColumnConstraints(p_data.sec_vend) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00090_estatus_checkColumnConstraints(p_data.estatus) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00090_checkTableConstraints
-
-{<BLOCK Name="fct.vetb00090_tipo_cliente_checkColumnConstraints">}
-#+ Check constraints on the "vetb00090.tipo_cliente" column
-#+
-#+ @param p_tipo_cliente - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00090_tipo_cliente_checkColumnConstraints(p_tipo_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_cliente LIKE vetb00090.tipo_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00090_tipo_cliente_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00090_sec_cliente_checkColumnConstraints">}
-#+ Check constraints on the "vetb00090.sec_cliente" column
-#+
-#+ @param p_sec_cliente - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00090_sec_cliente_checkColumnConstraints(p_sec_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_cliente LIKE vetb00090.sec_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00090_sec_cliente_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00090_porc_comision_checkColumnConstraints">}
-#+ Check constraints on the "vetb00090.porc_comision" column
-#+
-#+ @param p_porc_comision - DECIMAL(18,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00090_porc_comision_checkColumnConstraints(p_porc_comision)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_porc_comision LIKE vetb00090.porc_comision
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00090_porc_comision_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00090_fecha_termino_checkColumnConstraints">}
-#+ Check constraints on the "vetb00090.fecha_termino" column
-#+
-#+ @param p_fecha_termino - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00090_fecha_termino_checkColumnConstraints(p_fecha_termino)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_termino LIKE vetb00090.fecha_termino
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00090_fecha_termino_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00090_sec_vend_checkColumnConstraints">}
-#+ Check constraints on the "vetb00090.sec_vend" column
-#+
-#+ @param p_sec_vend - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00090_sec_vend_checkColumnConstraints(p_sec_vend)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_vend LIKE vetb00090.sec_vend
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00090_sec_vend_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00090_estatus_checkColumnConstraints">}
-#+ Check constraints on the "vetb00090.estatus" column
-#+
-#+ @param p_estatus - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00090_estatus_checkColumnConstraints(p_estatus)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_estatus LIKE vetb00090.estatus
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00090_estatus_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00088_checkTableConstraints">}
-#+ Check constraints on the "vetb00088" table
-#+
-#+ @param p_data - a row data LIKE vetb00088.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00088_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vetb00088.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vetb00088_cotizacion_no_checkColumnConstraints(p_data.cotizacion_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00088_fecha_autorizacion_checkColumnConstraints(p_data.fecha_autorizacion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00088_us_autoriza_checkColumnConstraints(p_data.us_autoriza) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00088_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00088_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00088_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00088_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00088_porc_descuento_checkColumnConstraints(p_data.porc_descuento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00088_autoriza_checkColumnConstraints(p_data.autoriza) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00088_checkTableConstraints
-
-{<BLOCK Name="fct.vetb00088_cotizacion_no_checkColumnConstraints">}
-#+ Check constraints on the "vetb00088.cotizacion_no" column
-#+
-#+ @param p_cotizacion_no - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00088_cotizacion_no_checkColumnConstraints(p_cotizacion_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cotizacion_no LIKE vetb00088.cotizacion_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00088_cotizacion_no_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00088_fecha_autorizacion_checkColumnConstraints">}
-#+ Check constraints on the "vetb00088.fecha_autorizacion" column
-#+
-#+ @param p_fecha_autorizacion - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00088_fecha_autorizacion_checkColumnConstraints(p_fecha_autorizacion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_autorizacion LIKE vetb00088.fecha_autorizacion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00088_fecha_autorizacion_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00088_us_autoriza_checkColumnConstraints">}
-#+ Check constraints on the "vetb00088.us_autoriza" column
-#+
-#+ @param p_us_autoriza - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00088_us_autoriza_checkColumnConstraints(p_us_autoriza)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_autoriza LIKE vetb00088.us_autoriza
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00088_us_autoriza_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00088_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "vetb00088.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00088_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE vetb00088.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00088_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00088_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "vetb00088.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00088_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE vetb00088.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00088_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00088_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "vetb00088.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00088_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE vetb00088.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00088_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00088_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "vetb00088.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00088_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE vetb00088.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00088_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00088_porc_descuento_checkColumnConstraints">}
-#+ Check constraints on the "vetb00088.porc_descuento" column
-#+
-#+ @param p_porc_descuento - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00088_porc_descuento_checkColumnConstraints(p_porc_descuento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_porc_descuento LIKE vetb00088.porc_descuento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00088_porc_descuento_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00088_autoriza_checkColumnConstraints">}
-#+ Check constraints on the "vetb00088.autoriza" column
-#+
-#+ @param p_autoriza - CHAR(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00088_autoriza_checkColumnConstraints(p_autoriza)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_autoriza LIKE vetb00088.autoriza
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00088_autoriza_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00087_checkTableConstraints">}
-#+ Check constraints on the "vetb00087" table
-#+
-#+ @param p_data - a row data LIKE vetb00087.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00087_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vetb00087.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vetb00087_tipo_cliente_checkColumnConstraints(p_data.tipo_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00087_sec_cliente_checkColumnConstraints(p_data.sec_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00087_contacto_checkColumnConstraints(p_data.contacto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00087_puesto_checkColumnConstraints(p_data.puesto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00087_puesto1_checkColumnConstraints(p_data.puesto1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00087_email_checkColumnConstraints(p_data.email) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00087_celular_checkColumnConstraints(p_data.celular) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00087_telefono_of_checkColumnConstraints(p_data.telefono_of) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00087_telefono_casa_checkColumnConstraints(p_data.telefono_casa) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00087_id_checkColumnConstraints(p_data.id) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00087_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00087_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00087_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00087_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00087_checkTableConstraints
-
-{<BLOCK Name="fct.vetb00087_tipo_cliente_checkColumnConstraints">}
-#+ Check constraints on the "vetb00087.tipo_cliente" column
-#+
-#+ @param p_tipo_cliente - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00087_tipo_cliente_checkColumnConstraints(p_tipo_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_cliente LIKE vetb00087.tipo_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00087_tipo_cliente_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00087_sec_cliente_checkColumnConstraints">}
-#+ Check constraints on the "vetb00087.sec_cliente" column
-#+
-#+ @param p_sec_cliente - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00087_sec_cliente_checkColumnConstraints(p_sec_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_cliente LIKE vetb00087.sec_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00087_sec_cliente_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00087_contacto_checkColumnConstraints">}
-#+ Check constraints on the "vetb00087.contacto" column
-#+
-#+ @param p_contacto - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00087_contacto_checkColumnConstraints(p_contacto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_contacto LIKE vetb00087.contacto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00087_contacto_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00087_puesto_checkColumnConstraints">}
-#+ Check constraints on the "vetb00087.puesto" column
-#+
-#+ @param p_puesto - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00087_puesto_checkColumnConstraints(p_puesto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_puesto LIKE vetb00087.puesto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00087_puesto_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00087_puesto1_checkColumnConstraints">}
-#+ Check constraints on the "vetb00087.puesto1" column
-#+
-#+ @param p_puesto1 - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00087_puesto1_checkColumnConstraints(p_puesto1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_puesto1 LIKE vetb00087.puesto1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00087_puesto1_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00087_email_checkColumnConstraints">}
-#+ Check constraints on the "vetb00087.email" column
-#+
-#+ @param p_email - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00087_email_checkColumnConstraints(p_email)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_email LIKE vetb00087.email
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00087_email_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00087_celular_checkColumnConstraints">}
-#+ Check constraints on the "vetb00087.celular" column
-#+
-#+ @param p_celular - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00087_celular_checkColumnConstraints(p_celular)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_celular LIKE vetb00087.celular
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00087_celular_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00087_telefono_of_checkColumnConstraints">}
-#+ Check constraints on the "vetb00087.telefono_of" column
-#+
-#+ @param p_telefono_of - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00087_telefono_of_checkColumnConstraints(p_telefono_of)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_telefono_of LIKE vetb00087.telefono_of
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00087_telefono_of_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00087_telefono_casa_checkColumnConstraints">}
-#+ Check constraints on the "vetb00087.telefono_casa" column
-#+
-#+ @param p_telefono_casa - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00087_telefono_casa_checkColumnConstraints(p_telefono_casa)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_telefono_casa LIKE vetb00087.telefono_casa
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00087_telefono_casa_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00087_id_checkColumnConstraints">}
-#+ Check constraints on the "vetb00087.id" column
-#+
-#+ @param p_id - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00087_id_checkColumnConstraints(p_id)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_id LIKE vetb00087.id
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00087_id_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00087_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "vetb00087.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00087_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE vetb00087.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00087_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00087_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "vetb00087.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00087_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE vetb00087.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00087_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00087_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "vetb00087.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00087_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE vetb00087.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00087_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00087_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "vetb00087.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00087_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE vetb00087.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00087_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00086_checkTableConstraints">}
-#+ Check constraints on the "vetb00086" table
-#+
-#+ @param p_data - a row data LIKE vetb00086.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00086_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vetb00086.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vetb00086_cotizacion_no_checkColumnConstraints(p_data.cotizacion_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00086_porc_negocio_checkColumnConstraints(p_data.porc_negocio) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00086_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00086_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00086_fecha_crea_checkColumnConstraints(p_data.fecha_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00086_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00086_fecha_mod_checkColumnConstraints(p_data.fecha_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00086_checkTableConstraints
-
-{<BLOCK Name="fct.vetb00086_cotizacion_no_checkColumnConstraints">}
-#+ Check constraints on the "vetb00086.cotizacion_no" column
-#+
-#+ @param p_cotizacion_no - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00086_cotizacion_no_checkColumnConstraints(p_cotizacion_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cotizacion_no LIKE vetb00086.cotizacion_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00086_cotizacion_no_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00086_porc_negocio_checkColumnConstraints">}
-#+ Check constraints on the "vetb00086.porc_negocio" column
-#+
-#+ @param p_porc_negocio - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00086_porc_negocio_checkColumnConstraints(p_porc_negocio)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_porc_negocio LIKE vetb00086.porc_negocio
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00086_porc_negocio_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00086_status_t_checkColumnConstraints">}
-#+ Check constraints on the "vetb00086.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00086_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE vetb00086.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00086_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00086_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "vetb00086.us_crea" column
-#+
-#+ @param p_us_crea - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00086_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE vetb00086.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00086_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00086_fecha_crea_checkColumnConstraints">}
-#+ Check constraints on the "vetb00086.fecha_crea" column
-#+
-#+ @param p_fecha_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00086_fecha_crea_checkColumnConstraints(p_fecha_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_crea LIKE vetb00086.fecha_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00086_fecha_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00086_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "vetb00086.us_mod" column
-#+
-#+ @param p_us_mod - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00086_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE vetb00086.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00086_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00086_fecha_mod_checkColumnConstraints">}
-#+ Check constraints on the "vetb00086.fecha_mod" column
-#+
-#+ @param p_fecha_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00086_fecha_mod_checkColumnConstraints(p_fecha_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_mod LIKE vetb00086.fecha_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00086_fecha_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00085_checkTableConstraints">}
-#+ Check constraints on the "vetb00085" table
-#+
-#+ @param p_data - a row data LIKE vetb00085.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00085_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vetb00085.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vetb00085_cod_cia_checkColumnConstraints(p_data.cod_cia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00085_cod_lista_checkColumnConstraints(p_data.cod_lista) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00085_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00085_fecha_vigencia_checkColumnConstraints(p_data.fecha_vigencia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00085_fecha_inicio_checkColumnConstraints(p_data.fecha_inicio) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00085_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00085_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00085_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00085_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00085_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00085_checkTableConstraints
-
-{<BLOCK Name="fct.vetb00085_cod_cia_checkColumnConstraints">}
-#+ Check constraints on the "vetb00085.cod_cia" column
-#+
-#+ @param p_cod_cia - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00085_cod_cia_checkColumnConstraints(p_cod_cia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_cia LIKE vetb00085.cod_cia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00085_cod_cia_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00085_cod_lista_checkColumnConstraints">}
-#+ Check constraints on the "vetb00085.cod_lista" column
-#+
-#+ @param p_cod_lista - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00085_cod_lista_checkColumnConstraints(p_cod_lista)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_lista LIKE vetb00085.cod_lista
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00085_cod_lista_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00085_descripcion_checkColumnConstraints">}
-#+ Check constraints on the "vetb00085.descripcion" column
-#+
-#+ @param p_descripcion - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00085_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE vetb00085.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00085_descripcion_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00085_fecha_vigencia_checkColumnConstraints">}
-#+ Check constraints on the "vetb00085.fecha_vigencia" column
-#+
-#+ @param p_fecha_vigencia - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00085_fecha_vigencia_checkColumnConstraints(p_fecha_vigencia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_vigencia LIKE vetb00085.fecha_vigencia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00085_fecha_vigencia_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00085_fecha_inicio_checkColumnConstraints">}
-#+ Check constraints on the "vetb00085.fecha_inicio" column
-#+
-#+ @param p_fecha_inicio - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00085_fecha_inicio_checkColumnConstraints(p_fecha_inicio)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_inicio LIKE vetb00085.fecha_inicio
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00085_fecha_inicio_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00085_status_t_checkColumnConstraints">}
-#+ Check constraints on the "vetb00085.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00085_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE vetb00085.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00085_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00085_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "vetb00085.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00085_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE vetb00085.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00085_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00085_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "vetb00085.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00085_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE vetb00085.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00085_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00085_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "vetb00085.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00085_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE vetb00085.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00085_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00085_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "vetb00085.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00085_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE vetb00085.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00085_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00084_checkTableConstraints">}
-#+ Check constraints on the "vetb00084" table
-#+
-#+ @param p_data - a row data LIKE vetb00084.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00084_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vetb00084.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vetb00084_sec_vend_checkColumnConstraints(p_data.sec_vend) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00084_nombre_checkColumnConstraints(p_data.nombre) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00084_checkTableConstraints
-
-{<BLOCK Name="fct.vetb00084_sec_vend_checkColumnConstraints">}
-#+ Check constraints on the "vetb00084.sec_vend" column
-#+
-#+ @param p_sec_vend - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00084_sec_vend_checkColumnConstraints(p_sec_vend)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_vend LIKE vetb00084.sec_vend
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00084_sec_vend_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00084_nombre_checkColumnConstraints">}
-#+ Check constraints on the "vetb00084.nombre" column
-#+
-#+ @param p_nombre - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00084_nombre_checkColumnConstraints(p_nombre)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombre LIKE vetb00084.nombre
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00084_nombre_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00075_checkTableConstraints">}
-#+ Check constraints on the "vetb00075" table
-#+
-#+ @param p_data - a row data LIKE vetb00075.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00075_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vetb00075.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vetb00075_sec_vend_checkColumnConstraints(p_data.sec_vend) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00075_porc_cobros_a_checkColumnConstraints(p_data.porc_cobros_a) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00075_sec_vend_a_checkColumnConstraints(p_data.sec_vend_a) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00075_porc_cobros_checkColumnConstraints(p_data.porc_cobros) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00075_checkTableConstraints
-
-{<BLOCK Name="fct.vetb00075_sec_vend_checkColumnConstraints">}
-#+ Check constraints on the "vetb00075.sec_vend" column
-#+
-#+ @param p_sec_vend - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00075_sec_vend_checkColumnConstraints(p_sec_vend)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_vend LIKE vetb00075.sec_vend
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00075_sec_vend_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00075_porc_cobros_a_checkColumnConstraints">}
-#+ Check constraints on the "vetb00075.porc_cobros_a" column
-#+
-#+ @param p_porc_cobros_a - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00075_porc_cobros_a_checkColumnConstraints(p_porc_cobros_a)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_porc_cobros_a LIKE vetb00075.porc_cobros_a
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00075_porc_cobros_a_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00075_sec_vend_a_checkColumnConstraints">}
-#+ Check constraints on the "vetb00075.sec_vend_a" column
-#+
-#+ @param p_sec_vend_a - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00075_sec_vend_a_checkColumnConstraints(p_sec_vend_a)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_vend_a LIKE vetb00075.sec_vend_a
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00075_sec_vend_a_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00075_porc_cobros_checkColumnConstraints">}
-#+ Check constraints on the "vetb00075.porc_cobros" column
-#+
-#+ @param p_porc_cobros - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00075_porc_cobros_checkColumnConstraints(p_porc_cobros)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_porc_cobros LIKE vetb00075.porc_cobros
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00075_porc_cobros_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00072_checkTableConstraints">}
-#+ Check constraints on the "vetb00072" table
-#+
-#+ @param p_data - a row data LIKE vetb00072.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00072_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vetb00072.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vetb00072_documento_checkColumnConstraints(p_data.documento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00072_tipo_doc_checkColumnConstraints(p_data.tipo_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00072_codigo_dgii_checkColumnConstraints(p_data.codigo_dgii) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00072_ncf_checkColumnConstraints(p_data.ncf) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00072_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00072_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00072_checkTableConstraints
-
-{<BLOCK Name="fct.vetb00072_documento_checkColumnConstraints">}
-#+ Check constraints on the "vetb00072.documento" column
-#+
-#+ @param p_documento - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00072_documento_checkColumnConstraints(p_documento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_documento LIKE vetb00072.documento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00072_documento_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00072_tipo_doc_checkColumnConstraints">}
-#+ Check constraints on the "vetb00072.tipo_doc" column
-#+
-#+ @param p_tipo_doc - CHAR(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00072_tipo_doc_checkColumnConstraints(p_tipo_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_doc LIKE vetb00072.tipo_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00072_tipo_doc_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00072_codigo_dgii_checkColumnConstraints">}
-#+ Check constraints on the "vetb00072.codigo_dgii" column
-#+
-#+ @param p_codigo_dgii - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00072_codigo_dgii_checkColumnConstraints(p_codigo_dgii)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codigo_dgii LIKE vetb00072.codigo_dgii
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00072_codigo_dgii_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00072_ncf_checkColumnConstraints">}
-#+ Check constraints on the "vetb00072.ncf" column
-#+
-#+ @param p_ncf - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00072_ncf_checkColumnConstraints(p_ncf)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ncf LIKE vetb00072.ncf
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00072_ncf_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00072_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "vetb00072.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00072_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE vetb00072.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00072_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00072_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "vetb00072.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00072_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE vetb00072.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00072_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00071_checkTableConstraints">}
-#+ Check constraints on the "vetb00071" table
-#+
-#+ @param p_data - a row data LIKE vetb00071.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00071_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vetb00071.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vetb00071_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00071_tipo_ncf_checkColumnConstraints(p_data.tipo_ncf) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00071_tipo_doc_checkColumnConstraints(p_data.tipo_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00071_codigo_dgii_checkColumnConstraints(p_data.codigo_dgii) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00071_ncf_inicial_checkColumnConstraints(p_data.ncf_inicial) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00071_ncf_final_checkColumnConstraints(p_data.ncf_final) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00071_disponible_checkColumnConstraints(p_data.disponible) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00071_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00071_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00071_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00071_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00071_sucid_checkColumnConstraints(p_data.sucid) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00071_itbis_checkColumnConstraints(p_data.itbis) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00071_checkTableConstraints
-
-{<BLOCK Name="fct.vetb00071_fecha_checkColumnConstraints">}
-#+ Check constraints on the "vetb00071.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00071_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE vetb00071.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00071_fecha_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00071_tipo_ncf_checkColumnConstraints">}
-#+ Check constraints on the "vetb00071.tipo_ncf" column
-#+
-#+ @param p_tipo_ncf - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00071_tipo_ncf_checkColumnConstraints(p_tipo_ncf)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_ncf LIKE vetb00071.tipo_ncf
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00071_tipo_ncf_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00071_tipo_doc_checkColumnConstraints">}
-#+ Check constraints on the "vetb00071.tipo_doc" column
-#+
-#+ @param p_tipo_doc - CHAR(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00071_tipo_doc_checkColumnConstraints(p_tipo_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_doc LIKE vetb00071.tipo_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00071_tipo_doc_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00071_codigo_dgii_checkColumnConstraints">}
-#+ Check constraints on the "vetb00071.codigo_dgii" column
-#+
-#+ @param p_codigo_dgii - CHAR(14) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00071_codigo_dgii_checkColumnConstraints(p_codigo_dgii)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codigo_dgii LIKE vetb00071.codigo_dgii
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00071_codigo_dgii_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00071_ncf_inicial_checkColumnConstraints">}
-#+ Check constraints on the "vetb00071.ncf_inicial" column
-#+
-#+ @param p_ncf_inicial - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00071_ncf_inicial_checkColumnConstraints(p_ncf_inicial)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ncf_inicial LIKE vetb00071.ncf_inicial
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00071_ncf_inicial_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00071_ncf_final_checkColumnConstraints">}
-#+ Check constraints on the "vetb00071.ncf_final" column
-#+
-#+ @param p_ncf_final - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00071_ncf_final_checkColumnConstraints(p_ncf_final)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ncf_final LIKE vetb00071.ncf_final
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00071_ncf_final_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00071_disponible_checkColumnConstraints">}
-#+ Check constraints on the "vetb00071.disponible" column
-#+
-#+ @param p_disponible - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00071_disponible_checkColumnConstraints(p_disponible)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_disponible LIKE vetb00071.disponible
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00071_disponible_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00071_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "vetb00071.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00071_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE vetb00071.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00071_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00071_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "vetb00071.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00071_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE vetb00071.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00071_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00071_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "vetb00071.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00071_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE vetb00071.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00071_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00071_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "vetb00071.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00071_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE vetb00071.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00071_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00071_sucid_checkColumnConstraints">}
-#+ Check constraints on the "vetb00071.sucid" column
-#+
-#+ @param p_sucid - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00071_sucid_checkColumnConstraints(p_sucid)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sucid LIKE vetb00071.sucid
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00071_sucid_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00071_itbis_checkColumnConstraints">}
-#+ Check constraints on the "vetb00071.itbis" column
-#+
-#+ @param p_itbis - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00071_itbis_checkColumnConstraints(p_itbis)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_itbis LIKE vetb00071.itbis
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00071_itbis_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00061_checkTableConstraints">}
-#+ Check constraints on the "vetb00061" table
-#+
-#+ @param p_data - a row data LIKE vetb00061.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00061_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vetb00061.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vetb00061_ventas_checkColumnConstraints(p_data.ventas) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00061_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00061_simbolo_checkColumnConstraints(p_data.simbolo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00061_descripcion_moneda_checkColumnConstraints(p_data.descripcion_moneda) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00061_defecto_checkColumnConstraints(p_data.defecto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00061_checkTableConstraints
-
-{<BLOCK Name="fct.vetb00061_ventas_checkColumnConstraints">}
-#+ Check constraints on the "vetb00061.ventas" column
-#+
-#+ @param p_ventas - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00061_ventas_checkColumnConstraints(p_ventas)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ventas LIKE vetb00061.ventas
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00061_ventas_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00061_descripcion_checkColumnConstraints">}
-#+ Check constraints on the "vetb00061.descripcion" column
-#+
-#+ @param p_descripcion - VARCHAR2(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00061_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE vetb00061.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00061_descripcion_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00061_simbolo_checkColumnConstraints">}
-#+ Check constraints on the "vetb00061.simbolo" column
-#+
-#+ @param p_simbolo - VARCHAR2(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00061_simbolo_checkColumnConstraints(p_simbolo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_simbolo LIKE vetb00061.simbolo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00061_simbolo_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00061_descripcion_moneda_checkColumnConstraints">}
-#+ Check constraints on the "vetb00061.descripcion_moneda" column
-#+
-#+ @param p_descripcion_moneda - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00061_descripcion_moneda_checkColumnConstraints(p_descripcion_moneda)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion_moneda LIKE vetb00061.descripcion_moneda
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00061_descripcion_moneda_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00061_defecto_checkColumnConstraints">}
-#+ Check constraints on the "vetb00061.defecto" column
-#+
-#+ @param p_defecto - CHAR(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00061_defecto_checkColumnConstraints(p_defecto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_defecto LIKE vetb00061.defecto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00061_defecto_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00060_checkTableConstraints">}
-#+ Check constraints on the "vetb00060" table
-#+
-#+ @param p_data - a row data LIKE vetb00060.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00060_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vetb00060.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vetb00060_ventas_checkColumnConstraints(p_data.ventas) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00060_tipo_cliente_checkColumnConstraints(p_data.tipo_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00060_sec_cliente_checkColumnConstraints(p_data.sec_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00060_cod_mov_checkColumnConstraints(p_data.cod_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00060_paga_itbis_checkColumnConstraints(p_data.paga_itbis) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00060_ncf_checkColumnConstraints(p_data.ncf) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00060_facturar_punto_ventas_checkColumnConstraints(p_data.facturar_punto_ventas) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00060_control_creacion_usuario_checkColumnConstraints(p_data.control_creacion_usuario) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00060_control_mobile_checkColumnConstraints(p_data.control_mobile) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00060_checkTableConstraints
-
-{<BLOCK Name="fct.vetb00060_ventas_checkColumnConstraints">}
-#+ Check constraints on the "vetb00060.ventas" column
-#+
-#+ @param p_ventas - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00060_ventas_checkColumnConstraints(p_ventas)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ventas LIKE vetb00060.ventas
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00060_ventas_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00060_tipo_cliente_checkColumnConstraints">}
-#+ Check constraints on the "vetb00060.tipo_cliente" column
-#+
-#+ @param p_tipo_cliente - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00060_tipo_cliente_checkColumnConstraints(p_tipo_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_cliente LIKE vetb00060.tipo_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00060_tipo_cliente_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00060_sec_cliente_checkColumnConstraints">}
-#+ Check constraints on the "vetb00060.sec_cliente" column
-#+
-#+ @param p_sec_cliente - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00060_sec_cliente_checkColumnConstraints(p_sec_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_cliente LIKE vetb00060.sec_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00060_sec_cliente_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00060_cod_mov_checkColumnConstraints">}
-#+ Check constraints on the "vetb00060.cod_mov" column
-#+
-#+ @param p_cod_mov - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00060_cod_mov_checkColumnConstraints(p_cod_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mov LIKE vetb00060.cod_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00060_cod_mov_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00060_paga_itbis_checkColumnConstraints">}
-#+ Check constraints on the "vetb00060.paga_itbis" column
-#+
-#+ @param p_paga_itbis - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00060_paga_itbis_checkColumnConstraints(p_paga_itbis)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_paga_itbis LIKE vetb00060.paga_itbis
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00060_paga_itbis_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00060_ncf_checkColumnConstraints">}
-#+ Check constraints on the "vetb00060.ncf" column
-#+
-#+ @param p_ncf - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00060_ncf_checkColumnConstraints(p_ncf)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ncf LIKE vetb00060.ncf
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00060_ncf_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00060_facturar_punto_ventas_checkColumnConstraints">}
-#+ Check constraints on the "vetb00060.facturar_punto_ventas" column
-#+
-#+ @param p_facturar_punto_ventas - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00060_facturar_punto_ventas_checkColumnConstraints(p_facturar_punto_ventas)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_facturar_punto_ventas LIKE vetb00060.facturar_punto_ventas
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00060_facturar_punto_ventas_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00060_control_creacion_usuario_checkColumnConstraints">}
-#+ Check constraints on the "vetb00060.control_creacion_usuario" column
-#+
-#+ @param p_control_creacion_usuario - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00060_control_creacion_usuario_checkColumnConstraints(p_control_creacion_usuario)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_control_creacion_usuario LIKE vetb00060.control_creacion_usuario
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00060_control_creacion_usuario_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00060_control_mobile_checkColumnConstraints">}
-#+ Check constraints on the "vetb00060.control_mobile" column
-#+
-#+ @param p_control_mobile - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00060_control_mobile_checkColumnConstraints(p_control_mobile)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_control_mobile LIKE vetb00060.control_mobile
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00060_control_mobile_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00053_checkTableConstraints">}
-#+ Check constraints on the "vetb00053" table
-#+
-#+ @param p_data - a row data LIKE vetb00053.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00053_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vetb00053.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vetb00053_cotizacion_no_checkColumnConstraints(p_data.cotizacion_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00053_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00053_checkTableConstraints
-
-{<BLOCK Name="fct.vetb00053_cotizacion_no_checkColumnConstraints">}
-#+ Check constraints on the "vetb00053.cotizacion_no" column
-#+
-#+ @param p_cotizacion_no - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00053_cotizacion_no_checkColumnConstraints(p_cotizacion_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cotizacion_no LIKE vetb00053.cotizacion_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cotizacion_no IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cotizacion_no: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00053_cotizacion_no_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00053_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "vetb00053.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00053_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE vetb00053.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00053_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00052_checkTableConstraints">}
-#+ Check constraints on the "vetb00052" table
-#+
-#+ @param p_data - a row data LIKE vetb00052.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00052_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vetb00052.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vetb00052_etiqueta_checkColumnConstraints(p_data.etiqueta) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00052_cotizacion_no_checkColumnConstraints(p_data.cotizacion_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00052_secuencia_checkColumnConstraints(p_data.secuencia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00052_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00052_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00052_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00052_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00052_lado_1_checkColumnConstraints(p_data.lado_1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00052_lado_2_checkColumnConstraints(p_data.lado_2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00052_lado_3_checkColumnConstraints(p_data.lado_3) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00052_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00052_medida_checkColumnConstraints(p_data.medida) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00052_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00052_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00052_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00052_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00052_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00052_checkTableConstraints
-
-{<BLOCK Name="fct.vetb00052_etiqueta_checkColumnConstraints">}
-#+ Check constraints on the "vetb00052.etiqueta" column
-#+
-#+ @param p_etiqueta - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00052_etiqueta_checkColumnConstraints(p_etiqueta)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_etiqueta LIKE vetb00052.etiqueta
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00052_etiqueta_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00052_cotizacion_no_checkColumnConstraints">}
-#+ Check constraints on the "vetb00052.cotizacion_no" column
-#+
-#+ @param p_cotizacion_no - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00052_cotizacion_no_checkColumnConstraints(p_cotizacion_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cotizacion_no LIKE vetb00052.cotizacion_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00052_cotizacion_no_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00052_secuencia_checkColumnConstraints">}
-#+ Check constraints on the "vetb00052.secuencia" column
-#+
-#+ @param p_secuencia - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00052_secuencia_checkColumnConstraints(p_secuencia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_secuencia LIKE vetb00052.secuencia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00052_secuencia_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00052_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "vetb00052.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00052_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE vetb00052.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00052_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00052_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "vetb00052.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00052_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE vetb00052.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00052_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00052_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "vetb00052.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00052_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE vetb00052.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00052_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00052_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "vetb00052.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00052_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE vetb00052.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00052_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00052_lado_1_checkColumnConstraints">}
-#+ Check constraints on the "vetb00052.lado_1" column
-#+
-#+ @param p_lado_1 - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00052_lado_1_checkColumnConstraints(p_lado_1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_lado_1 LIKE vetb00052.lado_1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00052_lado_1_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00052_lado_2_checkColumnConstraints">}
-#+ Check constraints on the "vetb00052.lado_2" column
-#+
-#+ @param p_lado_2 - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00052_lado_2_checkColumnConstraints(p_lado_2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_lado_2 LIKE vetb00052.lado_2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00052_lado_2_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00052_lado_3_checkColumnConstraints">}
-#+ Check constraints on the "vetb00052.lado_3" column
-#+
-#+ @param p_lado_3 - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00052_lado_3_checkColumnConstraints(p_lado_3)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_lado_3 LIKE vetb00052.lado_3
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00052_lado_3_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00052_cantidad_checkColumnConstraints">}
-#+ Check constraints on the "vetb00052.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00052_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE vetb00052.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00052_cantidad_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00052_medida_checkColumnConstraints">}
-#+ Check constraints on the "vetb00052.medida" column
-#+
-#+ @param p_medida - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00052_medida_checkColumnConstraints(p_medida)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_medida LIKE vetb00052.medida
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00052_medida_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00052_status_t_checkColumnConstraints">}
-#+ Check constraints on the "vetb00052.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00052_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE vetb00052.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00052_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00052_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "vetb00052.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00052_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE vetb00052.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00052_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00052_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "vetb00052.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00052_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE vetb00052.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00052_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00052_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "vetb00052.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00052_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE vetb00052.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00052_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00052_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "vetb00052.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00052_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE vetb00052.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00052_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00051_checkTableConstraints">}
-#+ Check constraints on the "vetb00051" table
-#+
-#+ @param p_data - a row data LIKE vetb00051.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00051_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vetb00051.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vetb00051_cod_cia_checkColumnConstraints(p_data.cod_cia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00051_ventas_checkColumnConstraints(p_data.ventas) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00051_cotizacion_no_checkColumnConstraints(p_data.cotizacion_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00051_area_checkColumnConstraints(p_data.area) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00051_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00051_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00051_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00051_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00051_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00051_cantidad_1_checkColumnConstraints(p_data.cantidad_1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00051_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00051_precio_checkColumnConstraints(p_data.precio) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00051_porc_desc_checkColumnConstraints(p_data.porc_desc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00051_nombre_file_checkColumnConstraints(p_data.nombre_file) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00051_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00051_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00051_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00051_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00051_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00051_foto_producto_checkColumnConstraints(p_data.foto_producto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00051_descripcion_area_checkColumnConstraints(p_data.descripcion_area) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00051_id_kit_checkColumnConstraints(p_data.id_kit) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00051_checkTableConstraints
-
-{<BLOCK Name="fct.vetb00051_cod_cia_checkColumnConstraints">}
-#+ Check constraints on the "vetb00051.cod_cia" column
-#+
-#+ @param p_cod_cia - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00051_cod_cia_checkColumnConstraints(p_cod_cia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_cia LIKE vetb00051.cod_cia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00051_cod_cia_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00051_ventas_checkColumnConstraints">}
-#+ Check constraints on the "vetb00051.ventas" column
-#+
-#+ @param p_ventas - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00051_ventas_checkColumnConstraints(p_ventas)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ventas LIKE vetb00051.ventas
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00051_ventas_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00051_cotizacion_no_checkColumnConstraints">}
-#+ Check constraints on the "vetb00051.cotizacion_no" column
-#+
-#+ @param p_cotizacion_no - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00051_cotizacion_no_checkColumnConstraints(p_cotizacion_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cotizacion_no LIKE vetb00051.cotizacion_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cotizacion_no IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cotizacion_no: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00051_cotizacion_no_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00051_area_checkColumnConstraints">}
-#+ Check constraints on the "vetb00051.area" column
-#+
-#+ @param p_area - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00051_area_checkColumnConstraints(p_area)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_area LIKE vetb00051.area
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_area IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- area: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00051_area_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00051_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "vetb00051.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00051_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE vetb00051.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_n IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_n: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00051_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00051_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "vetb00051.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00051_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE vetb00051.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_grupo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_grupo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00051_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00051_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "vetb00051.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00051_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE vetb00051.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_tipo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_tipo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00051_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00051_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "vetb00051.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00051_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE vetb00051.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_sec IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_sec: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00051_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00051_descripcion_checkColumnConstraints">}
-#+ Check constraints on the "vetb00051.descripcion" column
-#+
-#+ @param p_descripcion - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00051_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE vetb00051.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00051_descripcion_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00051_cantidad_1_checkColumnConstraints">}
-#+ Check constraints on the "vetb00051.cantidad_1" column
-#+
-#+ @param p_cantidad_1 - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00051_cantidad_1_checkColumnConstraints(p_cantidad_1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad_1 LIKE vetb00051.cantidad_1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00051_cantidad_1_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00051_cantidad_checkColumnConstraints">}
-#+ Check constraints on the "vetb00051.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00051_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE vetb00051.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cantidad IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cantidad: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00051_cantidad_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00051_precio_checkColumnConstraints">}
-#+ Check constraints on the "vetb00051.precio" column
-#+
-#+ @param p_precio - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00051_precio_checkColumnConstraints(p_precio)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_precio LIKE vetb00051.precio
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_precio IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- precio: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00051_precio_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00051_porc_desc_checkColumnConstraints">}
-#+ Check constraints on the "vetb00051.porc_desc" column
-#+
-#+ @param p_porc_desc - DECIMAL(8,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00051_porc_desc_checkColumnConstraints(p_porc_desc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_porc_desc LIKE vetb00051.porc_desc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00051_porc_desc_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00051_nombre_file_checkColumnConstraints">}
-#+ Check constraints on the "vetb00051.nombre_file" column
-#+
-#+ @param p_nombre_file - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00051_nombre_file_checkColumnConstraints(p_nombre_file)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombre_file LIKE vetb00051.nombre_file
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00051_nombre_file_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00051_status_t_checkColumnConstraints">}
-#+ Check constraints on the "vetb00051.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00051_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE vetb00051.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00051_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00051_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "vetb00051.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(15) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00051_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE vetb00051.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00051_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00051_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "vetb00051.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00051_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE vetb00051.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00051_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00051_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "vetb00051.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(15) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00051_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE vetb00051.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00051_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00051_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "vetb00051.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00051_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE vetb00051.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00051_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00051_foto_producto_checkColumnConstraints">}
-#+ Check constraints on the "vetb00051.foto_producto" column
-#+
-#+ @param p_foto_producto - CHAR(200) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00051_foto_producto_checkColumnConstraints(p_foto_producto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_foto_producto LIKE vetb00051.foto_producto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00051_foto_producto_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00051_descripcion_area_checkColumnConstraints">}
-#+ Check constraints on the "vetb00051.descripcion_area" column
-#+
-#+ @param p_descripcion_area - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00051_descripcion_area_checkColumnConstraints(p_descripcion_area)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion_area LIKE vetb00051.descripcion_area
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00051_descripcion_area_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00051_id_kit_checkColumnConstraints">}
-#+ Check constraints on the "vetb00051.id_kit" column
-#+
-#+ @param p_id_kit - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00051_id_kit_checkColumnConstraints(p_id_kit)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_id_kit LIKE vetb00051.id_kit
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00051_id_kit_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00050_checkTableConstraints">}
-#+ Check constraints on the "vetb00050" table
-#+
-#+ @param p_data - a row data LIKE vetb00050.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00050_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vetb00050.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vetb00050_cod_cia_checkColumnConstraints(p_data.cod_cia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00050_ventas_checkColumnConstraints(p_data.ventas) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00050_cotizacion_no_checkColumnConstraints(p_data.cotizacion_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00050_tipo_cliente_checkColumnConstraints(p_data.tipo_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00050_sec_cliente_checkColumnConstraints(p_data.sec_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00050_nombre_cliente_checkColumnConstraints(p_data.nombre_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00050_rnc_checkColumnConstraints(p_data.rnc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00050_nombre_proyecto_checkColumnConstraints(p_data.nombre_proyecto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00050_direccion_cliente_checkColumnConstraints(p_data.direccion_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00050_cod_provincia_checkColumnConstraints(p_data.cod_provincia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00050_direccion_proyecto_checkColumnConstraints(p_data.direccion_proyecto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00050_telefono_r_checkColumnConstraints(p_data.telefono_r) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00050_telefono_o_checkColumnConstraints(p_data.telefono_o) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00050_email_checkColumnConstraints(p_data.email) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00050_tipo_precio_checkColumnConstraints(p_data.tipo_precio) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00050_beeper_checkColumnConstraints(p_data.beeper) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00050_celular_checkColumnConstraints(p_data.celular) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00050_prima_checkColumnConstraints(p_data.prima) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00050_fax1_checkColumnConstraints(p_data.fax1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00050_celular1_checkColumnConstraints(p_data.celular1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00050_fax_checkColumnConstraints(p_data.fax) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00050_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00050_fecha_entrega_checkColumnConstraints(p_data.fecha_entrega) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00050_plazo_entrega_checkColumnConstraints(p_data.plazo_entrega) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00050_comentario_checkColumnConstraints(p_data.comentario) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00050_contacto_checkColumnConstraints(p_data.contacto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00050_cond_pago_checkColumnConstraints(p_data.cond_pago) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00050_sec_vend_checkColumnConstraints(p_data.sec_vend) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00050_porc_itbi_checkColumnConstraints(p_data.porc_itbi) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00050_total_bruto_checkColumnConstraints(p_data.total_bruto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00050_sub_total_checkColumnConstraints(p_data.sub_total) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00050_monto_desc_checkColumnConstraints(p_data.monto_desc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00050_monto_itbi_checkColumnConstraints(p_data.monto_itbi) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00050_total_neto_checkColumnConstraints(p_data.total_neto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00050_monto_dolar_checkColumnConstraints(p_data.monto_dolar) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00050_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00050_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00050_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00050_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00050_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00050_checkTableConstraints
-
-{<BLOCK Name="fct.vetb00050_cod_cia_checkColumnConstraints">}
-#+ Check constraints on the "vetb00050.cod_cia" column
-#+
-#+ @param p_cod_cia - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00050_cod_cia_checkColumnConstraints(p_cod_cia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_cia LIKE vetb00050.cod_cia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00050_cod_cia_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00050_ventas_checkColumnConstraints">}
-#+ Check constraints on the "vetb00050.ventas" column
-#+
-#+ @param p_ventas - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00050_ventas_checkColumnConstraints(p_ventas)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ventas LIKE vetb00050.ventas
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00050_ventas_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00050_cotizacion_no_checkColumnConstraints">}
-#+ Check constraints on the "vetb00050.cotizacion_no" column
-#+
-#+ @param p_cotizacion_no - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00050_cotizacion_no_checkColumnConstraints(p_cotizacion_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cotizacion_no LIKE vetb00050.cotizacion_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cotizacion_no IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cotizacion_no: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00050_cotizacion_no_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00050_tipo_cliente_checkColumnConstraints">}
-#+ Check constraints on the "vetb00050.tipo_cliente" column
-#+
-#+ @param p_tipo_cliente - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00050_tipo_cliente_checkColumnConstraints(p_tipo_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_cliente LIKE vetb00050.tipo_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00050_tipo_cliente_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00050_sec_cliente_checkColumnConstraints">}
-#+ Check constraints on the "vetb00050.sec_cliente" column
-#+
-#+ @param p_sec_cliente - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00050_sec_cliente_checkColumnConstraints(p_sec_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_cliente LIKE vetb00050.sec_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00050_sec_cliente_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00050_nombre_cliente_checkColumnConstraints">}
-#+ Check constraints on the "vetb00050.nombre_cliente" column
-#+
-#+ @param p_nombre_cliente - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00050_nombre_cliente_checkColumnConstraints(p_nombre_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombre_cliente LIKE vetb00050.nombre_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_nombre_cliente IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- nombre_cliente: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00050_nombre_cliente_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00050_rnc_checkColumnConstraints">}
-#+ Check constraints on the "vetb00050.rnc" column
-#+
-#+ @param p_rnc - CHAR(11) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00050_rnc_checkColumnConstraints(p_rnc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_rnc LIKE vetb00050.rnc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00050_rnc_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00050_nombre_proyecto_checkColumnConstraints">}
-#+ Check constraints on the "vetb00050.nombre_proyecto" column
-#+
-#+ @param p_nombre_proyecto - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00050_nombre_proyecto_checkColumnConstraints(p_nombre_proyecto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombre_proyecto LIKE vetb00050.nombre_proyecto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00050_nombre_proyecto_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00050_direccion_cliente_checkColumnConstraints">}
-#+ Check constraints on the "vetb00050.direccion_cliente" column
-#+
-#+ @param p_direccion_cliente - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00050_direccion_cliente_checkColumnConstraints(p_direccion_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_direccion_cliente LIKE vetb00050.direccion_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00050_direccion_cliente_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00050_cod_provincia_checkColumnConstraints">}
-#+ Check constraints on the "vetb00050.cod_provincia" column
-#+
-#+ @param p_cod_provincia - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00050_cod_provincia_checkColumnConstraints(p_cod_provincia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_provincia LIKE vetb00050.cod_provincia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_provincia IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_provincia: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00050_cod_provincia_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00050_direccion_proyecto_checkColumnConstraints">}
-#+ Check constraints on the "vetb00050.direccion_proyecto" column
-#+
-#+ @param p_direccion_proyecto - VARCHAR2(170) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00050_direccion_proyecto_checkColumnConstraints(p_direccion_proyecto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_direccion_proyecto LIKE vetb00050.direccion_proyecto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00050_direccion_proyecto_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00050_telefono_r_checkColumnConstraints">}
-#+ Check constraints on the "vetb00050.telefono_r" column
-#+
-#+ @param p_telefono_r - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00050_telefono_r_checkColumnConstraints(p_telefono_r)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_telefono_r LIKE vetb00050.telefono_r
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00050_telefono_r_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00050_telefono_o_checkColumnConstraints">}
-#+ Check constraints on the "vetb00050.telefono_o" column
-#+
-#+ @param p_telefono_o - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00050_telefono_o_checkColumnConstraints(p_telefono_o)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_telefono_o LIKE vetb00050.telefono_o
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00050_telefono_o_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00050_email_checkColumnConstraints">}
-#+ Check constraints on the "vetb00050.email" column
-#+
-#+ @param p_email - CHAR(100) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00050_email_checkColumnConstraints(p_email)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_email LIKE vetb00050.email
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00050_email_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00050_tipo_precio_checkColumnConstraints">}
-#+ Check constraints on the "vetb00050.tipo_precio" column
-#+
-#+ @param p_tipo_precio - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00050_tipo_precio_checkColumnConstraints(p_tipo_precio)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_precio LIKE vetb00050.tipo_precio
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00050_tipo_precio_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00050_beeper_checkColumnConstraints">}
-#+ Check constraints on the "vetb00050.beeper" column
-#+
-#+ @param p_beeper - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00050_beeper_checkColumnConstraints(p_beeper)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_beeper LIKE vetb00050.beeper
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00050_beeper_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00050_celular_checkColumnConstraints">}
-#+ Check constraints on the "vetb00050.celular" column
-#+
-#+ @param p_celular - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00050_celular_checkColumnConstraints(p_celular)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_celular LIKE vetb00050.celular
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00050_celular_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00050_prima_checkColumnConstraints">}
-#+ Check constraints on the "vetb00050.prima" column
-#+
-#+ @param p_prima - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00050_prima_checkColumnConstraints(p_prima)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_prima LIKE vetb00050.prima
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00050_prima_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00050_fax1_checkColumnConstraints">}
-#+ Check constraints on the "vetb00050.fax1" column
-#+
-#+ @param p_fax1 - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00050_fax1_checkColumnConstraints(p_fax1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fax1 LIKE vetb00050.fax1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00050_fax1_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00050_celular1_checkColumnConstraints">}
-#+ Check constraints on the "vetb00050.celular1" column
-#+
-#+ @param p_celular1 - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00050_celular1_checkColumnConstraints(p_celular1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_celular1 LIKE vetb00050.celular1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00050_celular1_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00050_fax_checkColumnConstraints">}
-#+ Check constraints on the "vetb00050.fax" column
-#+
-#+ @param p_fax - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00050_fax_checkColumnConstraints(p_fax)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fax LIKE vetb00050.fax
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00050_fax_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00050_fecha_checkColumnConstraints">}
-#+ Check constraints on the "vetb00050.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00050_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE vetb00050.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00050_fecha_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00050_fecha_entrega_checkColumnConstraints">}
-#+ Check constraints on the "vetb00050.fecha_entrega" column
-#+
-#+ @param p_fecha_entrega - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00050_fecha_entrega_checkColumnConstraints(p_fecha_entrega)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_entrega LIKE vetb00050.fecha_entrega
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00050_fecha_entrega_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00050_plazo_entrega_checkColumnConstraints">}
-#+ Check constraints on the "vetb00050.plazo_entrega" column
-#+
-#+ @param p_plazo_entrega - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00050_plazo_entrega_checkColumnConstraints(p_plazo_entrega)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_plazo_entrega LIKE vetb00050.plazo_entrega
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00050_plazo_entrega_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00050_comentario_checkColumnConstraints">}
-#+ Check constraints on the "vetb00050.comentario" column
-#+
-#+ @param p_comentario - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00050_comentario_checkColumnConstraints(p_comentario)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_comentario LIKE vetb00050.comentario
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00050_comentario_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00050_contacto_checkColumnConstraints">}
-#+ Check constraints on the "vetb00050.contacto" column
-#+
-#+ @param p_contacto - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00050_contacto_checkColumnConstraints(p_contacto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_contacto LIKE vetb00050.contacto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00050_contacto_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00050_cond_pago_checkColumnConstraints">}
-#+ Check constraints on the "vetb00050.cond_pago" column
-#+
-#+ @param p_cond_pago - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00050_cond_pago_checkColumnConstraints(p_cond_pago)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cond_pago LIKE vetb00050.cond_pago
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00050_cond_pago_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00050_sec_vend_checkColumnConstraints">}
-#+ Check constraints on the "vetb00050.sec_vend" column
-#+
-#+ @param p_sec_vend - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00050_sec_vend_checkColumnConstraints(p_sec_vend)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_vend LIKE vetb00050.sec_vend
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00050_sec_vend_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00050_porc_itbi_checkColumnConstraints">}
-#+ Check constraints on the "vetb00050.porc_itbi" column
-#+
-#+ @param p_porc_itbi - DECIMAL(8,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00050_porc_itbi_checkColumnConstraints(p_porc_itbi)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_porc_itbi LIKE vetb00050.porc_itbi
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00050_porc_itbi_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00050_total_bruto_checkColumnConstraints">}
-#+ Check constraints on the "vetb00050.total_bruto" column
-#+
-#+ @param p_total_bruto - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00050_total_bruto_checkColumnConstraints(p_total_bruto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_total_bruto LIKE vetb00050.total_bruto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_total_bruto IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- total_bruto: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00050_total_bruto_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00050_sub_total_checkColumnConstraints">}
-#+ Check constraints on the "vetb00050.sub_total" column
-#+
-#+ @param p_sub_total - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00050_sub_total_checkColumnConstraints(p_sub_total)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sub_total LIKE vetb00050.sub_total
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_sub_total IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- sub_total: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00050_sub_total_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00050_monto_desc_checkColumnConstraints">}
-#+ Check constraints on the "vetb00050.monto_desc" column
-#+
-#+ @param p_monto_desc - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00050_monto_desc_checkColumnConstraints(p_monto_desc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_monto_desc LIKE vetb00050.monto_desc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00050_monto_desc_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00050_monto_itbi_checkColumnConstraints">}
-#+ Check constraints on the "vetb00050.monto_itbi" column
-#+
-#+ @param p_monto_itbi - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00050_monto_itbi_checkColumnConstraints(p_monto_itbi)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_monto_itbi LIKE vetb00050.monto_itbi
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00050_monto_itbi_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00050_total_neto_checkColumnConstraints">}
-#+ Check constraints on the "vetb00050.total_neto" column
-#+
-#+ @param p_total_neto - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00050_total_neto_checkColumnConstraints(p_total_neto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_total_neto LIKE vetb00050.total_neto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_total_neto IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- total_neto: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00050_total_neto_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00050_monto_dolar_checkColumnConstraints">}
-#+ Check constraints on the "vetb00050.monto_dolar" column
-#+
-#+ @param p_monto_dolar - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00050_monto_dolar_checkColumnConstraints(p_monto_dolar)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_monto_dolar LIKE vetb00050.monto_dolar
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00050_monto_dolar_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00050_status_t_checkColumnConstraints">}
-#+ Check constraints on the "vetb00050.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00050_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE vetb00050.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00050_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00050_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "vetb00050.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00050_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE vetb00050.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00050_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00050_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "vetb00050.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00050_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE vetb00050.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00050_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00050_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "vetb00050.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00050_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE vetb00050.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00050_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00050_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "vetb00050.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00050_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE vetb00050.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00050_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00049_checkTableConstraints">}
-#+ Check constraints on the "vetb00049" table
-#+
-#+ @param p_data - a row data LIKE vetb00049.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00049_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vetb00049.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vetb00049_tipo_cliente_checkColumnConstraints(p_data.tipo_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00049_sec_cliente_checkColumnConstraints(p_data.sec_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00049_nombre_proyecto_checkColumnConstraints(p_data.nombre_proyecto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00049_direccion_proyecto_checkColumnConstraints(p_data.direccion_proyecto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00049_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00049_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00049_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00049_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00049_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00049_checkTableConstraints
-
-{<BLOCK Name="fct.vetb00049_tipo_cliente_checkColumnConstraints">}
-#+ Check constraints on the "vetb00049.tipo_cliente" column
-#+
-#+ @param p_tipo_cliente - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00049_tipo_cliente_checkColumnConstraints(p_tipo_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_cliente LIKE vetb00049.tipo_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00049_tipo_cliente_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00049_sec_cliente_checkColumnConstraints">}
-#+ Check constraints on the "vetb00049.sec_cliente" column
-#+
-#+ @param p_sec_cliente - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00049_sec_cliente_checkColumnConstraints(p_sec_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_cliente LIKE vetb00049.sec_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00049_sec_cliente_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00049_nombre_proyecto_checkColumnConstraints">}
-#+ Check constraints on the "vetb00049.nombre_proyecto" column
-#+
-#+ @param p_nombre_proyecto - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00049_nombre_proyecto_checkColumnConstraints(p_nombre_proyecto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombre_proyecto LIKE vetb00049.nombre_proyecto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00049_nombre_proyecto_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00049_direccion_proyecto_checkColumnConstraints">}
-#+ Check constraints on the "vetb00049.direccion_proyecto" column
-#+
-#+ @param p_direccion_proyecto - CHAR(150) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00049_direccion_proyecto_checkColumnConstraints(p_direccion_proyecto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_direccion_proyecto LIKE vetb00049.direccion_proyecto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00049_direccion_proyecto_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00049_status_t_checkColumnConstraints">}
-#+ Check constraints on the "vetb00049.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00049_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE vetb00049.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00049_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00049_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "vetb00049.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00049_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE vetb00049.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00049_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00049_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "vetb00049.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00049_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE vetb00049.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00049_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00049_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "vetb00049.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00049_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE vetb00049.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00049_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00049_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "vetb00049.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00049_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE vetb00049.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00049_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00048_checkTableConstraints">}
-#+ Check constraints on the "vetb00048" table
-#+
-#+ @param p_data - a row data LIKE vetb00048.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00048_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vetb00048.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vetb00048_factura_checkColumnConstraints(p_data.factura) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00048_detalle_checkColumnConstraints(p_data.detalle) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00048_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00048_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00048_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00048_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00048_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00048_checkTableConstraints
-
-{<BLOCK Name="fct.vetb00048_factura_checkColumnConstraints">}
-#+ Check constraints on the "vetb00048.factura" column
-#+
-#+ @param p_factura - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00048_factura_checkColumnConstraints(p_factura)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_factura LIKE vetb00048.factura
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_factura IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- factura: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00048_factura_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00048_detalle_checkColumnConstraints">}
-#+ Check constraints on the "vetb00048.detalle" column
-#+
-#+ @param p_detalle - CHAR(180) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00048_detalle_checkColumnConstraints(p_detalle)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_detalle LIKE vetb00048.detalle
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00048_detalle_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00048_status_t_checkColumnConstraints">}
-#+ Check constraints on the "vetb00048.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00048_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE vetb00048.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00048_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00048_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "vetb00048.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00048_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE vetb00048.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00048_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00048_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "vetb00048.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00048_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE vetb00048.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00048_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00048_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "vetb00048.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00048_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE vetb00048.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00048_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00048_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "vetb00048.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00048_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE vetb00048.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00048_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00045_checkTableConstraints">}
-#+ Check constraints on the "vetb00045" table
-#+
-#+ @param p_data - a row data LIKE vetb00045.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00045_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vetb00045.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vetb00045_ano_checkColumnConstraints(p_data.ano) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00045_mes_checkColumnConstraints(p_data.mes) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00045_ventas_checkColumnConstraints(p_data.ventas) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00045_sec_vend_checkColumnConstraints(p_data.sec_vend) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00045_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00045_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00045_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00045_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00045_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00045_valor_checkColumnConstraints(p_data.valor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00045_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00045_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00045_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00045_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00045_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00045_checkTableConstraints
-
-{<BLOCK Name="fct.vetb00045_ano_checkColumnConstraints">}
-#+ Check constraints on the "vetb00045.ano" column
-#+
-#+ @param p_ano - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00045_ano_checkColumnConstraints(p_ano)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ano LIKE vetb00045.ano
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_ano IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- ano: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00045_ano_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00045_mes_checkColumnConstraints">}
-#+ Check constraints on the "vetb00045.mes" column
-#+
-#+ @param p_mes - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00045_mes_checkColumnConstraints(p_mes)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mes LIKE vetb00045.mes
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_mes IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- mes: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00045_mes_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00045_ventas_checkColumnConstraints">}
-#+ Check constraints on the "vetb00045.ventas" column
-#+
-#+ @param p_ventas - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00045_ventas_checkColumnConstraints(p_ventas)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ventas LIKE vetb00045.ventas
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00045_ventas_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00045_sec_vend_checkColumnConstraints">}
-#+ Check constraints on the "vetb00045.sec_vend" column
-#+
-#+ @param p_sec_vend - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00045_sec_vend_checkColumnConstraints(p_sec_vend)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_vend LIKE vetb00045.sec_vend
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_sec_vend IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- sec_vend: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00045_sec_vend_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00045_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "vetb00045.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00045_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE vetb00045.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_n IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_n: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00045_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00045_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "vetb00045.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00045_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE vetb00045.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_grupo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_grupo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00045_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00045_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "vetb00045.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00045_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE vetb00045.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_tipo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_tipo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00045_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00045_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "vetb00045.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00045_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE vetb00045.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_sec IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_sec: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00045_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00045_cantidad_checkColumnConstraints">}
-#+ Check constraints on the "vetb00045.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(12,3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00045_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE vetb00045.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00045_cantidad_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00045_valor_checkColumnConstraints">}
-#+ Check constraints on the "vetb00045.valor" column
-#+
-#+ @param p_valor - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00045_valor_checkColumnConstraints(p_valor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valor LIKE vetb00045.valor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00045_valor_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00045_status_t_checkColumnConstraints">}
-#+ Check constraints on the "vetb00045.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00045_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE vetb00045.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00045_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00045_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "vetb00045.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00045_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE vetb00045.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00045_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00045_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "vetb00045.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00045_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE vetb00045.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00045_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00045_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "vetb00045.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00045_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE vetb00045.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00045_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00045_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "vetb00045.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00045_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE vetb00045.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00045_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00044_checkTableConstraints">}
-#+ Check constraints on the "vetb00044" table
-#+
-#+ @param p_data - a row data LIKE vetb00044.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00044_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vetb00044.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vetb00044_ano_checkColumnConstraints(p_data.ano) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00044_mes_checkColumnConstraints(p_data.mes) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00044_ventas_checkColumnConstraints(p_data.ventas) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00044_sec_vend_checkColumnConstraints(p_data.sec_vend) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00044_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00044_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00044_valor_checkColumnConstraints(p_data.valor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00044_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00044_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00044_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00044_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00044_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00044_checkTableConstraints
-
-{<BLOCK Name="fct.vetb00044_ano_checkColumnConstraints">}
-#+ Check constraints on the "vetb00044.ano" column
-#+
-#+ @param p_ano - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00044_ano_checkColumnConstraints(p_ano)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ano LIKE vetb00044.ano
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_ano IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- ano: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00044_ano_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00044_mes_checkColumnConstraints">}
-#+ Check constraints on the "vetb00044.mes" column
-#+
-#+ @param p_mes - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00044_mes_checkColumnConstraints(p_mes)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mes LIKE vetb00044.mes
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00044_mes_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00044_ventas_checkColumnConstraints">}
-#+ Check constraints on the "vetb00044.ventas" column
-#+
-#+ @param p_ventas - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00044_ventas_checkColumnConstraints(p_ventas)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ventas LIKE vetb00044.ventas
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00044_ventas_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00044_sec_vend_checkColumnConstraints">}
-#+ Check constraints on the "vetb00044.sec_vend" column
-#+
-#+ @param p_sec_vend - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00044_sec_vend_checkColumnConstraints(p_sec_vend)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_vend LIKE vetb00044.sec_vend
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00044_sec_vend_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00044_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "vetb00044.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00044_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE vetb00044.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00044_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00044_cantidad_checkColumnConstraints">}
-#+ Check constraints on the "vetb00044.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(12,3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00044_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE vetb00044.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00044_cantidad_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00044_valor_checkColumnConstraints">}
-#+ Check constraints on the "vetb00044.valor" column
-#+
-#+ @param p_valor - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00044_valor_checkColumnConstraints(p_valor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valor LIKE vetb00044.valor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00044_valor_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00044_status_t_checkColumnConstraints">}
-#+ Check constraints on the "vetb00044.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00044_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE vetb00044.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00044_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00044_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "vetb00044.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00044_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE vetb00044.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00044_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00044_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "vetb00044.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00044_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE vetb00044.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00044_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00044_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "vetb00044.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00044_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE vetb00044.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00044_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00044_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "vetb00044.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00044_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE vetb00044.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00044_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00042_checkTableConstraints">}
-#+ Check constraints on the "vetb00042" table
-#+
-#+ @param p_data - a row data LIKE vetb00042.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00042_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vetb00042.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vetb00042_factura_checkColumnConstraints(p_data.factura) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00042_cod_mov_checkColumnConstraints(p_data.cod_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00042_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00042_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00042_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00042_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00042_serie_checkColumnConstraints(p_data.serie) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00042_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00042_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00042_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00042_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00042_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00042_checkTableConstraints
-
-{<BLOCK Name="fct.vetb00042_factura_checkColumnConstraints">}
-#+ Check constraints on the "vetb00042.factura" column
-#+
-#+ @param p_factura - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00042_factura_checkColumnConstraints(p_factura)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_factura LIKE vetb00042.factura
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00042_factura_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00042_cod_mov_checkColumnConstraints">}
-#+ Check constraints on the "vetb00042.cod_mov" column
-#+
-#+ @param p_cod_mov - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00042_cod_mov_checkColumnConstraints(p_cod_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mov LIKE vetb00042.cod_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00042_cod_mov_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00042_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "vetb00042.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00042_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE vetb00042.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00042_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00042_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "vetb00042.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00042_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE vetb00042.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00042_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00042_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "vetb00042.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00042_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE vetb00042.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00042_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00042_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "vetb00042.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00042_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE vetb00042.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00042_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00042_serie_checkColumnConstraints">}
-#+ Check constraints on the "vetb00042.serie" column
-#+
-#+ @param p_serie - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00042_serie_checkColumnConstraints(p_serie)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_serie LIKE vetb00042.serie
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00042_serie_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00042_status_t_checkColumnConstraints">}
-#+ Check constraints on the "vetb00042.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00042_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE vetb00042.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00042_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00042_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "vetb00042.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00042_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE vetb00042.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00042_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00042_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "vetb00042.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00042_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE vetb00042.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00042_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00042_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "vetb00042.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00042_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE vetb00042.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00042_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00042_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "vetb00042.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00042_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE vetb00042.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00042_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00033_checkTableConstraints">}
-#+ Check constraints on the "vetb00033" table
-#+
-#+ @param p_data - a row data LIKE vetb00033.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00033_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vetb00033.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vetb00033_id_kit_checkColumnConstraints(p_data.id_kit) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00033_factura_checkColumnConstraints(p_data.factura) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00033_area_checkColumnConstraints(p_data.area) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00033_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00033_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00033_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00033_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00033_precio_checkColumnConstraints(p_data.precio) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00033_checkTableConstraints
-
-{<BLOCK Name="fct.vetb00033_id_kit_checkColumnConstraints">}
-#+ Check constraints on the "vetb00033.id_kit" column
-#+
-#+ @param p_id_kit - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00033_id_kit_checkColumnConstraints(p_id_kit)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_id_kit LIKE vetb00033.id_kit
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00033_id_kit_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00033_factura_checkColumnConstraints">}
-#+ Check constraints on the "vetb00033.factura" column
-#+
-#+ @param p_factura - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00033_factura_checkColumnConstraints(p_factura)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_factura LIKE vetb00033.factura
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00033_factura_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00033_area_checkColumnConstraints">}
-#+ Check constraints on the "vetb00033.area" column
-#+
-#+ @param p_area - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00033_area_checkColumnConstraints(p_area)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_area LIKE vetb00033.area
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00033_area_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00033_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "vetb00033.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00033_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE vetb00033.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00033_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00033_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "vetb00033.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00033_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE vetb00033.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00033_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00033_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "vetb00033.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00033_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE vetb00033.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00033_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00033_cantidad_checkColumnConstraints">}
-#+ Check constraints on the "vetb00033.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00033_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE vetb00033.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00033_cantidad_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00033_precio_checkColumnConstraints">}
-#+ Check constraints on the "vetb00033.precio" column
-#+
-#+ @param p_precio - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00033_precio_checkColumnConstraints(p_precio)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_precio LIKE vetb00033.precio
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00033_precio_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00031_checkTableConstraints">}
-#+ Check constraints on the "vetb00031" table
-#+
-#+ @param p_data - a row data LIKE vetb00031.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00031_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vetb00031.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vetb00031_id_kit_checkColumnConstraints(p_data.id_kit) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00031_cotizacion_no_checkColumnConstraints(p_data.cotizacion_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00031_area_checkColumnConstraints(p_data.area) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00031_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00031_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00031_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00031_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00031_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00031_precio_checkColumnConstraints(p_data.precio) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00031_porc_desc_checkColumnConstraints(p_data.porc_desc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00031_checkTableConstraints
-
-{<BLOCK Name="fct.vetb00031_id_kit_checkColumnConstraints">}
-#+ Check constraints on the "vetb00031.id_kit" column
-#+
-#+ @param p_id_kit - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00031_id_kit_checkColumnConstraints(p_id_kit)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_id_kit LIKE vetb00031.id_kit
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00031_id_kit_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00031_cotizacion_no_checkColumnConstraints">}
-#+ Check constraints on the "vetb00031.cotizacion_no" column
-#+
-#+ @param p_cotizacion_no - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00031_cotizacion_no_checkColumnConstraints(p_cotizacion_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cotizacion_no LIKE vetb00031.cotizacion_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00031_cotizacion_no_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00031_area_checkColumnConstraints">}
-#+ Check constraints on the "vetb00031.area" column
-#+
-#+ @param p_area - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00031_area_checkColumnConstraints(p_area)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_area LIKE vetb00031.area
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00031_area_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00031_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "vetb00031.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00031_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE vetb00031.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00031_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00031_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "vetb00031.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00031_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE vetb00031.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00031_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00031_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "vetb00031.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00031_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE vetb00031.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00031_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00031_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "vetb00031.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00031_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE vetb00031.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00031_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00031_cantidad_checkColumnConstraints">}
-#+ Check constraints on the "vetb00031.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00031_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE vetb00031.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00031_cantidad_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00031_precio_checkColumnConstraints">}
-#+ Check constraints on the "vetb00031.precio" column
-#+
-#+ @param p_precio - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00031_precio_checkColumnConstraints(p_precio)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_precio LIKE vetb00031.precio
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00031_precio_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00031_porc_desc_checkColumnConstraints">}
-#+ Check constraints on the "vetb00031.porc_desc" column
-#+
-#+ @param p_porc_desc - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00031_porc_desc_checkColumnConstraints(p_porc_desc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_porc_desc LIKE vetb00031.porc_desc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00031_porc_desc_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00030_checkTableConstraints">}
-#+ Check constraints on the "vetb00030" table
-#+
-#+ @param p_data - a row data LIKE vetb00030.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00030_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vetb00030.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vetb00030_id_kit_checkColumnConstraints(p_data.id_kit) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00030_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00030_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00030_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00030_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00030_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00030_porc_desc_checkColumnConstraints(p_data.porc_desc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00030_precio_checkColumnConstraints(p_data.precio) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00030_checkTableConstraints
-
-{<BLOCK Name="fct.vetb00030_id_kit_checkColumnConstraints">}
-#+ Check constraints on the "vetb00030.id_kit" column
-#+
-#+ @param p_id_kit - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00030_id_kit_checkColumnConstraints(p_id_kit)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_id_kit LIKE vetb00030.id_kit
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00030_id_kit_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00030_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "vetb00030.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00030_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE vetb00030.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00030_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00030_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "vetb00030.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00030_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE vetb00030.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00030_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00030_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "vetb00030.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00030_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE vetb00030.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00030_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00030_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "vetb00030.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00030_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE vetb00030.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00030_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00030_cantidad_checkColumnConstraints">}
-#+ Check constraints on the "vetb00030.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00030_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE vetb00030.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00030_cantidad_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00030_porc_desc_checkColumnConstraints">}
-#+ Check constraints on the "vetb00030.porc_desc" column
-#+
-#+ @param p_porc_desc - DECIMAL(18,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00030_porc_desc_checkColumnConstraints(p_porc_desc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_porc_desc LIKE vetb00030.porc_desc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00030_porc_desc_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00030_precio_checkColumnConstraints">}
-#+ Check constraints on the "vetb00030.precio" column
-#+
-#+ @param p_precio - DECIMAL(18,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00030_precio_checkColumnConstraints(p_precio)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_precio LIKE vetb00030.precio
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00030_precio_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00029_checkTableConstraints">}
-#+ Check constraints on the "vetb00029" table
-#+
-#+ @param p_data - a row data LIKE vetb00029.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00029_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vetb00029.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vetb00029_id_kit_checkColumnConstraints(p_data.id_kit) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00029_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00029_disponible_checkColumnConstraints(p_data.disponible) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00029_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00029_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00029_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00029_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00029_valor_total_checkColumnConstraints(p_data.valor_total) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00029_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00029_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00029_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00029_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00029_checkTableConstraints
-
-{<BLOCK Name="fct.vetb00029_id_kit_checkColumnConstraints">}
-#+ Check constraints on the "vetb00029.id_kit" column
-#+
-#+ @param p_id_kit - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00029_id_kit_checkColumnConstraints(p_id_kit)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_id_kit LIKE vetb00029.id_kit
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00029_id_kit_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00029_descripcion_checkColumnConstraints">}
-#+ Check constraints on the "vetb00029.descripcion" column
-#+
-#+ @param p_descripcion - CHAR(100) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00029_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE vetb00029.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00029_descripcion_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00029_disponible_checkColumnConstraints">}
-#+ Check constraints on the "vetb00029.disponible" column
-#+
-#+ @param p_disponible - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00029_disponible_checkColumnConstraints(p_disponible)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_disponible LIKE vetb00029.disponible
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00029_disponible_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00029_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "vetb00029.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00029_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE vetb00029.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00029_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00029_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "vetb00029.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00029_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE vetb00029.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00029_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00029_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "vetb00029.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00029_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE vetb00029.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00029_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00029_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "vetb00029.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00029_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE vetb00029.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00029_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00029_valor_total_checkColumnConstraints">}
-#+ Check constraints on the "vetb00029.valor_total" column
-#+
-#+ @param p_valor_total - DECIMAL(18,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00029_valor_total_checkColumnConstraints(p_valor_total)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valor_total LIKE vetb00029.valor_total
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00029_valor_total_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00029_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "vetb00029.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00029_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE vetb00029.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00029_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00029_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "vetb00029.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00029_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE vetb00029.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00029_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00029_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "vetb00029.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00029_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE vetb00029.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00029_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00029_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "vetb00029.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00029_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE vetb00029.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00029_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00028_checkTableConstraints">}
-#+ Check constraints on the "vetb00028" table
-#+
-#+ @param p_data - a row data LIKE vetb00028.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00028_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vetb00028.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vetb00028_cod_vend_checkColumnConstraints(p_data.cod_vend) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00028_sec_vend_checkColumnConstraints(p_data.sec_vend) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00028_tipo_cliente_checkColumnConstraints(p_data.tipo_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00028_sec_cliente_checkColumnConstraints(p_data.sec_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00028_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00028_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00028_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00028_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00028_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00028_checkTableConstraints
-
-{<BLOCK Name="fct.vetb00028_cod_vend_checkColumnConstraints">}
-#+ Check constraints on the "vetb00028.cod_vend" column
-#+
-#+ @param p_cod_vend - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00028_cod_vend_checkColumnConstraints(p_cod_vend)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_vend LIKE vetb00028.cod_vend
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00028_cod_vend_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00028_sec_vend_checkColumnConstraints">}
-#+ Check constraints on the "vetb00028.sec_vend" column
-#+
-#+ @param p_sec_vend - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00028_sec_vend_checkColumnConstraints(p_sec_vend)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_vend LIKE vetb00028.sec_vend
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_sec_vend IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- sec_vend: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00028_sec_vend_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00028_tipo_cliente_checkColumnConstraints">}
-#+ Check constraints on the "vetb00028.tipo_cliente" column
-#+
-#+ @param p_tipo_cliente - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00028_tipo_cliente_checkColumnConstraints(p_tipo_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_cliente LIKE vetb00028.tipo_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_tipo_cliente IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- tipo_cliente: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00028_tipo_cliente_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00028_sec_cliente_checkColumnConstraints">}
-#+ Check constraints on the "vetb00028.sec_cliente" column
-#+
-#+ @param p_sec_cliente - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00028_sec_cliente_checkColumnConstraints(p_sec_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_cliente LIKE vetb00028.sec_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_sec_cliente IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- sec_cliente: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00028_sec_cliente_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00028_status_t_checkColumnConstraints">}
-#+ Check constraints on the "vetb00028.status_t" column
-#+
-#+ @param p_status_t - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00028_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE vetb00028.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00028_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00028_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "vetb00028.us_crea" column
-#+
-#+ @param p_us_crea - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00028_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE vetb00028.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00028_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00028_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "vetb00028.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00028_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE vetb00028.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00028_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00028_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "vetb00028.us_mod" column
-#+
-#+ @param p_us_mod - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00028_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE vetb00028.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00028_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00028_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "vetb00028.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00028_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE vetb00028.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00028_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00027_checkTableConstraints">}
-#+ Check constraints on the "vetb00027" table
-#+
-#+ @param p_data - a row data LIKE vetb00027.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00027_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vetb00027.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vetb00027_tipo_desc_checkColumnConstraints(p_data.tipo_desc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00027_descrip_checkColumnConstraints(p_data.descrip) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00027_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00027_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00027_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00027_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00027_porc_desc_checkColumnConstraints(p_data.porc_desc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00027_cantidad_1_checkColumnConstraints(p_data.cantidad_1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00027_cantidad_2_checkColumnConstraints(p_data.cantidad_2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00027_cajas_bonif_checkColumnConstraints(p_data.cajas_bonif) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00027_fecha_cambio_checkColumnConstraints(p_data.fecha_cambio) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00027_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00027_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00027_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00027_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00027_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00027_checkTableConstraints
-
-{<BLOCK Name="fct.vetb00027_tipo_desc_checkColumnConstraints">}
-#+ Check constraints on the "vetb00027.tipo_desc" column
-#+
-#+ @param p_tipo_desc - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00027_tipo_desc_checkColumnConstraints(p_tipo_desc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_desc LIKE vetb00027.tipo_desc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00027_tipo_desc_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00027_descrip_checkColumnConstraints">}
-#+ Check constraints on the "vetb00027.descrip" column
-#+
-#+ @param p_descrip - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00027_descrip_checkColumnConstraints(p_descrip)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descrip LIKE vetb00027.descrip
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00027_descrip_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00027_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "vetb00027.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00027_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE vetb00027.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00027_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00027_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "vetb00027.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00027_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE vetb00027.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00027_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00027_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "vetb00027.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00027_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE vetb00027.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00027_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00027_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "vetb00027.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00027_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE vetb00027.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00027_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00027_porc_desc_checkColumnConstraints">}
-#+ Check constraints on the "vetb00027.porc_desc" column
-#+
-#+ @param p_porc_desc - DECIMAL(5,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00027_porc_desc_checkColumnConstraints(p_porc_desc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_porc_desc LIKE vetb00027.porc_desc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00027_porc_desc_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00027_cantidad_1_checkColumnConstraints">}
-#+ Check constraints on the "vetb00027.cantidad_1" column
-#+
-#+ @param p_cantidad_1 - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00027_cantidad_1_checkColumnConstraints(p_cantidad_1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad_1 LIKE vetb00027.cantidad_1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00027_cantidad_1_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00027_cantidad_2_checkColumnConstraints">}
-#+ Check constraints on the "vetb00027.cantidad_2" column
-#+
-#+ @param p_cantidad_2 - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00027_cantidad_2_checkColumnConstraints(p_cantidad_2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad_2 LIKE vetb00027.cantidad_2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00027_cantidad_2_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00027_cajas_bonif_checkColumnConstraints">}
-#+ Check constraints on the "vetb00027.cajas_bonif" column
-#+
-#+ @param p_cajas_bonif - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00027_cajas_bonif_checkColumnConstraints(p_cajas_bonif)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cajas_bonif LIKE vetb00027.cajas_bonif
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00027_cajas_bonif_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00027_fecha_cambio_checkColumnConstraints">}
-#+ Check constraints on the "vetb00027.fecha_cambio" column
-#+
-#+ @param p_fecha_cambio - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00027_fecha_cambio_checkColumnConstraints(p_fecha_cambio)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_cambio LIKE vetb00027.fecha_cambio
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00027_fecha_cambio_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00027_status_t_checkColumnConstraints">}
-#+ Check constraints on the "vetb00027.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00027_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE vetb00027.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00027_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00027_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "vetb00027.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00027_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE vetb00027.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00027_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00027_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "vetb00027.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00027_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE vetb00027.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00027_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00027_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "vetb00027.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00027_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE vetb00027.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00027_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00027_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "vetb00027.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00027_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE vetb00027.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00027_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00026_checkTableConstraints">}
-#+ Check constraints on the "vetb00026" table
-#+
-#+ @param p_data - a row data LIKE vetb00026.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00026_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vetb00026.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vetb00026_codid_checkColumnConstraints(p_data.codid) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00026_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00026_checkTableConstraints
-
-{<BLOCK Name="fct.vetb00026_codid_checkColumnConstraints">}
-#+ Check constraints on the "vetb00026.codid" column
-#+
-#+ @param p_codid - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00026_codid_checkColumnConstraints(p_codid)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codid LIKE vetb00026.codid
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00026_codid_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00026_descripcion_checkColumnConstraints">}
-#+ Check constraints on the "vetb00026.descripcion" column
-#+
-#+ @param p_descripcion - CHAR(25) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00026_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE vetb00026.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00026_descripcion_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00025_checkTableConstraints">}
-#+ Check constraints on the "vetb00025" table
-#+
-#+ @param p_data - a row data LIKE vetb00025.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00025_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vetb00025.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vetb00025_ventas_checkColumnConstraints(p_data.ventas) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00025_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00025_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00025_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00025_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00025_tipo_cliente_checkColumnConstraints(p_data.tipo_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00025_sec_cliente_checkColumnConstraints(p_data.sec_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00025_precio_checkColumnConstraints(p_data.precio) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00025_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00025_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00025_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00025_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00025_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00025_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00025_cod_lista_checkColumnConstraints(p_data.cod_lista) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00025_fecha_inicial_checkColumnConstraints(p_data.fecha_inicial) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00025_fecha_final_checkColumnConstraints(p_data.fecha_final) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00025_idrow_checkColumnConstraints(p_data.idrow) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00025_checkTableConstraints
-
-{<BLOCK Name="fct.vetb00025_ventas_checkColumnConstraints">}
-#+ Check constraints on the "vetb00025.ventas" column
-#+
-#+ @param p_ventas - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00025_ventas_checkColumnConstraints(p_ventas)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ventas LIKE vetb00025.ventas
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_ventas IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- ventas: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00025_ventas_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00025_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "vetb00025.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00025_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE vetb00025.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_n IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_n: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00025_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00025_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "vetb00025.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00025_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE vetb00025.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_grupo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_grupo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00025_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00025_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "vetb00025.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00025_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE vetb00025.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_tipo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_tipo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00025_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00025_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "vetb00025.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00025_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE vetb00025.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_sec IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_sec: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00025_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00025_tipo_cliente_checkColumnConstraints">}
-#+ Check constraints on the "vetb00025.tipo_cliente" column
-#+
-#+ @param p_tipo_cliente - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00025_tipo_cliente_checkColumnConstraints(p_tipo_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_cliente LIKE vetb00025.tipo_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00025_tipo_cliente_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00025_sec_cliente_checkColumnConstraints">}
-#+ Check constraints on the "vetb00025.sec_cliente" column
-#+
-#+ @param p_sec_cliente - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00025_sec_cliente_checkColumnConstraints(p_sec_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_cliente LIKE vetb00025.sec_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00025_sec_cliente_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00025_precio_checkColumnConstraints">}
-#+ Check constraints on the "vetb00025.precio" column
-#+
-#+ @param p_precio - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00025_precio_checkColumnConstraints(p_precio)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_precio LIKE vetb00025.precio
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_precio IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- precio: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00025_precio_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00025_descripcion_checkColumnConstraints">}
-#+ Check constraints on the "vetb00025.descripcion" column
-#+
-#+ @param p_descripcion - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00025_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE vetb00025.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00025_descripcion_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00025_status_t_checkColumnConstraints">}
-#+ Check constraints on the "vetb00025.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00025_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE vetb00025.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00025_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00025_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "vetb00025.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00025_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE vetb00025.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00025_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00025_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "vetb00025.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00025_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE vetb00025.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00025_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00025_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "vetb00025.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00025_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE vetb00025.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00025_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00025_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "vetb00025.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00025_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE vetb00025.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00025_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00025_cod_lista_checkColumnConstraints">}
-#+ Check constraints on the "vetb00025.cod_lista" column
-#+
-#+ @param p_cod_lista - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00025_cod_lista_checkColumnConstraints(p_cod_lista)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_lista LIKE vetb00025.cod_lista
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00025_cod_lista_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00025_fecha_inicial_checkColumnConstraints">}
-#+ Check constraints on the "vetb00025.fecha_inicial" column
-#+
-#+ @param p_fecha_inicial - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00025_fecha_inicial_checkColumnConstraints(p_fecha_inicial)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_inicial LIKE vetb00025.fecha_inicial
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00025_fecha_inicial_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00025_fecha_final_checkColumnConstraints">}
-#+ Check constraints on the "vetb00025.fecha_final" column
-#+
-#+ @param p_fecha_final - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00025_fecha_final_checkColumnConstraints(p_fecha_final)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_final LIKE vetb00025.fecha_final
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00025_fecha_final_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00025_idrow_checkColumnConstraints">}
-#+ Check constraints on the "vetb00025.idrow" column
-#+
-#+ @param p_idrow - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00025_idrow_checkColumnConstraints(p_idrow)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_idrow LIKE vetb00025.idrow
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_idrow IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- idrow: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00025_idrow_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00024_checkTableConstraints">}
-#+ Check constraints on the "vetb00024" table
-#+
-#+ @param p_data - a row data LIKE vetb00024.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00024_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vetb00024.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vetb00024_fecha_ini_sem_checkColumnConstraints(p_data.fecha_ini_sem) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00024_fecha_fin_sem_checkColumnConstraints(p_data.fecha_fin_sem) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00024_cod_vend_checkColumnConstraints(p_data.cod_vend) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00024_sec_vend_checkColumnConstraints(p_data.sec_vend) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00024_tipo_cliente_checkColumnConstraints(p_data.tipo_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00024_sec_cliente_checkColumnConstraints(p_data.sec_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00024_fecha_visita_checkColumnConstraints(p_data.fecha_visita) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00024_hora_visita_checkColumnConstraints(p_data.hora_visita) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00024_compra_checkColumnConstraints(p_data.compra) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00024_persona_contacto_checkColumnConstraints(p_data.persona_contacto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00024_observacion_checkColumnConstraints(p_data.observacion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00024_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00024_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00024_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00024_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00024_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00024_checkTableConstraints
-
-{<BLOCK Name="fct.vetb00024_fecha_ini_sem_checkColumnConstraints">}
-#+ Check constraints on the "vetb00024.fecha_ini_sem" column
-#+
-#+ @param p_fecha_ini_sem - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00024_fecha_ini_sem_checkColumnConstraints(p_fecha_ini_sem)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_ini_sem LIKE vetb00024.fecha_ini_sem
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00024_fecha_ini_sem_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00024_fecha_fin_sem_checkColumnConstraints">}
-#+ Check constraints on the "vetb00024.fecha_fin_sem" column
-#+
-#+ @param p_fecha_fin_sem - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00024_fecha_fin_sem_checkColumnConstraints(p_fecha_fin_sem)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_fin_sem LIKE vetb00024.fecha_fin_sem
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00024_fecha_fin_sem_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00024_cod_vend_checkColumnConstraints">}
-#+ Check constraints on the "vetb00024.cod_vend" column
-#+
-#+ @param p_cod_vend - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00024_cod_vend_checkColumnConstraints(p_cod_vend)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_vend LIKE vetb00024.cod_vend
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00024_cod_vend_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00024_sec_vend_checkColumnConstraints">}
-#+ Check constraints on the "vetb00024.sec_vend" column
-#+
-#+ @param p_sec_vend - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00024_sec_vend_checkColumnConstraints(p_sec_vend)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_vend LIKE vetb00024.sec_vend
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00024_sec_vend_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00024_tipo_cliente_checkColumnConstraints">}
-#+ Check constraints on the "vetb00024.tipo_cliente" column
-#+
-#+ @param p_tipo_cliente - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00024_tipo_cliente_checkColumnConstraints(p_tipo_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_cliente LIKE vetb00024.tipo_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00024_tipo_cliente_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00024_sec_cliente_checkColumnConstraints">}
-#+ Check constraints on the "vetb00024.sec_cliente" column
-#+
-#+ @param p_sec_cliente - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00024_sec_cliente_checkColumnConstraints(p_sec_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_cliente LIKE vetb00024.sec_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00024_sec_cliente_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00024_fecha_visita_checkColumnConstraints">}
-#+ Check constraints on the "vetb00024.fecha_visita" column
-#+
-#+ @param p_fecha_visita - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00024_fecha_visita_checkColumnConstraints(p_fecha_visita)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_visita LIKE vetb00024.fecha_visita
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00024_fecha_visita_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00024_hora_visita_checkColumnConstraints">}
-#+ Check constraints on the "vetb00024.hora_visita" column
-#+
-#+ @param p_hora_visita - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00024_hora_visita_checkColumnConstraints(p_hora_visita)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_hora_visita LIKE vetb00024.hora_visita
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00024_hora_visita_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00024_compra_checkColumnConstraints">}
-#+ Check constraints on the "vetb00024.compra" column
-#+
-#+ @param p_compra - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00024_compra_checkColumnConstraints(p_compra)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_compra LIKE vetb00024.compra
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00024_compra_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00024_persona_contacto_checkColumnConstraints">}
-#+ Check constraints on the "vetb00024.persona_contacto" column
-#+
-#+ @param p_persona_contacto - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00024_persona_contacto_checkColumnConstraints(p_persona_contacto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_persona_contacto LIKE vetb00024.persona_contacto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00024_persona_contacto_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00024_observacion_checkColumnConstraints">}
-#+ Check constraints on the "vetb00024.observacion" column
-#+
-#+ @param p_observacion - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00024_observacion_checkColumnConstraints(p_observacion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_observacion LIKE vetb00024.observacion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00024_observacion_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00024_status_t_checkColumnConstraints">}
-#+ Check constraints on the "vetb00024.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00024_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE vetb00024.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00024_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00024_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "vetb00024.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00024_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE vetb00024.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00024_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00024_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "vetb00024.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00024_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE vetb00024.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00024_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00024_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "vetb00024.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00024_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE vetb00024.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00024_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00024_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "vetb00024.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00024_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE vetb00024.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00024_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00023_checkTableConstraints">}
-#+ Check constraints on the "vetb00023" table
-#+
-#+ @param p_data - a row data LIKE vetb00023.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00023_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vetb00023.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vetb00023_cod_tarifa_checkColumnConstraints(p_data.cod_tarifa) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00023_descrip_checkColumnConstraints(p_data.descrip) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00023_cod_provincia_checkColumnConstraints(p_data.cod_provincia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00023_tarifa_pago_checkColumnConstraints(p_data.tarifa_pago) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00023_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00023_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00023_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00023_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00023_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00023_checkTableConstraints
-
-{<BLOCK Name="fct.vetb00023_cod_tarifa_checkColumnConstraints">}
-#+ Check constraints on the "vetb00023.cod_tarifa" column
-#+
-#+ @param p_cod_tarifa - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00023_cod_tarifa_checkColumnConstraints(p_cod_tarifa)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tarifa LIKE vetb00023.cod_tarifa
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00023_cod_tarifa_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00023_descrip_checkColumnConstraints">}
-#+ Check constraints on the "vetb00023.descrip" column
-#+
-#+ @param p_descrip - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00023_descrip_checkColumnConstraints(p_descrip)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descrip LIKE vetb00023.descrip
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00023_descrip_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00023_cod_provincia_checkColumnConstraints">}
-#+ Check constraints on the "vetb00023.cod_provincia" column
-#+
-#+ @param p_cod_provincia - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00023_cod_provincia_checkColumnConstraints(p_cod_provincia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_provincia LIKE vetb00023.cod_provincia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00023_cod_provincia_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00023_tarifa_pago_checkColumnConstraints">}
-#+ Check constraints on the "vetb00023.tarifa_pago" column
-#+
-#+ @param p_tarifa_pago - DECIMAL(7,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00023_tarifa_pago_checkColumnConstraints(p_tarifa_pago)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tarifa_pago LIKE vetb00023.tarifa_pago
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00023_tarifa_pago_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00023_status_t_checkColumnConstraints">}
-#+ Check constraints on the "vetb00023.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00023_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE vetb00023.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00023_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00023_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "vetb00023.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00023_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE vetb00023.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00023_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00023_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "vetb00023.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00023_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE vetb00023.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00023_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00023_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "vetb00023.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00023_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE vetb00023.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00023_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00023_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "vetb00023.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00023_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE vetb00023.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00023_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00022_checkTableConstraints">}
-#+ Check constraints on the "vetb00022" table
-#+
-#+ @param p_data - a row data LIKE vetb00022.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00022_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vetb00022.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vetb00022_etiqueta_checkColumnConstraints(p_data.etiqueta) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00022_cotizacion_no_checkColumnConstraints(p_data.cotizacion_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00022_secuencia_checkColumnConstraints(p_data.secuencia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00022_area_checkColumnConstraints(p_data.area) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00022_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00022_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00022_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00022_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00022_lado_1_checkColumnConstraints(p_data.lado_1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00022_lado_2_checkColumnConstraints(p_data.lado_2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00022_lado_3_checkColumnConstraints(p_data.lado_3) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00022_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00022_medida_checkColumnConstraints(p_data.medida) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00022_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00022_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00022_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00022_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00022_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00022_checkTableConstraints
-
-{<BLOCK Name="fct.vetb00022_etiqueta_checkColumnConstraints">}
-#+ Check constraints on the "vetb00022.etiqueta" column
-#+
-#+ @param p_etiqueta - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00022_etiqueta_checkColumnConstraints(p_etiqueta)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_etiqueta LIKE vetb00022.etiqueta
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_etiqueta IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- etiqueta: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00022_etiqueta_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00022_cotizacion_no_checkColumnConstraints">}
-#+ Check constraints on the "vetb00022.cotizacion_no" column
-#+
-#+ @param p_cotizacion_no - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00022_cotizacion_no_checkColumnConstraints(p_cotizacion_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cotizacion_no LIKE vetb00022.cotizacion_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cotizacion_no IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cotizacion_no: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00022_cotizacion_no_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00022_secuencia_checkColumnConstraints">}
-#+ Check constraints on the "vetb00022.secuencia" column
-#+
-#+ @param p_secuencia - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00022_secuencia_checkColumnConstraints(p_secuencia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_secuencia LIKE vetb00022.secuencia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_secuencia IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- secuencia: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00022_secuencia_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00022_area_checkColumnConstraints">}
-#+ Check constraints on the "vetb00022.area" column
-#+
-#+ @param p_area - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00022_area_checkColumnConstraints(p_area)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_area LIKE vetb00022.area
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00022_area_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00022_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "vetb00022.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00022_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE vetb00022.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00022_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00022_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "vetb00022.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00022_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE vetb00022.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00022_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00022_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "vetb00022.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00022_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE vetb00022.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00022_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00022_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "vetb00022.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00022_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE vetb00022.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00022_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00022_lado_1_checkColumnConstraints">}
-#+ Check constraints on the "vetb00022.lado_1" column
-#+
-#+ @param p_lado_1 - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00022_lado_1_checkColumnConstraints(p_lado_1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_lado_1 LIKE vetb00022.lado_1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00022_lado_1_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00022_lado_2_checkColumnConstraints">}
-#+ Check constraints on the "vetb00022.lado_2" column
-#+
-#+ @param p_lado_2 - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00022_lado_2_checkColumnConstraints(p_lado_2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_lado_2 LIKE vetb00022.lado_2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00022_lado_2_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00022_lado_3_checkColumnConstraints">}
-#+ Check constraints on the "vetb00022.lado_3" column
-#+
-#+ @param p_lado_3 - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00022_lado_3_checkColumnConstraints(p_lado_3)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_lado_3 LIKE vetb00022.lado_3
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00022_lado_3_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00022_cantidad_checkColumnConstraints">}
-#+ Check constraints on the "vetb00022.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00022_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE vetb00022.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00022_cantidad_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00022_medida_checkColumnConstraints">}
-#+ Check constraints on the "vetb00022.medida" column
-#+
-#+ @param p_medida - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00022_medida_checkColumnConstraints(p_medida)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_medida LIKE vetb00022.medida
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00022_medida_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00022_status_t_checkColumnConstraints">}
-#+ Check constraints on the "vetb00022.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00022_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE vetb00022.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00022_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00022_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "vetb00022.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00022_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE vetb00022.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00022_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00022_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "vetb00022.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00022_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE vetb00022.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00022_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00022_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "vetb00022.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00022_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE vetb00022.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00022_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00022_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "vetb00022.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00022_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE vetb00022.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00022_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00021_checkTableConstraints">}
-#+ Check constraints on the "vetb00021" table
-#+
-#+ @param p_data - a row data LIKE vetb00021.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00021_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vetb00021.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vetb00021_num_doc_checkColumnConstraints(p_data.num_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00021_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00021_tipo_cliente_checkColumnConstraints(p_data.tipo_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00021_sec_cliente_checkColumnConstraints(p_data.sec_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00021_nombre_checkColumnConstraints(p_data.nombre) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00021_factura_checkColumnConstraints(p_data.factura) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00021_referencia_pago_checkColumnConstraints(p_data.referencia_pago) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00021_banco_checkColumnConstraints(p_data.banco) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00021_ventas_checkColumnConstraints(p_data.ventas) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00021_sucid_checkColumnConstraints(p_data.sucid) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00021_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00021_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00021_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00021_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00021_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00021_checkTableConstraints
-
-{<BLOCK Name="fct.vetb00021_num_doc_checkColumnConstraints">}
-#+ Check constraints on the "vetb00021.num_doc" column
-#+
-#+ @param p_num_doc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00021_num_doc_checkColumnConstraints(p_num_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_doc LIKE vetb00021.num_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00021_num_doc_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00021_fecha_checkColumnConstraints">}
-#+ Check constraints on the "vetb00021.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00021_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE vetb00021.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00021_fecha_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00021_tipo_cliente_checkColumnConstraints">}
-#+ Check constraints on the "vetb00021.tipo_cliente" column
-#+
-#+ @param p_tipo_cliente - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00021_tipo_cliente_checkColumnConstraints(p_tipo_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_cliente LIKE vetb00021.tipo_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00021_tipo_cliente_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00021_sec_cliente_checkColumnConstraints">}
-#+ Check constraints on the "vetb00021.sec_cliente" column
-#+
-#+ @param p_sec_cliente - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00021_sec_cliente_checkColumnConstraints(p_sec_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_cliente LIKE vetb00021.sec_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00021_sec_cliente_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00021_nombre_checkColumnConstraints">}
-#+ Check constraints on the "vetb00021.nombre" column
-#+
-#+ @param p_nombre - CHAR(100) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00021_nombre_checkColumnConstraints(p_nombre)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombre LIKE vetb00021.nombre
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00021_nombre_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00021_factura_checkColumnConstraints">}
-#+ Check constraints on the "vetb00021.factura" column
-#+
-#+ @param p_factura - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00021_factura_checkColumnConstraints(p_factura)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_factura LIKE vetb00021.factura
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00021_factura_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00021_referencia_pago_checkColumnConstraints">}
-#+ Check constraints on the "vetb00021.referencia_pago" column
-#+
-#+ @param p_referencia_pago - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00021_referencia_pago_checkColumnConstraints(p_referencia_pago)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_referencia_pago LIKE vetb00021.referencia_pago
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00021_referencia_pago_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00021_banco_checkColumnConstraints">}
-#+ Check constraints on the "vetb00021.banco" column
-#+
-#+ @param p_banco - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00021_banco_checkColumnConstraints(p_banco)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_banco LIKE vetb00021.banco
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00021_banco_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00021_ventas_checkColumnConstraints">}
-#+ Check constraints on the "vetb00021.ventas" column
-#+
-#+ @param p_ventas - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00021_ventas_checkColumnConstraints(p_ventas)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ventas LIKE vetb00021.ventas
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00021_ventas_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00021_sucid_checkColumnConstraints">}
-#+ Check constraints on the "vetb00021.sucid" column
-#+
-#+ @param p_sucid - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00021_sucid_checkColumnConstraints(p_sucid)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sucid LIKE vetb00021.sucid
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00021_sucid_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00021_status_t_checkColumnConstraints">}
-#+ Check constraints on the "vetb00021.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00021_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE vetb00021.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00021_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00021_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "vetb00021.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00021_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE vetb00021.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00021_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00021_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "vetb00021.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00021_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE vetb00021.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00021_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00021_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "vetb00021.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00021_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE vetb00021.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00021_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00021_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "vetb00021.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00021_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE vetb00021.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00021_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00020_checkTableConstraints">}
-#+ Check constraints on the "vetb00020" table
-#+
-#+ @param p_data - a row data LIKE vetb00020.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00020_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vetb00020.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vetb00020_cod_provincia_checkColumnConstraints(p_data.cod_provincia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00020_nombre_provincia_checkColumnConstraints(p_data.nombre_provincia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00020_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00020_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00020_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00020_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00020_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00020_id_ciudad_checkColumnConstraints(p_data.id_ciudad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- CALL smarmotech_dbxconstraints_vetb00020_pk_vetb00020_checkUniqueConstraint(p_forUpdate, p_data.cod_provincia, p_data.id_ciudad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00020_checkTableConstraints
-
-{<BLOCK Name="fct.vetb00020_pk_vetb00020_checkUniqueConstraint">}
-#+ Check the primary key uniqueness constraint on the "vetb00020"
-#+
-#+ @param p_key - Primary Key
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00020_pk_vetb00020_checkUniqueConstraint(p_forUpdate, p_key)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_key
- RECORD
- vetb00020_cod_provincia LIKE vetb00020.cod_provincia,
- vetb00020_id_ciudad LIKE vetb00020.id_ciudad
- END RECORD
- DEFINE l_key
- RECORD
- vetb00020_cod_provincia LIKE vetb00020.cod_provincia,
- vetb00020_id_ciudad LIKE vetb00020.id_ciudad
- END RECORD
- DEFINE l_where STRING
- DEFINE l_sqlQuery STRING
- DEFINE l_count INTEGER
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- LET l_where = "WHERE vetb00020.cod_provincia = ?
- AND vetb00020.id_ciudad = ? "
-
- let l_sqlQuery = "SELECT COUNT(*), cod_provincia, id_ciudad FROM vetb00020 ", l_where, " GROUP BY cod_provincia, id_ciudad"
-
- PREPARE cur_vetb00020_pk_vetb00020_checkUniqueConstraint FROM l_sqlQuery
- EXECUTE cur_vetb00020_pk_vetb00020_checkUniqueConstraint INTO l_count, l_key.* USING p_key.*
- FREE cur_vetb00020_pk_vetb00020_checkUniqueConstraint
- IF (NOT p_forUpdate AND l_count > 0) OR (p_forUpdate AND l_count > 0 AND p_key.* != l_key.*) THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_provincia + id_ciudad: " || ERROR_BAM_00002) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00020_pk_vetb00020_checkUniqueConstraint
-
-{<BLOCK Name="fct.vetb00020_cod_provincia_checkColumnConstraints">}
-#+ Check constraints on the "vetb00020.cod_provincia" column
-#+
-#+ @param p_cod_provincia - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00020_cod_provincia_checkColumnConstraints(p_cod_provincia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_provincia LIKE vetb00020.cod_provincia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_provincia IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_provincia: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00020_cod_provincia_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00020_nombre_provincia_checkColumnConstraints">}
-#+ Check constraints on the "vetb00020.nombre_provincia" column
-#+
-#+ @param p_nombre_provincia - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00020_nombre_provincia_checkColumnConstraints(p_nombre_provincia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombre_provincia LIKE vetb00020.nombre_provincia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00020_nombre_provincia_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00020_status_t_checkColumnConstraints">}
-#+ Check constraints on the "vetb00020.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00020_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE vetb00020.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00020_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00020_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "vetb00020.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00020_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE vetb00020.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00020_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00020_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "vetb00020.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00020_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE vetb00020.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00020_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00020_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "vetb00020.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00020_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE vetb00020.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00020_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00020_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "vetb00020.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00020_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE vetb00020.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00020_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00020_id_ciudad_checkColumnConstraints">}
-#+ Check constraints on the "vetb00020.id_ciudad" column
-#+
-#+ @param p_id_ciudad - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00020_id_ciudad_checkColumnConstraints(p_id_ciudad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_id_ciudad LIKE vetb00020.id_ciudad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_id_ciudad IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- id_ciudad: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00020_id_ciudad_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00019_checkTableConstraints">}
-#+ Check constraints on the "vetb00019" table
-#+
-#+ @param p_data - a row data LIKE vetb00019.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00019_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vetb00019.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vetb00019_ano_checkColumnConstraints(p_data.ano) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00019_mes_ini_checkColumnConstraints(p_data.mes_ini) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00019_mes_fin_checkColumnConstraints(p_data.mes_fin) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00019_prima_checkColumnConstraints(p_data.prima) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00019_itbi_checkColumnConstraints(p_data.itbi) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00019_porciento_checkColumnConstraints(p_data.porciento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00019_disponible_checkColumnConstraints(p_data.disponible) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00019_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00019_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00019_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00019_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00019_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00019_checkTableConstraints
-
-{<BLOCK Name="fct.vetb00019_ano_checkColumnConstraints">}
-#+ Check constraints on the "vetb00019.ano" column
-#+
-#+ @param p_ano - CHAR(4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00019_ano_checkColumnConstraints(p_ano)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ano LIKE vetb00019.ano
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00019_ano_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00019_mes_ini_checkColumnConstraints">}
-#+ Check constraints on the "vetb00019.mes_ini" column
-#+
-#+ @param p_mes_ini - CHAR(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00019_mes_ini_checkColumnConstraints(p_mes_ini)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mes_ini LIKE vetb00019.mes_ini
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00019_mes_ini_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00019_mes_fin_checkColumnConstraints">}
-#+ Check constraints on the "vetb00019.mes_fin" column
-#+
-#+ @param p_mes_fin - CHAR(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00019_mes_fin_checkColumnConstraints(p_mes_fin)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mes_fin LIKE vetb00019.mes_fin
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00019_mes_fin_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00019_prima_checkColumnConstraints">}
-#+ Check constraints on the "vetb00019.prima" column
-#+
-#+ @param p_prima - DECIMAL(7,3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00019_prima_checkColumnConstraints(p_prima)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_prima LIKE vetb00019.prima
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00019_prima_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00019_itbi_checkColumnConstraints">}
-#+ Check constraints on the "vetb00019.itbi" column
-#+
-#+ @param p_itbi - DECIMAL(7,3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00019_itbi_checkColumnConstraints(p_itbi)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_itbi LIKE vetb00019.itbi
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00019_itbi_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00019_porciento_checkColumnConstraints">}
-#+ Check constraints on the "vetb00019.porciento" column
-#+
-#+ @param p_porciento - DECIMAL(8,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00019_porciento_checkColumnConstraints(p_porciento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_porciento LIKE vetb00019.porciento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00019_porciento_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00019_disponible_checkColumnConstraints">}
-#+ Check constraints on the "vetb00019.disponible" column
-#+
-#+ @param p_disponible - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00019_disponible_checkColumnConstraints(p_disponible)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_disponible LIKE vetb00019.disponible
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00019_disponible_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00019_status_t_checkColumnConstraints">}
-#+ Check constraints on the "vetb00019.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00019_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE vetb00019.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00019_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00019_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "vetb00019.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00019_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE vetb00019.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00019_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00019_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "vetb00019.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00019_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE vetb00019.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00019_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00019_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "vetb00019.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00019_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE vetb00019.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00019_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00019_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "vetb00019.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00019_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE vetb00019.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00019_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00018_checkTableConstraints">}
-#+ Check constraints on the "vetb00018" table
-#+
-#+ @param p_data - a row data LIKE vetb00018.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00018_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vetb00018.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vetb00018_anos_checkColumnConstraints(p_data.anos) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00018_fecha_in_checkColumnConstraints(p_data.fecha_in) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00018_fecha_fi_checkColumnConstraints(p_data.fecha_fi) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00018_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00018_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00018_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00018_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00018_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00018_checkTableConstraints
-
-{<BLOCK Name="fct.vetb00018_anos_checkColumnConstraints">}
-#+ Check constraints on the "vetb00018.anos" column
-#+
-#+ @param p_anos - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00018_anos_checkColumnConstraints(p_anos)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_anos LIKE vetb00018.anos
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00018_anos_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00018_fecha_in_checkColumnConstraints">}
-#+ Check constraints on the "vetb00018.fecha_in" column
-#+
-#+ @param p_fecha_in - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00018_fecha_in_checkColumnConstraints(p_fecha_in)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_in LIKE vetb00018.fecha_in
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00018_fecha_in_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00018_fecha_fi_checkColumnConstraints">}
-#+ Check constraints on the "vetb00018.fecha_fi" column
-#+
-#+ @param p_fecha_fi - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00018_fecha_fi_checkColumnConstraints(p_fecha_fi)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_fi LIKE vetb00018.fecha_fi
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00018_fecha_fi_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00018_status_t_checkColumnConstraints">}
-#+ Check constraints on the "vetb00018.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00018_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE vetb00018.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00018_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00018_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "vetb00018.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00018_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE vetb00018.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00018_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00018_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "vetb00018.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00018_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE vetb00018.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00018_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00018_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "vetb00018.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00018_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE vetb00018.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00018_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00018_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "vetb00018.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00018_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE vetb00018.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00018_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00016_checkTableConstraints">}
-#+ Check constraints on the "vetb00016" table
-#+
-#+ @param p_data - a row data LIKE vetb00016.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00016_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vetb00016.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vetb00016_id_ciudad_checkColumnConstraints(p_data.id_ciudad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00016_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00016_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00016_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00016_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00016_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00016_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00016_checkTableConstraints
-
-{<BLOCK Name="fct.vetb00016_id_ciudad_checkColumnConstraints">}
-#+ Check constraints on the "vetb00016.id_ciudad" column
-#+
-#+ @param p_id_ciudad - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00016_id_ciudad_checkColumnConstraints(p_id_ciudad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_id_ciudad LIKE vetb00016.id_ciudad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00016_id_ciudad_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00016_descripcion_checkColumnConstraints">}
-#+ Check constraints on the "vetb00016.descripcion" column
-#+
-#+ @param p_descripcion - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00016_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE vetb00016.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00016_descripcion_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00016_status_t_checkColumnConstraints">}
-#+ Check constraints on the "vetb00016.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00016_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE vetb00016.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00016_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00016_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "vetb00016.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00016_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE vetb00016.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00016_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00016_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "vetb00016.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00016_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE vetb00016.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00016_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00016_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "vetb00016.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00016_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE vetb00016.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00016_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00016_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "vetb00016.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00016_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE vetb00016.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00016_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00015_checkTableConstraints">}
-#+ Check constraints on the "vetb00015" table
-#+
-#+ @param p_data - a row data LIKE vetb00015.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00015_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vetb00015.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vetb00015_cod_transp_checkColumnConstraints(p_data.cod_transp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00015_sec_transp_checkColumnConstraints(p_data.sec_transp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00015_nombre_checkColumnConstraints(p_data.nombre) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00015_cedula_checkColumnConstraints(p_data.cedula) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00015_serie_checkColumnConstraints(p_data.serie) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00015_calle_checkColumnConstraints(p_data.calle) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00015_casa_num_checkColumnConstraints(p_data.casa_num) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00015_barrio_checkColumnConstraints(p_data.barrio) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00015_urbanizacion_checkColumnConstraints(p_data.urbanizacion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00015_cod_zona_checkColumnConstraints(p_data.cod_zona) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00015_cod_provincia_checkColumnConstraints(p_data.cod_provincia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00015_telefono_checkColumnConstraints(p_data.telefono) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00015_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00015_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00015_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00015_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00015_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00015_checkTableConstraints
-
-{<BLOCK Name="fct.vetb00015_cod_transp_checkColumnConstraints">}
-#+ Check constraints on the "vetb00015.cod_transp" column
-#+
-#+ @param p_cod_transp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00015_cod_transp_checkColumnConstraints(p_cod_transp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_transp LIKE vetb00015.cod_transp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00015_cod_transp_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00015_sec_transp_checkColumnConstraints">}
-#+ Check constraints on the "vetb00015.sec_transp" column
-#+
-#+ @param p_sec_transp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00015_sec_transp_checkColumnConstraints(p_sec_transp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_transp LIKE vetb00015.sec_transp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00015_sec_transp_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00015_nombre_checkColumnConstraints">}
-#+ Check constraints on the "vetb00015.nombre" column
-#+
-#+ @param p_nombre - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00015_nombre_checkColumnConstraints(p_nombre)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombre LIKE vetb00015.nombre
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00015_nombre_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00015_cedula_checkColumnConstraints">}
-#+ Check constraints on the "vetb00015.cedula" column
-#+
-#+ @param p_cedula - VARCHAR2(15) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00015_cedula_checkColumnConstraints(p_cedula)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cedula LIKE vetb00015.cedula
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00015_cedula_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00015_serie_checkColumnConstraints">}
-#+ Check constraints on the "vetb00015.serie" column
-#+
-#+ @param p_serie - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00015_serie_checkColumnConstraints(p_serie)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_serie LIKE vetb00015.serie
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00015_serie_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00015_calle_checkColumnConstraints">}
-#+ Check constraints on the "vetb00015.calle" column
-#+
-#+ @param p_calle - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00015_calle_checkColumnConstraints(p_calle)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_calle LIKE vetb00015.calle
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00015_calle_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00015_casa_num_checkColumnConstraints">}
-#+ Check constraints on the "vetb00015.casa_num" column
-#+
-#+ @param p_casa_num - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00015_casa_num_checkColumnConstraints(p_casa_num)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_casa_num LIKE vetb00015.casa_num
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00015_casa_num_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00015_barrio_checkColumnConstraints">}
-#+ Check constraints on the "vetb00015.barrio" column
-#+
-#+ @param p_barrio - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00015_barrio_checkColumnConstraints(p_barrio)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_barrio LIKE vetb00015.barrio
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00015_barrio_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00015_urbanizacion_checkColumnConstraints">}
-#+ Check constraints on the "vetb00015.urbanizacion" column
-#+
-#+ @param p_urbanizacion - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00015_urbanizacion_checkColumnConstraints(p_urbanizacion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_urbanizacion LIKE vetb00015.urbanizacion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00015_urbanizacion_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00015_cod_zona_checkColumnConstraints">}
-#+ Check constraints on the "vetb00015.cod_zona" column
-#+
-#+ @param p_cod_zona - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00015_cod_zona_checkColumnConstraints(p_cod_zona)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_zona LIKE vetb00015.cod_zona
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00015_cod_zona_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00015_cod_provincia_checkColumnConstraints">}
-#+ Check constraints on the "vetb00015.cod_provincia" column
-#+
-#+ @param p_cod_provincia - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00015_cod_provincia_checkColumnConstraints(p_cod_provincia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_provincia LIKE vetb00015.cod_provincia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00015_cod_provincia_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00015_telefono_checkColumnConstraints">}
-#+ Check constraints on the "vetb00015.telefono" column
-#+
-#+ @param p_telefono - CHAR(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00015_telefono_checkColumnConstraints(p_telefono)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_telefono LIKE vetb00015.telefono
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00015_telefono_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00015_status_t_checkColumnConstraints">}
-#+ Check constraints on the "vetb00015.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00015_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE vetb00015.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00015_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00015_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "vetb00015.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00015_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE vetb00015.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00015_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00015_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "vetb00015.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00015_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE vetb00015.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00015_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00015_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "vetb00015.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00015_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE vetb00015.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00015_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00015_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "vetb00015.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00015_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE vetb00015.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00015_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00014_checkTableConstraints">}
-#+ Check constraints on the "vetb00014" table
-#+
-#+ @param p_data - a row data LIKE vetb00014.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00014_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vetb00014.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vetb00014_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00014_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00014_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00014_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00014_peso_bruto_checkColumnConstraints(p_data.peso_bruto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00014_peso_neto_checkColumnConstraints(p_data.peso_neto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00014_dim_caja_checkColumnConstraints(p_data.dim_caja) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00014_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00014_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00014_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00014_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00014_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00014_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00014_checkTableConstraints
-
-{<BLOCK Name="fct.vetb00014_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "vetb00014.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00014_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE vetb00014.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00014_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00014_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "vetb00014.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00014_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE vetb00014.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00014_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00014_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "vetb00014.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00014_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE vetb00014.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00014_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00014_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "vetb00014.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00014_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE vetb00014.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00014_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00014_peso_bruto_checkColumnConstraints">}
-#+ Check constraints on the "vetb00014.peso_bruto" column
-#+
-#+ @param p_peso_bruto - DECIMAL(10,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00014_peso_bruto_checkColumnConstraints(p_peso_bruto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_peso_bruto LIKE vetb00014.peso_bruto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00014_peso_bruto_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00014_peso_neto_checkColumnConstraints">}
-#+ Check constraints on the "vetb00014.peso_neto" column
-#+
-#+ @param p_peso_neto - DECIMAL(10,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00014_peso_neto_checkColumnConstraints(p_peso_neto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_peso_neto LIKE vetb00014.peso_neto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00014_peso_neto_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00014_dim_caja_checkColumnConstraints">}
-#+ Check constraints on the "vetb00014.dim_caja" column
-#+
-#+ @param p_dim_caja - DECIMAL(10,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00014_dim_caja_checkColumnConstraints(p_dim_caja)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_dim_caja LIKE vetb00014.dim_caja
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00014_dim_caja_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00014_cantidad_checkColumnConstraints">}
-#+ Check constraints on the "vetb00014.cantidad" column
-#+
-#+ @param p_cantidad - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00014_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE vetb00014.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00014_cantidad_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00014_status_t_checkColumnConstraints">}
-#+ Check constraints on the "vetb00014.status_t" column
-#+
-#+ @param p_status_t - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00014_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE vetb00014.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00014_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00014_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "vetb00014.us_crea" column
-#+
-#+ @param p_us_crea - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00014_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE vetb00014.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00014_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00014_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "vetb00014.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00014_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE vetb00014.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00014_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00014_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "vetb00014.us_mod" column
-#+
-#+ @param p_us_mod - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00014_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE vetb00014.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00014_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00014_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "vetb00014.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00014_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE vetb00014.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00014_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00013_checkTableConstraints">}
-#+ Check constraints on the "vetb00013" table
-#+
-#+ @param p_data - a row data LIKE vetb00013.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00013_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vetb00013.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vetb00013_tipo_desc_checkColumnConstraints(p_data.tipo_desc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00013_descrip_checkColumnConstraints(p_data.descrip) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00013_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00013_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00013_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00013_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00013_dias_validos_checkColumnConstraints(p_data.dias_validos) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00013_porc_desc_checkColumnConstraints(p_data.porc_desc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00013_valor_desc_checkColumnConstraints(p_data.valor_desc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00013_cantidad_1_checkColumnConstraints(p_data.cantidad_1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00013_cantidad_2_checkColumnConstraints(p_data.cantidad_2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00013_cajas_bonif_checkColumnConstraints(p_data.cajas_bonif) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00013_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00013_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00013_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00013_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00013_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00013_checkTableConstraints
-
-{<BLOCK Name="fct.vetb00013_tipo_desc_checkColumnConstraints">}
-#+ Check constraints on the "vetb00013.tipo_desc" column
-#+
-#+ @param p_tipo_desc - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00013_tipo_desc_checkColumnConstraints(p_tipo_desc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_desc LIKE vetb00013.tipo_desc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00013_tipo_desc_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00013_descrip_checkColumnConstraints">}
-#+ Check constraints on the "vetb00013.descrip" column
-#+
-#+ @param p_descrip - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00013_descrip_checkColumnConstraints(p_descrip)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descrip LIKE vetb00013.descrip
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00013_descrip_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00013_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "vetb00013.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00013_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE vetb00013.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00013_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00013_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "vetb00013.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00013_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE vetb00013.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00013_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00013_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "vetb00013.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00013_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE vetb00013.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00013_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00013_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "vetb00013.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00013_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE vetb00013.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00013_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00013_dias_validos_checkColumnConstraints">}
-#+ Check constraints on the "vetb00013.dias_validos" column
-#+
-#+ @param p_dias_validos - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00013_dias_validos_checkColumnConstraints(p_dias_validos)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_dias_validos LIKE vetb00013.dias_validos
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00013_dias_validos_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00013_porc_desc_checkColumnConstraints">}
-#+ Check constraints on the "vetb00013.porc_desc" column
-#+
-#+ @param p_porc_desc - DECIMAL(5,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00013_porc_desc_checkColumnConstraints(p_porc_desc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_porc_desc LIKE vetb00013.porc_desc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00013_porc_desc_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00013_valor_desc_checkColumnConstraints">}
-#+ Check constraints on the "vetb00013.valor_desc" column
-#+
-#+ @param p_valor_desc - DECIMAL(8,3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00013_valor_desc_checkColumnConstraints(p_valor_desc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valor_desc LIKE vetb00013.valor_desc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00013_valor_desc_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00013_cantidad_1_checkColumnConstraints">}
-#+ Check constraints on the "vetb00013.cantidad_1" column
-#+
-#+ @param p_cantidad_1 - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00013_cantidad_1_checkColumnConstraints(p_cantidad_1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad_1 LIKE vetb00013.cantidad_1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00013_cantidad_1_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00013_cantidad_2_checkColumnConstraints">}
-#+ Check constraints on the "vetb00013.cantidad_2" column
-#+
-#+ @param p_cantidad_2 - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00013_cantidad_2_checkColumnConstraints(p_cantidad_2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad_2 LIKE vetb00013.cantidad_2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00013_cantidad_2_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00013_cajas_bonif_checkColumnConstraints">}
-#+ Check constraints on the "vetb00013.cajas_bonif" column
-#+
-#+ @param p_cajas_bonif - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00013_cajas_bonif_checkColumnConstraints(p_cajas_bonif)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cajas_bonif LIKE vetb00013.cajas_bonif
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00013_cajas_bonif_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00013_status_t_checkColumnConstraints">}
-#+ Check constraints on the "vetb00013.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00013_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE vetb00013.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00013_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00013_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "vetb00013.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00013_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE vetb00013.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00013_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00013_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "vetb00013.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00013_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE vetb00013.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00013_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00013_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "vetb00013.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00013_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE vetb00013.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00013_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00013_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "vetb00013.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00013_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE vetb00013.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00013_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00012_checkTableConstraints">}
-#+ Check constraints on the "vetb00012" table
-#+
-#+ @param p_data - a row data LIKE vetb00012.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00012_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vetb00012.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vetb00012_cond_pago_checkColumnConstraints(p_data.cond_pago) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00012_descrip_checkColumnConstraints(p_data.descrip) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00012_dias_checkColumnConstraints(p_data.dias) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00012_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00012_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00012_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00012_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00012_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00012_porcentaje_checkColumnConstraints(p_data.porcentaje) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00012_sucid_checkColumnConstraints(p_data.sucid) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00012_defecto_checkColumnConstraints(p_data.defecto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00012_checkTableConstraints
-
-{<BLOCK Name="fct.vetb00012_cond_pago_checkColumnConstraints">}
-#+ Check constraints on the "vetb00012.cond_pago" column
-#+
-#+ @param p_cond_pago - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00012_cond_pago_checkColumnConstraints(p_cond_pago)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cond_pago LIKE vetb00012.cond_pago
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cond_pago IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cond_pago: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00012_cond_pago_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00012_descrip_checkColumnConstraints">}
-#+ Check constraints on the "vetb00012.descrip" column
-#+
-#+ @param p_descrip - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00012_descrip_checkColumnConstraints(p_descrip)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descrip LIKE vetb00012.descrip
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00012_descrip_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00012_dias_checkColumnConstraints">}
-#+ Check constraints on the "vetb00012.dias" column
-#+
-#+ @param p_dias - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00012_dias_checkColumnConstraints(p_dias)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_dias LIKE vetb00012.dias
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00012_dias_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00012_status_t_checkColumnConstraints">}
-#+ Check constraints on the "vetb00012.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00012_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE vetb00012.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00012_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00012_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "vetb00012.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00012_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE vetb00012.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00012_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00012_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "vetb00012.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00012_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE vetb00012.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00012_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00012_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "vetb00012.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00012_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE vetb00012.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00012_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00012_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "vetb00012.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00012_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE vetb00012.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00012_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00012_porcentaje_checkColumnConstraints">}
-#+ Check constraints on the "vetb00012.porcentaje" column
-#+
-#+ @param p_porcentaje - DECIMAL(18,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00012_porcentaje_checkColumnConstraints(p_porcentaje)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_porcentaje LIKE vetb00012.porcentaje
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00012_porcentaje_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00012_sucid_checkColumnConstraints">}
-#+ Check constraints on the "vetb00012.sucid" column
-#+
-#+ @param p_sucid - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00012_sucid_checkColumnConstraints(p_sucid)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sucid LIKE vetb00012.sucid
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00012_sucid_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00012_defecto_checkColumnConstraints">}
-#+ Check constraints on the "vetb00012.defecto" column
-#+
-#+ @param p_defecto - CHAR(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00012_defecto_checkColumnConstraints(p_defecto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_defecto LIKE vetb00012.defecto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00012_defecto_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00011_checkTableConstraints">}
-#+ Check constraints on the "vetb00011" table
-#+
-#+ @param p_data - a row data LIKE vetb00011.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00011_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vetb00011.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vetb00011_cod_vend_checkColumnConstraints(p_data.cod_vend) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00011_sec_vend_checkColumnConstraints(p_data.sec_vend) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00011_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00011_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00011_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00011_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00011_porc_ventas_checkColumnConstraints(p_data.porc_ventas) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00011_porc_cobros_checkColumnConstraints(p_data.porc_cobros) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00011_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00011_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00011_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00011_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00011_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00011_checkTableConstraints
-
-{<BLOCK Name="fct.vetb00011_cod_vend_checkColumnConstraints">}
-#+ Check constraints on the "vetb00011.cod_vend" column
-#+
-#+ @param p_cod_vend - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00011_cod_vend_checkColumnConstraints(p_cod_vend)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_vend LIKE vetb00011.cod_vend
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00011_cod_vend_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00011_sec_vend_checkColumnConstraints">}
-#+ Check constraints on the "vetb00011.sec_vend" column
-#+
-#+ @param p_sec_vend - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00011_sec_vend_checkColumnConstraints(p_sec_vend)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_vend LIKE vetb00011.sec_vend
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00011_sec_vend_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00011_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "vetb00011.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00011_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE vetb00011.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00011_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00011_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "vetb00011.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00011_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE vetb00011.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00011_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00011_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "vetb00011.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00011_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE vetb00011.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00011_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00011_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "vetb00011.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00011_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE vetb00011.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00011_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00011_porc_ventas_checkColumnConstraints">}
-#+ Check constraints on the "vetb00011.porc_ventas" column
-#+
-#+ @param p_porc_ventas - DECIMAL(8,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00011_porc_ventas_checkColumnConstraints(p_porc_ventas)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_porc_ventas LIKE vetb00011.porc_ventas
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00011_porc_ventas_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00011_porc_cobros_checkColumnConstraints">}
-#+ Check constraints on the "vetb00011.porc_cobros" column
-#+
-#+ @param p_porc_cobros - DECIMAL(8,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00011_porc_cobros_checkColumnConstraints(p_porc_cobros)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_porc_cobros LIKE vetb00011.porc_cobros
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00011_porc_cobros_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00011_status_t_checkColumnConstraints">}
-#+ Check constraints on the "vetb00011.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00011_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE vetb00011.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00011_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00011_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "vetb00011.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00011_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE vetb00011.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00011_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00011_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "vetb00011.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00011_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE vetb00011.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00011_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00011_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "vetb00011.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00011_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE vetb00011.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00011_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00011_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "vetb00011.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00011_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE vetb00011.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00011_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00010_checkTableConstraints">}
-#+ Check constraints on the "vetb00010" table
-#+
-#+ @param p_data - a row data LIKE vetb00010.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00010_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vetb00010.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vetb00010_cod_vend_checkColumnConstraints(p_data.cod_vend) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00010_sec_vend_checkColumnConstraints(p_data.sec_vend) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00010_cod_zona_checkColumnConstraints(p_data.cod_zona) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00010_cod_provincia_checkColumnConstraints(p_data.cod_provincia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00010_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00010_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00010_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00010_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00010_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00010_checkTableConstraints
-
-{<BLOCK Name="fct.vetb00010_cod_vend_checkColumnConstraints">}
-#+ Check constraints on the "vetb00010.cod_vend" column
-#+
-#+ @param p_cod_vend - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00010_cod_vend_checkColumnConstraints(p_cod_vend)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_vend LIKE vetb00010.cod_vend
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00010_cod_vend_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00010_sec_vend_checkColumnConstraints">}
-#+ Check constraints on the "vetb00010.sec_vend" column
-#+
-#+ @param p_sec_vend - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00010_sec_vend_checkColumnConstraints(p_sec_vend)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_vend LIKE vetb00010.sec_vend
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00010_sec_vend_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00010_cod_zona_checkColumnConstraints">}
-#+ Check constraints on the "vetb00010.cod_zona" column
-#+
-#+ @param p_cod_zona - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00010_cod_zona_checkColumnConstraints(p_cod_zona)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_zona LIKE vetb00010.cod_zona
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00010_cod_zona_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00010_cod_provincia_checkColumnConstraints">}
-#+ Check constraints on the "vetb00010.cod_provincia" column
-#+
-#+ @param p_cod_provincia - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00010_cod_provincia_checkColumnConstraints(p_cod_provincia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_provincia LIKE vetb00010.cod_provincia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00010_cod_provincia_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00010_status_t_checkColumnConstraints">}
-#+ Check constraints on the "vetb00010.status_t" column
-#+
-#+ @param p_status_t - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00010_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE vetb00010.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00010_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00010_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "vetb00010.us_crea" column
-#+
-#+ @param p_us_crea - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00010_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE vetb00010.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00010_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00010_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "vetb00010.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00010_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE vetb00010.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00010_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00010_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "vetb00010.us_mod" column
-#+
-#+ @param p_us_mod - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00010_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE vetb00010.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00010_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00010_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "vetb00010.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00010_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE vetb00010.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00010_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00009_checkTableConstraints">}
-#+ Check constraints on the "vetb00009" table
-#+
-#+ @param p_data - a row data LIKE vetb00009.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00009_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vetb00009.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vetb00009_cod_zona_checkColumnConstraints(p_data.cod_zona) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00009_cod_provincia_checkColumnConstraints(p_data.cod_provincia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00009_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00009_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00009_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00009_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00009_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00009_checkTableConstraints
-
-{<BLOCK Name="fct.vetb00009_cod_zona_checkColumnConstraints">}
-#+ Check constraints on the "vetb00009.cod_zona" column
-#+
-#+ @param p_cod_zona - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00009_cod_zona_checkColumnConstraints(p_cod_zona)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_zona LIKE vetb00009.cod_zona
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00009_cod_zona_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00009_cod_provincia_checkColumnConstraints">}
-#+ Check constraints on the "vetb00009.cod_provincia" column
-#+
-#+ @param p_cod_provincia - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00009_cod_provincia_checkColumnConstraints(p_cod_provincia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_provincia LIKE vetb00009.cod_provincia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00009_cod_provincia_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00009_status_t_checkColumnConstraints">}
-#+ Check constraints on the "vetb00009.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00009_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE vetb00009.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00009_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00009_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "vetb00009.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00009_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE vetb00009.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00009_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00009_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "vetb00009.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00009_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE vetb00009.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00009_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00009_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "vetb00009.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00009_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE vetb00009.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00009_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00009_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "vetb00009.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00009_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE vetb00009.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00009_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00008_checkTableConstraints">}
-#+ Check constraints on the "vetb00008" table
-#+
-#+ @param p_data - a row data LIKE vetb00008.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00008_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vetb00008.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vetb00008_cod_zona_checkColumnConstraints(p_data.cod_zona) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00008_descrip_checkColumnConstraints(p_data.descrip) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00008_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00008_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00008_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00008_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00008_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00008_checkTableConstraints
-
-{<BLOCK Name="fct.vetb00008_cod_zona_checkColumnConstraints">}
-#+ Check constraints on the "vetb00008.cod_zona" column
-#+
-#+ @param p_cod_zona - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00008_cod_zona_checkColumnConstraints(p_cod_zona)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_zona LIKE vetb00008.cod_zona
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00008_cod_zona_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00008_descrip_checkColumnConstraints">}
-#+ Check constraints on the "vetb00008.descrip" column
-#+
-#+ @param p_descrip - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00008_descrip_checkColumnConstraints(p_descrip)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descrip LIKE vetb00008.descrip
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00008_descrip_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00008_status_t_checkColumnConstraints">}
-#+ Check constraints on the "vetb00008.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00008_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE vetb00008.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00008_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00008_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "vetb00008.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00008_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE vetb00008.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00008_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00008_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "vetb00008.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00008_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE vetb00008.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00008_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00008_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "vetb00008.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00008_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE vetb00008.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00008_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00008_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "vetb00008.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00008_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE vetb00008.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00008_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00007_checkTableConstraints">}
-#+ Check constraints on the "vetb00007" table
-#+
-#+ @param p_data - a row data LIKE vetb00007.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00007_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vetb00007.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vetb00007_tipo_cliente_checkColumnConstraints(p_data.tipo_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00007_sec_cliente_checkColumnConstraints(p_data.sec_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00007_tipo_desc_checkColumnConstraints(p_data.tipo_desc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00007_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00007_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00007_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00007_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00007_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00007_checkTableConstraints
-
-{<BLOCK Name="fct.vetb00007_tipo_cliente_checkColumnConstraints">}
-#+ Check constraints on the "vetb00007.tipo_cliente" column
-#+
-#+ @param p_tipo_cliente - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00007_tipo_cliente_checkColumnConstraints(p_tipo_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_cliente LIKE vetb00007.tipo_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00007_tipo_cliente_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00007_sec_cliente_checkColumnConstraints">}
-#+ Check constraints on the "vetb00007.sec_cliente" column
-#+
-#+ @param p_sec_cliente - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00007_sec_cliente_checkColumnConstraints(p_sec_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_cliente LIKE vetb00007.sec_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00007_sec_cliente_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00007_tipo_desc_checkColumnConstraints">}
-#+ Check constraints on the "vetb00007.tipo_desc" column
-#+
-#+ @param p_tipo_desc - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00007_tipo_desc_checkColumnConstraints(p_tipo_desc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_desc LIKE vetb00007.tipo_desc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00007_tipo_desc_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00007_status_t_checkColumnConstraints">}
-#+ Check constraints on the "vetb00007.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00007_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE vetb00007.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00007_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00007_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "vetb00007.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00007_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE vetb00007.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00007_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00007_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "vetb00007.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00007_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE vetb00007.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00007_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00007_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "vetb00007.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00007_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE vetb00007.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00007_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00007_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "vetb00007.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00007_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE vetb00007.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00007_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00006_checkTableConstraints">}
-#+ Check constraints on the "vetb00006" table
-#+
-#+ @param p_data - a row data LIKE vetb00006.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00006_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vetb00006.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vetb00006_tipo_cliente_s_checkColumnConstraints(p_data.tipo_cliente_s) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00006_sec_cliente_s_checkColumnConstraints(p_data.sec_cliente_s) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00006_fecha_solicitud_s_checkColumnConstraints(p_data.fecha_solicitud_s) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00006_condicion_venta_s_checkColumnConstraints(p_data.condicion_venta_s) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00006_solicitante_s_checkColumnConstraints(p_data.solicitante_s) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00006_cedula_s_checkColumnConstraints(p_data.cedula_s) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00006_serie_s_checkColumnConstraints(p_data.serie_s) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00006_calle_s_checkColumnConstraints(p_data.calle_s) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00006_casa_num_s_checkColumnConstraints(p_data.casa_num_s) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00006_barrio_s_checkColumnConstraints(p_data.barrio_s) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00006_urbanizacion_s_checkColumnConstraints(p_data.urbanizacion_s) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00006_cod_provincia_s_checkColumnConstraints(p_data.cod_provincia_s) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00006_telefono_s_checkColumnConstraints(p_data.telefono_s) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00006_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00006_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00006_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00006_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00006_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00006_checkTableConstraints
-
-{<BLOCK Name="fct.vetb00006_tipo_cliente_s_checkColumnConstraints">}
-#+ Check constraints on the "vetb00006.tipo_cliente_s" column
-#+
-#+ @param p_tipo_cliente_s - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00006_tipo_cliente_s_checkColumnConstraints(p_tipo_cliente_s)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_cliente_s LIKE vetb00006.tipo_cliente_s
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00006_tipo_cliente_s_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00006_sec_cliente_s_checkColumnConstraints">}
-#+ Check constraints on the "vetb00006.sec_cliente_s" column
-#+
-#+ @param p_sec_cliente_s - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00006_sec_cliente_s_checkColumnConstraints(p_sec_cliente_s)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_cliente_s LIKE vetb00006.sec_cliente_s
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00006_sec_cliente_s_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00006_fecha_solicitud_s_checkColumnConstraints">}
-#+ Check constraints on the "vetb00006.fecha_solicitud_s" column
-#+
-#+ @param p_fecha_solicitud_s - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00006_fecha_solicitud_s_checkColumnConstraints(p_fecha_solicitud_s)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_solicitud_s LIKE vetb00006.fecha_solicitud_s
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00006_fecha_solicitud_s_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00006_condicion_venta_s_checkColumnConstraints">}
-#+ Check constraints on the "vetb00006.condicion_venta_s" column
-#+
-#+ @param p_condicion_venta_s - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00006_condicion_venta_s_checkColumnConstraints(p_condicion_venta_s)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_condicion_venta_s LIKE vetb00006.condicion_venta_s
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00006_condicion_venta_s_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00006_solicitante_s_checkColumnConstraints">}
-#+ Check constraints on the "vetb00006.solicitante_s" column
-#+
-#+ @param p_solicitante_s - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00006_solicitante_s_checkColumnConstraints(p_solicitante_s)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_solicitante_s LIKE vetb00006.solicitante_s
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00006_solicitante_s_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00006_cedula_s_checkColumnConstraints">}
-#+ Check constraints on the "vetb00006.cedula_s" column
-#+
-#+ @param p_cedula_s - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00006_cedula_s_checkColumnConstraints(p_cedula_s)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cedula_s LIKE vetb00006.cedula_s
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00006_cedula_s_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00006_serie_s_checkColumnConstraints">}
-#+ Check constraints on the "vetb00006.serie_s" column
-#+
-#+ @param p_serie_s - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00006_serie_s_checkColumnConstraints(p_serie_s)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_serie_s LIKE vetb00006.serie_s
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00006_serie_s_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00006_calle_s_checkColumnConstraints">}
-#+ Check constraints on the "vetb00006.calle_s" column
-#+
-#+ @param p_calle_s - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00006_calle_s_checkColumnConstraints(p_calle_s)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_calle_s LIKE vetb00006.calle_s
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00006_calle_s_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00006_casa_num_s_checkColumnConstraints">}
-#+ Check constraints on the "vetb00006.casa_num_s" column
-#+
-#+ @param p_casa_num_s - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00006_casa_num_s_checkColumnConstraints(p_casa_num_s)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_casa_num_s LIKE vetb00006.casa_num_s
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00006_casa_num_s_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00006_barrio_s_checkColumnConstraints">}
-#+ Check constraints on the "vetb00006.barrio_s" column
-#+
-#+ @param p_barrio_s - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00006_barrio_s_checkColumnConstraints(p_barrio_s)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_barrio_s LIKE vetb00006.barrio_s
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00006_barrio_s_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00006_urbanizacion_s_checkColumnConstraints">}
-#+ Check constraints on the "vetb00006.urbanizacion_s" column
-#+
-#+ @param p_urbanizacion_s - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00006_urbanizacion_s_checkColumnConstraints(p_urbanizacion_s)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_urbanizacion_s LIKE vetb00006.urbanizacion_s
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00006_urbanizacion_s_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00006_cod_provincia_s_checkColumnConstraints">}
-#+ Check constraints on the "vetb00006.cod_provincia_s" column
-#+
-#+ @param p_cod_provincia_s - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00006_cod_provincia_s_checkColumnConstraints(p_cod_provincia_s)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_provincia_s LIKE vetb00006.cod_provincia_s
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00006_cod_provincia_s_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00006_telefono_s_checkColumnConstraints">}
-#+ Check constraints on the "vetb00006.telefono_s" column
-#+
-#+ @param p_telefono_s - CHAR(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00006_telefono_s_checkColumnConstraints(p_telefono_s)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_telefono_s LIKE vetb00006.telefono_s
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00006_telefono_s_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00006_status_t_checkColumnConstraints">}
-#+ Check constraints on the "vetb00006.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00006_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE vetb00006.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00006_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00006_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "vetb00006.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00006_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE vetb00006.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00006_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00006_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "vetb00006.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00006_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE vetb00006.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00006_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00006_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "vetb00006.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00006_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE vetb00006.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00006_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00006_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "vetb00006.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00006_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE vetb00006.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00006_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00005_checkTableConstraints">}
-#+ Check constraints on the "vetb00005" table
-#+
-#+ @param p_data - a row data LIKE vetb00005.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00005_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vetb00005.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vetb00005_tipo_cliente_checkColumnConstraints(p_data.tipo_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00005_sec_cliente_checkColumnConstraints(p_data.sec_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00005_calle_checkColumnConstraints(p_data.calle) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00005_casa_num_checkColumnConstraints(p_data.casa_num) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00005_barrio_checkColumnConstraints(p_data.barrio) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00005_urbanizacion_checkColumnConstraints(p_data.urbanizacion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00005_secuencia_visita_checkColumnConstraints(p_data.secuencia_visita) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00005_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00005_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00005_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00005_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00005_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00005_checkTableConstraints
-
-{<BLOCK Name="fct.vetb00005_tipo_cliente_checkColumnConstraints">}
-#+ Check constraints on the "vetb00005.tipo_cliente" column
-#+
-#+ @param p_tipo_cliente - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00005_tipo_cliente_checkColumnConstraints(p_tipo_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_cliente LIKE vetb00005.tipo_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_tipo_cliente IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- tipo_cliente: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00005_tipo_cliente_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00005_sec_cliente_checkColumnConstraints">}
-#+ Check constraints on the "vetb00005.sec_cliente" column
-#+
-#+ @param p_sec_cliente - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00005_sec_cliente_checkColumnConstraints(p_sec_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_cliente LIKE vetb00005.sec_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_sec_cliente IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- sec_cliente: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00005_sec_cliente_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00005_calle_checkColumnConstraints">}
-#+ Check constraints on the "vetb00005.calle" column
-#+
-#+ @param p_calle - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00005_calle_checkColumnConstraints(p_calle)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_calle LIKE vetb00005.calle
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00005_calle_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00005_casa_num_checkColumnConstraints">}
-#+ Check constraints on the "vetb00005.casa_num" column
-#+
-#+ @param p_casa_num - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00005_casa_num_checkColumnConstraints(p_casa_num)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_casa_num LIKE vetb00005.casa_num
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00005_casa_num_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00005_barrio_checkColumnConstraints">}
-#+ Check constraints on the "vetb00005.barrio" column
-#+
-#+ @param p_barrio - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00005_barrio_checkColumnConstraints(p_barrio)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_barrio LIKE vetb00005.barrio
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00005_barrio_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00005_urbanizacion_checkColumnConstraints">}
-#+ Check constraints on the "vetb00005.urbanizacion" column
-#+
-#+ @param p_urbanizacion - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00005_urbanizacion_checkColumnConstraints(p_urbanizacion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_urbanizacion LIKE vetb00005.urbanizacion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00005_urbanizacion_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00005_secuencia_visita_checkColumnConstraints">}
-#+ Check constraints on the "vetb00005.secuencia_visita" column
-#+
-#+ @param p_secuencia_visita - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00005_secuencia_visita_checkColumnConstraints(p_secuencia_visita)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_secuencia_visita LIKE vetb00005.secuencia_visita
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00005_secuencia_visita_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00005_status_t_checkColumnConstraints">}
-#+ Check constraints on the "vetb00005.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00005_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE vetb00005.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00005_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00005_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "vetb00005.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00005_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE vetb00005.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00005_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00005_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "vetb00005.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00005_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE vetb00005.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00005_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00005_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "vetb00005.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00005_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE vetb00005.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00005_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00005_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "vetb00005.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00005_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE vetb00005.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00005_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00004_checkTableConstraints">}
-#+ Check constraints on the "vetb00004" table
-#+
-#+ @param p_data - a row data LIKE vetb00004.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00004_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vetb00004.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vetb00004_tipo_cliente_checkColumnConstraints(p_data.tipo_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00004_sec_cliente_checkColumnConstraints(p_data.sec_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00004_nombre_checkColumnConstraints(p_data.nombre) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00004_cod_zona_checkColumnConstraints(p_data.cod_zona) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00004_cod_provincia_checkColumnConstraints(p_data.cod_provincia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00004_telefono_checkColumnConstraints(p_data.telefono) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00004_fax_checkColumnConstraints(p_data.fax) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00004_telex_checkColumnConstraints(p_data.telex) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00004_patente_checkColumnConstraints(p_data.patente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00004_limite_credito_checkColumnConstraints(p_data.limite_credito) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00004_zona_postal_checkColumnConstraints(p_data.zona_postal) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00004_num_rnc_checkColumnConstraints(p_data.num_rnc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00004_nombre_patente_checkColumnConstraints(p_data.nombre_patente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00004_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00004_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00004_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00004_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00004_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00004_puesto_laboral_checkColumnConstraints(p_data.puesto_laboral) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00004_telefono_casa_checkColumnConstraints(p_data.telefono_casa) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00004_tipo_negocio_checkColumnConstraints(p_data.tipo_negocio) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00004_cond_pago_checkColumnConstraints(p_data.cond_pago) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00004_id_ciudad_checkColumnConstraints(p_data.id_ciudad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00004_checkTableConstraints
-
-{<BLOCK Name="fct.vetb00004_tipo_cliente_checkColumnConstraints">}
-#+ Check constraints on the "vetb00004.tipo_cliente" column
-#+
-#+ @param p_tipo_cliente - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00004_tipo_cliente_checkColumnConstraints(p_tipo_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_cliente LIKE vetb00004.tipo_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_tipo_cliente IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- tipo_cliente: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00004_tipo_cliente_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00004_sec_cliente_checkColumnConstraints">}
-#+ Check constraints on the "vetb00004.sec_cliente" column
-#+
-#+ @param p_sec_cliente - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00004_sec_cliente_checkColumnConstraints(p_sec_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_cliente LIKE vetb00004.sec_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_sec_cliente IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- sec_cliente: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00004_sec_cliente_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00004_nombre_checkColumnConstraints">}
-#+ Check constraints on the "vetb00004.nombre" column
-#+
-#+ @param p_nombre - CHAR(100) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00004_nombre_checkColumnConstraints(p_nombre)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombre LIKE vetb00004.nombre
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00004_nombre_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00004_cod_zona_checkColumnConstraints">}
-#+ Check constraints on the "vetb00004.cod_zona" column
-#+
-#+ @param p_cod_zona - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00004_cod_zona_checkColumnConstraints(p_cod_zona)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_zona LIKE vetb00004.cod_zona
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00004_cod_zona_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00004_cod_provincia_checkColumnConstraints">}
-#+ Check constraints on the "vetb00004.cod_provincia" column
-#+
-#+ @param p_cod_provincia - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00004_cod_provincia_checkColumnConstraints(p_cod_provincia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_provincia LIKE vetb00004.cod_provincia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00004_cod_provincia_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00004_telefono_checkColumnConstraints">}
-#+ Check constraints on the "vetb00004.telefono" column
-#+
-#+ @param p_telefono - CHAR(16) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00004_telefono_checkColumnConstraints(p_telefono)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_telefono LIKE vetb00004.telefono
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00004_telefono_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00004_fax_checkColumnConstraints">}
-#+ Check constraints on the "vetb00004.fax" column
-#+
-#+ @param p_fax - CHAR(16) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00004_fax_checkColumnConstraints(p_fax)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fax LIKE vetb00004.fax
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00004_fax_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00004_telex_checkColumnConstraints">}
-#+ Check constraints on the "vetb00004.telex" column
-#+
-#+ @param p_telex - CHAR(16) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00004_telex_checkColumnConstraints(p_telex)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_telex LIKE vetb00004.telex
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00004_telex_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00004_patente_checkColumnConstraints">}
-#+ Check constraints on the "vetb00004.patente" column
-#+
-#+ @param p_patente - VARCHAR2(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00004_patente_checkColumnConstraints(p_patente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_patente LIKE vetb00004.patente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00004_patente_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00004_limite_credito_checkColumnConstraints">}
-#+ Check constraints on the "vetb00004.limite_credito" column
-#+
-#+ @param p_limite_credito - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00004_limite_credito_checkColumnConstraints(p_limite_credito)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_limite_credito LIKE vetb00004.limite_credito
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00004_limite_credito_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00004_zona_postal_checkColumnConstraints">}
-#+ Check constraints on the "vetb00004.zona_postal" column
-#+
-#+ @param p_zona_postal - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00004_zona_postal_checkColumnConstraints(p_zona_postal)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_zona_postal LIKE vetb00004.zona_postal
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00004_zona_postal_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00004_num_rnc_checkColumnConstraints">}
-#+ Check constraints on the "vetb00004.num_rnc" column
-#+
-#+ @param p_num_rnc - CHAR(25) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00004_num_rnc_checkColumnConstraints(p_num_rnc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_rnc LIKE vetb00004.num_rnc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00004_num_rnc_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00004_nombre_patente_checkColumnConstraints">}
-#+ Check constraints on the "vetb00004.nombre_patente" column
-#+
-#+ @param p_nombre_patente - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00004_nombre_patente_checkColumnConstraints(p_nombre_patente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombre_patente LIKE vetb00004.nombre_patente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00004_nombre_patente_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00004_status_t_checkColumnConstraints">}
-#+ Check constraints on the "vetb00004.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00004_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE vetb00004.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00004_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00004_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "vetb00004.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00004_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE vetb00004.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00004_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00004_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "vetb00004.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00004_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE vetb00004.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00004_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00004_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "vetb00004.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00004_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE vetb00004.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00004_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00004_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "vetb00004.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00004_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE vetb00004.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00004_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00004_puesto_laboral_checkColumnConstraints">}
-#+ Check constraints on the "vetb00004.puesto_laboral" column
-#+
-#+ @param p_puesto_laboral - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00004_puesto_laboral_checkColumnConstraints(p_puesto_laboral)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_puesto_laboral LIKE vetb00004.puesto_laboral
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00004_puesto_laboral_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00004_telefono_casa_checkColumnConstraints">}
-#+ Check constraints on the "vetb00004.telefono_casa" column
-#+
-#+ @param p_telefono_casa - CHAR(15) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00004_telefono_casa_checkColumnConstraints(p_telefono_casa)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_telefono_casa LIKE vetb00004.telefono_casa
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00004_telefono_casa_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00004_tipo_negocio_checkColumnConstraints">}
-#+ Check constraints on the "vetb00004.tipo_negocio" column
-#+
-#+ @param p_tipo_negocio - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00004_tipo_negocio_checkColumnConstraints(p_tipo_negocio)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_negocio LIKE vetb00004.tipo_negocio
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00004_tipo_negocio_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00004_cond_pago_checkColumnConstraints">}
-#+ Check constraints on the "vetb00004.cond_pago" column
-#+
-#+ @param p_cond_pago - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00004_cond_pago_checkColumnConstraints(p_cond_pago)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cond_pago LIKE vetb00004.cond_pago
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00004_cond_pago_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00004_id_ciudad_checkColumnConstraints">}
-#+ Check constraints on the "vetb00004.id_ciudad" column
-#+
-#+ @param p_id_ciudad - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00004_id_ciudad_checkColumnConstraints(p_id_ciudad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_id_ciudad LIKE vetb00004.id_ciudad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00004_id_ciudad_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00003_checkTableConstraints">}
-#+ Check constraints on the "vetb00003" table
-#+
-#+ @param p_data - a row data LIKE vetb00003.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00003_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vetb00003.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vetb00003_cod_cia_checkColumnConstraints(p_data.cod_cia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00003_factura_checkColumnConstraints(p_data.factura) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00003_area_checkColumnConstraints(p_data.area) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00003_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00003_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00003_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00003_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00003_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00003_cantidad_2_checkColumnConstraints(p_data.cantidad_2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00003_bonificacion_checkColumnConstraints(p_data.bonificacion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00003_precio_checkColumnConstraints(p_data.precio) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00003_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00003_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00003_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00003_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00003_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00003_checkTableConstraints
-
-{<BLOCK Name="fct.vetb00003_cod_cia_checkColumnConstraints">}
-#+ Check constraints on the "vetb00003.cod_cia" column
-#+
-#+ @param p_cod_cia - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00003_cod_cia_checkColumnConstraints(p_cod_cia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_cia LIKE vetb00003.cod_cia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00003_cod_cia_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00003_factura_checkColumnConstraints">}
-#+ Check constraints on the "vetb00003.factura" column
-#+
-#+ @param p_factura - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00003_factura_checkColumnConstraints(p_factura)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_factura LIKE vetb00003.factura
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00003_factura_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00003_area_checkColumnConstraints">}
-#+ Check constraints on the "vetb00003.area" column
-#+
-#+ @param p_area - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00003_area_checkColumnConstraints(p_area)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_area LIKE vetb00003.area
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00003_area_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00003_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "vetb00003.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00003_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE vetb00003.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00003_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00003_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "vetb00003.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00003_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE vetb00003.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00003_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00003_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "vetb00003.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00003_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE vetb00003.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00003_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00003_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "vetb00003.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00003_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE vetb00003.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00003_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00003_cantidad_checkColumnConstraints">}
-#+ Check constraints on the "vetb00003.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00003_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE vetb00003.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00003_cantidad_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00003_cantidad_2_checkColumnConstraints">}
-#+ Check constraints on the "vetb00003.cantidad_2" column
-#+
-#+ @param p_cantidad_2 - DECIMAL(14,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00003_cantidad_2_checkColumnConstraints(p_cantidad_2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad_2 LIKE vetb00003.cantidad_2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00003_cantidad_2_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00003_bonificacion_checkColumnConstraints">}
-#+ Check constraints on the "vetb00003.bonificacion" column
-#+
-#+ @param p_bonificacion - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00003_bonificacion_checkColumnConstraints(p_bonificacion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_bonificacion LIKE vetb00003.bonificacion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00003_bonificacion_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00003_precio_checkColumnConstraints">}
-#+ Check constraints on the "vetb00003.precio" column
-#+
-#+ @param p_precio - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00003_precio_checkColumnConstraints(p_precio)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_precio LIKE vetb00003.precio
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00003_precio_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00003_status_t_checkColumnConstraints">}
-#+ Check constraints on the "vetb00003.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00003_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE vetb00003.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00003_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00003_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "vetb00003.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00003_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE vetb00003.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00003_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00003_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "vetb00003.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00003_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE vetb00003.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00003_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00003_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "vetb00003.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00003_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE vetb00003.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00003_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00003_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "vetb00003.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00003_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE vetb00003.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00003_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00002_checkTableConstraints">}
-#+ Check constraints on the "vetb00002" table
-#+
-#+ @param p_data - a row data LIKE vetb00002.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00002_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vetb00002.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vetb00002_cod_cia_checkColumnConstraints(p_data.cod_cia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00002_factura_checkColumnConstraints(p_data.factura) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00002_fecha_factura_checkColumnConstraints(p_data.fecha_factura) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00002_ventas_checkColumnConstraints(p_data.ventas) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00002_zona_checkColumnConstraints(p_data.zona) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00002_orden_checkColumnConstraints(p_data.orden) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00002_fecha_orden_checkColumnConstraints(p_data.fecha_orden) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00002_conduce_checkColumnConstraints(p_data.conduce) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00002_fecha_conduce_checkColumnConstraints(p_data.fecha_conduce) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00002_tipo_cliente_checkColumnConstraints(p_data.tipo_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00002_sec_cliente_checkColumnConstraints(p_data.sec_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00002_cod_vend_checkColumnConstraints(p_data.cod_vend) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00002_sec_vend_checkColumnConstraints(p_data.sec_vend) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00002_cond_pago_checkColumnConstraints(p_data.cond_pago) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00002_porc_itbi_checkColumnConstraints(p_data.porc_itbi) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00002_porc_desc_checkColumnConstraints(p_data.porc_desc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00002_prima_us_checkColumnConstraints(p_data.prima_us) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00002_sub_total_checkColumnConstraints(p_data.sub_total) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00002_monto_desc_checkColumnConstraints(p_data.monto_desc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00002_monto_itbi_checkColumnConstraints(p_data.monto_itbi) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00002_neto_checkColumnConstraints(p_data.neto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00002_fecha_embarque_checkColumnConstraints(p_data.fecha_embarque) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00002_status_impresion_checkColumnConstraints(p_data.status_impresion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00002_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00002_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00002_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00002_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00002_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00002_documento_checkColumnConstraints(p_data.documento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00002_placa_transporte_checkColumnConstraints(p_data.placa_transporte) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00002_sucid_checkColumnConstraints(p_data.sucid) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00002_num_req_checkColumnConstraints(p_data.num_req) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00002_checkTableConstraints
-
-{<BLOCK Name="fct.vetb00002_cod_cia_checkColumnConstraints">}
-#+ Check constraints on the "vetb00002.cod_cia" column
-#+
-#+ @param p_cod_cia - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00002_cod_cia_checkColumnConstraints(p_cod_cia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_cia LIKE vetb00002.cod_cia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00002_cod_cia_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00002_factura_checkColumnConstraints">}
-#+ Check constraints on the "vetb00002.factura" column
-#+
-#+ @param p_factura - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00002_factura_checkColumnConstraints(p_factura)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_factura LIKE vetb00002.factura
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_factura IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- factura: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00002_factura_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00002_fecha_factura_checkColumnConstraints">}
-#+ Check constraints on the "vetb00002.fecha_factura" column
-#+
-#+ @param p_fecha_factura - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00002_fecha_factura_checkColumnConstraints(p_fecha_factura)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_factura LIKE vetb00002.fecha_factura
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00002_fecha_factura_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00002_ventas_checkColumnConstraints">}
-#+ Check constraints on the "vetb00002.ventas" column
-#+
-#+ @param p_ventas - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00002_ventas_checkColumnConstraints(p_ventas)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ventas LIKE vetb00002.ventas
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00002_ventas_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00002_zona_checkColumnConstraints">}
-#+ Check constraints on the "vetb00002.zona" column
-#+
-#+ @param p_zona - VARCHAR2(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00002_zona_checkColumnConstraints(p_zona)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_zona LIKE vetb00002.zona
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00002_zona_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00002_orden_checkColumnConstraints">}
-#+ Check constraints on the "vetb00002.orden" column
-#+
-#+ @param p_orden - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00002_orden_checkColumnConstraints(p_orden)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_orden LIKE vetb00002.orden
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00002_orden_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00002_fecha_orden_checkColumnConstraints">}
-#+ Check constraints on the "vetb00002.fecha_orden" column
-#+
-#+ @param p_fecha_orden - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00002_fecha_orden_checkColumnConstraints(p_fecha_orden)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_orden LIKE vetb00002.fecha_orden
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00002_fecha_orden_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00002_conduce_checkColumnConstraints">}
-#+ Check constraints on the "vetb00002.conduce" column
-#+
-#+ @param p_conduce - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00002_conduce_checkColumnConstraints(p_conduce)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_conduce LIKE vetb00002.conduce
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00002_conduce_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00002_fecha_conduce_checkColumnConstraints">}
-#+ Check constraints on the "vetb00002.fecha_conduce" column
-#+
-#+ @param p_fecha_conduce - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00002_fecha_conduce_checkColumnConstraints(p_fecha_conduce)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_conduce LIKE vetb00002.fecha_conduce
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00002_fecha_conduce_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00002_tipo_cliente_checkColumnConstraints">}
-#+ Check constraints on the "vetb00002.tipo_cliente" column
-#+
-#+ @param p_tipo_cliente - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00002_tipo_cliente_checkColumnConstraints(p_tipo_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_cliente LIKE vetb00002.tipo_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00002_tipo_cliente_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00002_sec_cliente_checkColumnConstraints">}
-#+ Check constraints on the "vetb00002.sec_cliente" column
-#+
-#+ @param p_sec_cliente - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00002_sec_cliente_checkColumnConstraints(p_sec_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_cliente LIKE vetb00002.sec_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00002_sec_cliente_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00002_cod_vend_checkColumnConstraints">}
-#+ Check constraints on the "vetb00002.cod_vend" column
-#+
-#+ @param p_cod_vend - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00002_cod_vend_checkColumnConstraints(p_cod_vend)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_vend LIKE vetb00002.cod_vend
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00002_cod_vend_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00002_sec_vend_checkColumnConstraints">}
-#+ Check constraints on the "vetb00002.sec_vend" column
-#+
-#+ @param p_sec_vend - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00002_sec_vend_checkColumnConstraints(p_sec_vend)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_vend LIKE vetb00002.sec_vend
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00002_sec_vend_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00002_cond_pago_checkColumnConstraints">}
-#+ Check constraints on the "vetb00002.cond_pago" column
-#+
-#+ @param p_cond_pago - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00002_cond_pago_checkColumnConstraints(p_cond_pago)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cond_pago LIKE vetb00002.cond_pago
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00002_cond_pago_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00002_porc_itbi_checkColumnConstraints">}
-#+ Check constraints on the "vetb00002.porc_itbi" column
-#+
-#+ @param p_porc_itbi - DECIMAL(5,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00002_porc_itbi_checkColumnConstraints(p_porc_itbi)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_porc_itbi LIKE vetb00002.porc_itbi
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00002_porc_itbi_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00002_porc_desc_checkColumnConstraints">}
-#+ Check constraints on the "vetb00002.porc_desc" column
-#+
-#+ @param p_porc_desc - DECIMAL(8,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00002_porc_desc_checkColumnConstraints(p_porc_desc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_porc_desc LIKE vetb00002.porc_desc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00002_porc_desc_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00002_prima_us_checkColumnConstraints">}
-#+ Check constraints on the "vetb00002.prima_us" column
-#+
-#+ @param p_prima_us - DECIMAL(6,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00002_prima_us_checkColumnConstraints(p_prima_us)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_prima_us LIKE vetb00002.prima_us
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00002_prima_us_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00002_sub_total_checkColumnConstraints">}
-#+ Check constraints on the "vetb00002.sub_total" column
-#+
-#+ @param p_sub_total - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00002_sub_total_checkColumnConstraints(p_sub_total)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sub_total LIKE vetb00002.sub_total
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00002_sub_total_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00002_monto_desc_checkColumnConstraints">}
-#+ Check constraints on the "vetb00002.monto_desc" column
-#+
-#+ @param p_monto_desc - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00002_monto_desc_checkColumnConstraints(p_monto_desc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_monto_desc LIKE vetb00002.monto_desc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00002_monto_desc_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00002_monto_itbi_checkColumnConstraints">}
-#+ Check constraints on the "vetb00002.monto_itbi" column
-#+
-#+ @param p_monto_itbi - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00002_monto_itbi_checkColumnConstraints(p_monto_itbi)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_monto_itbi LIKE vetb00002.monto_itbi
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00002_monto_itbi_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00002_neto_checkColumnConstraints">}
-#+ Check constraints on the "vetb00002.neto" column
-#+
-#+ @param p_neto - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00002_neto_checkColumnConstraints(p_neto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_neto LIKE vetb00002.neto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_neto IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- neto: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00002_neto_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00002_fecha_embarque_checkColumnConstraints">}
-#+ Check constraints on the "vetb00002.fecha_embarque" column
-#+
-#+ @param p_fecha_embarque - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00002_fecha_embarque_checkColumnConstraints(p_fecha_embarque)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_embarque LIKE vetb00002.fecha_embarque
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00002_fecha_embarque_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00002_status_impresion_checkColumnConstraints">}
-#+ Check constraints on the "vetb00002.status_impresion" column
-#+
-#+ @param p_status_impresion - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00002_status_impresion_checkColumnConstraints(p_status_impresion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_impresion LIKE vetb00002.status_impresion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00002_status_impresion_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00002_status_t_checkColumnConstraints">}
-#+ Check constraints on the "vetb00002.status_t" column
-#+
-#+ @param p_status_t - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00002_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE vetb00002.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00002_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00002_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "vetb00002.us_crea" column
-#+
-#+ @param p_us_crea - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00002_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE vetb00002.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00002_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00002_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "vetb00002.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00002_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE vetb00002.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00002_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00002_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "vetb00002.us_mod" column
-#+
-#+ @param p_us_mod - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00002_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE vetb00002.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00002_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00002_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "vetb00002.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00002_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE vetb00002.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00002_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00002_documento_checkColumnConstraints">}
-#+ Check constraints on the "vetb00002.documento" column
-#+
-#+ @param p_documento - CHAR(15) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00002_documento_checkColumnConstraints(p_documento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_documento LIKE vetb00002.documento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00002_documento_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00002_placa_transporte_checkColumnConstraints">}
-#+ Check constraints on the "vetb00002.placa_transporte" column
-#+
-#+ @param p_placa_transporte - CHAR(25) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00002_placa_transporte_checkColumnConstraints(p_placa_transporte)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_placa_transporte LIKE vetb00002.placa_transporte
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00002_placa_transporte_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00002_sucid_checkColumnConstraints">}
-#+ Check constraints on the "vetb00002.sucid" column
-#+
-#+ @param p_sucid - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00002_sucid_checkColumnConstraints(p_sucid)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sucid LIKE vetb00002.sucid
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00002_sucid_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00002_num_req_checkColumnConstraints">}
-#+ Check constraints on the "vetb00002.num_req" column
-#+
-#+ @param p_num_req - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00002_num_req_checkColumnConstraints(p_num_req)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_req LIKE vetb00002.num_req
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00002_num_req_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00001_checkTableConstraints">}
-#+ Check constraints on the "vetb00001" table
-#+
-#+ @param p_data - a row data LIKE vetb00001.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00001_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vetb00001.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vetb00001_cod_cia_checkColumnConstraints(p_data.cod_cia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00001_ult_factura_checkColumnConstraints(p_data.ult_factura) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00001_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00001_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00001_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00001_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00001_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vetb00001_sucid_checkColumnConstraints(p_data.sucid) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00001_checkTableConstraints
-
-{<BLOCK Name="fct.vetb00001_cod_cia_checkColumnConstraints">}
-#+ Check constraints on the "vetb00001.cod_cia" column
-#+
-#+ @param p_cod_cia - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00001_cod_cia_checkColumnConstraints(p_cod_cia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_cia LIKE vetb00001.cod_cia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00001_cod_cia_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00001_ult_factura_checkColumnConstraints">}
-#+ Check constraints on the "vetb00001.ult_factura" column
-#+
-#+ @param p_ult_factura - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00001_ult_factura_checkColumnConstraints(p_ult_factura)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ult_factura LIKE vetb00001.ult_factura
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00001_ult_factura_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00001_status_t_checkColumnConstraints">}
-#+ Check constraints on the "vetb00001.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00001_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE vetb00001.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00001_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00001_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "vetb00001.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00001_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE vetb00001.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00001_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00001_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "vetb00001.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00001_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE vetb00001.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00001_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00001_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "vetb00001.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00001_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE vetb00001.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00001_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00001_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "vetb00001.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00001_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE vetb00001.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00001_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.vetb00001_sucid_checkColumnConstraints">}
-#+ Check constraints on the "vetb00001.sucid" column
-#+
-#+ @param p_sucid - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vetb00001_sucid_checkColumnConstraints(p_sucid)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sucid LIKE vetb00001.sucid
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vetb00001_sucid_checkColumnConstraints
-
-{<BLOCK Name="fct.ventas_checkTableConstraints">}
-#+ Check constraints on the "ventas" table
-#+
-#+ @param p_data - a row data LIKE ventas.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_ventas_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE ventas.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_ventas_factura_checkColumnConstraints(p_data.factura) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ventas_checkTableConstraints
-
-{<BLOCK Name="fct.ventas_factura_checkColumnConstraints">}
-#+ Check constraints on the "ventas.factura" column
-#+
-#+ @param p_factura - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ventas_factura_checkColumnConstraints(p_factura)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_factura LIKE ventas.factura
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ventas_factura_checkColumnConstraints
-
-{<BLOCK Name="fct.vacaciones_checkTableConstraints">}
-#+ Check constraints on the "vacaciones" table
-#+
-#+ @param p_data - a row data LIKE vacaciones.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_vacaciones_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE vacaciones.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_vacaciones_ano_checkColumnConstraints(p_data.ano) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vacaciones_num_emp_checkColumnConstraints(p_data.num_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vacaciones_cod_puesto_checkColumnConstraints(p_data.cod_puesto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vacaciones_nom1_emp_checkColumnConstraints(p_data.nom1_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vacaciones_nom2_emp_checkColumnConstraints(p_data.nom2_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vacaciones_apell1_emp_checkColumnConstraints(p_data.apell1_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vacaciones_apell2_emp_checkColumnConstraints(p_data.apell2_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vacaciones_cedula_checkColumnConstraints(p_data.cedula) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vacaciones_serie_checkColumnConstraints(p_data.serie) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vacaciones_nomina_checkColumnConstraints(p_data.nomina) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vacaciones_fecha_ing_checkColumnConstraints(p_data.fecha_ing) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vacaciones_nom_puesto_checkColumnConstraints(p_data.nom_puesto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vacaciones_fech_vac_checkColumnConstraints(p_data.fech_vac) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_vacaciones_dia_checkColumnConstraints(p_data.dia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vacaciones_checkTableConstraints
-
-{<BLOCK Name="fct.vacaciones_ano_checkColumnConstraints">}
-#+ Check constraints on the "vacaciones.ano" column
-#+
-#+ @param p_ano - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vacaciones_ano_checkColumnConstraints(p_ano)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ano LIKE vacaciones.ano
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vacaciones_ano_checkColumnConstraints
-
-{<BLOCK Name="fct.vacaciones_num_emp_checkColumnConstraints">}
-#+ Check constraints on the "vacaciones.num_emp" column
-#+
-#+ @param p_num_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vacaciones_num_emp_checkColumnConstraints(p_num_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_emp LIKE vacaciones.num_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vacaciones_num_emp_checkColumnConstraints
-
-{<BLOCK Name="fct.vacaciones_cod_puesto_checkColumnConstraints">}
-#+ Check constraints on the "vacaciones.cod_puesto" column
-#+
-#+ @param p_cod_puesto - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vacaciones_cod_puesto_checkColumnConstraints(p_cod_puesto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_puesto LIKE vacaciones.cod_puesto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vacaciones_cod_puesto_checkColumnConstraints
-
-{<BLOCK Name="fct.vacaciones_nom1_emp_checkColumnConstraints">}
-#+ Check constraints on the "vacaciones.nom1_emp" column
-#+
-#+ @param p_nom1_emp - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vacaciones_nom1_emp_checkColumnConstraints(p_nom1_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nom1_emp LIKE vacaciones.nom1_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vacaciones_nom1_emp_checkColumnConstraints
-
-{<BLOCK Name="fct.vacaciones_nom2_emp_checkColumnConstraints">}
-#+ Check constraints on the "vacaciones.nom2_emp" column
-#+
-#+ @param p_nom2_emp - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vacaciones_nom2_emp_checkColumnConstraints(p_nom2_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nom2_emp LIKE vacaciones.nom2_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vacaciones_nom2_emp_checkColumnConstraints
-
-{<BLOCK Name="fct.vacaciones_apell1_emp_checkColumnConstraints">}
-#+ Check constraints on the "vacaciones.apell1_emp" column
-#+
-#+ @param p_apell1_emp - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vacaciones_apell1_emp_checkColumnConstraints(p_apell1_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_apell1_emp LIKE vacaciones.apell1_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vacaciones_apell1_emp_checkColumnConstraints
-
-{<BLOCK Name="fct.vacaciones_apell2_emp_checkColumnConstraints">}
-#+ Check constraints on the "vacaciones.apell2_emp" column
-#+
-#+ @param p_apell2_emp - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vacaciones_apell2_emp_checkColumnConstraints(p_apell2_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_apell2_emp LIKE vacaciones.apell2_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vacaciones_apell2_emp_checkColumnConstraints
-
-{<BLOCK Name="fct.vacaciones_cedula_checkColumnConstraints">}
-#+ Check constraints on the "vacaciones.cedula" column
-#+
-#+ @param p_cedula - CHAR(11) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vacaciones_cedula_checkColumnConstraints(p_cedula)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cedula LIKE vacaciones.cedula
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vacaciones_cedula_checkColumnConstraints
-
-{<BLOCK Name="fct.vacaciones_serie_checkColumnConstraints">}
-#+ Check constraints on the "vacaciones.serie" column
-#+
-#+ @param p_serie - CHAR(4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vacaciones_serie_checkColumnConstraints(p_serie)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_serie LIKE vacaciones.serie
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vacaciones_serie_checkColumnConstraints
-
-{<BLOCK Name="fct.vacaciones_nomina_checkColumnConstraints">}
-#+ Check constraints on the "vacaciones.nomina" column
-#+
-#+ @param p_nomina - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vacaciones_nomina_checkColumnConstraints(p_nomina)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nomina LIKE vacaciones.nomina
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vacaciones_nomina_checkColumnConstraints
-
-{<BLOCK Name="fct.vacaciones_fecha_ing_checkColumnConstraints">}
-#+ Check constraints on the "vacaciones.fecha_ing" column
-#+
-#+ @param p_fecha_ing - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vacaciones_fecha_ing_checkColumnConstraints(p_fecha_ing)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_ing LIKE vacaciones.fecha_ing
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vacaciones_fecha_ing_checkColumnConstraints
-
-{<BLOCK Name="fct.vacaciones_nom_puesto_checkColumnConstraints">}
-#+ Check constraints on the "vacaciones.nom_puesto" column
-#+
-#+ @param p_nom_puesto - CHAR(25) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vacaciones_nom_puesto_checkColumnConstraints(p_nom_puesto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nom_puesto LIKE vacaciones.nom_puesto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vacaciones_nom_puesto_checkColumnConstraints
-
-{<BLOCK Name="fct.vacaciones_fech_vac_checkColumnConstraints">}
-#+ Check constraints on the "vacaciones.fech_vac" column
-#+
-#+ @param p_fech_vac - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vacaciones_fech_vac_checkColumnConstraints(p_fech_vac)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_vac LIKE vacaciones.fech_vac
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vacaciones_fech_vac_checkColumnConstraints
-
-{<BLOCK Name="fct.vacaciones_dia_checkColumnConstraints">}
-#+ Check constraints on the "vacaciones.dia" column
-#+
-#+ @param p_dia - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_vacaciones_dia_checkColumnConstraints(p_dia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_dia LIKE vacaciones.dia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.vacaciones_dia_checkColumnConstraints
-
-{<BLOCK Name="fct.usuarios_checkTableConstraints">}
-#+ Check constraints on the "usuarios" table
-#+
-#+ @param p_data - a row data LIKE usuarios.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_usuarios_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE usuarios.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_usuarios_usucodigo_checkColumnConstraints(p_data.usucodigo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_usuarios_usuclave_checkColumnConstraints(p_data.usuclave) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_usuarios_usunombre_checkColumnConstraints(p_data.usunombre) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.usuarios_checkTableConstraints
-
-{<BLOCK Name="fct.usuarios_usucodigo_checkColumnConstraints">}
-#+ Check constraints on the "usuarios.usucodigo" column
-#+
-#+ @param p_usucodigo - VARCHAR2(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_usuarios_usucodigo_checkColumnConstraints(p_usucodigo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_usucodigo LIKE usuarios.usucodigo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_usucodigo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- usucodigo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.usuarios_usucodigo_checkColumnConstraints
-
-{<BLOCK Name="fct.usuarios_usuclave_checkColumnConstraints">}
-#+ Check constraints on the "usuarios.usuclave" column
-#+
-#+ @param p_usuclave - VARCHAR2(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_usuarios_usuclave_checkColumnConstraints(p_usuclave)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_usuclave LIKE usuarios.usuclave
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_usuclave IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- usuclave: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.usuarios_usuclave_checkColumnConstraints
-
-{<BLOCK Name="fct.usuarios_usunombre_checkColumnConstraints">}
-#+ Check constraints on the "usuarios.usunombre" column
-#+
-#+ @param p_usunombre - VARCHAR2(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_usuarios_usunombre_checkColumnConstraints(p_usunombre)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_usunombre LIKE usuarios.usunombre
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.usuarios_usunombre_checkColumnConstraints
-
-{<BLOCK Name="fct.userinfo_checkTableConstraints">}
-#+ Check constraints on the "userinfo" table
-#+
-#+ @param p_data - a row data LIKE userinfo.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_userinfo_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE userinfo.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_userinfo_userid_checkColumnConstraints(p_data.userid) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_userinfo_badgenumber_checkColumnConstraints(p_data.badgenumber) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_userinfo_ssn_checkColumnConstraints(p_data.ssn) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_userinfo_name_checkColumnConstraints(p_data.name) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_userinfo_gender_checkColumnConstraints(p_data.gender) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_userinfo_title_checkColumnConstraints(p_data.title) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_userinfo_pager_checkColumnConstraints(p_data.pager) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_userinfo_birthday_checkColumnConstraints(p_data.birthday) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_userinfo_hiredday_checkColumnConstraints(p_data.hiredday) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_userinfo_street_checkColumnConstraints(p_data.street) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_userinfo_city_checkColumnConstraints(p_data.city) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_userinfo_state_checkColumnConstraints(p_data.state) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_userinfo_zip_checkColumnConstraints(p_data.zip) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_userinfo_ophone_checkColumnConstraints(p_data.ophone) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_userinfo_fphone_checkColumnConstraints(p_data.fphone) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_userinfo_verificationmethod_checkColumnConstraints(p_data.verificationmethod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_userinfo_defaultdeptid_checkColumnConstraints(p_data.defaultdeptid) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_userinfo_securityflags_checkColumnConstraints(p_data.securityflags) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_userinfo_att_checkColumnConstraints(p_data.att) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_userinfo_inlate_checkColumnConstraints(p_data.inlate) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_userinfo_outearly_checkColumnConstraints(p_data.outearly) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_userinfo_overtime_checkColumnConstraints(p_data.overtime) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_userinfo_sep_checkColumnConstraints(p_data.sep) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_userinfo_holiday_checkColumnConstraints(p_data.holiday) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_userinfo_minzu_checkColumnConstraints(p_data.minzu) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_userinfo_password_checkColumnConstraints(p_data.password) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_userinfo_lunchduration_checkColumnConstraints(p_data.lunchduration) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_userinfo_mverifypass_checkColumnConstraints(p_data.mverifypass) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_userinfo_photo_checkColumnConstraints(p_data.photo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_userinfo_notes_checkColumnConstraints(p_data.notes) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_userinfo_privilege_checkColumnConstraints(p_data.privilege) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_userinfo_inheritdeptsch_checkColumnConstraints(p_data.inheritdeptsch) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_userinfo_inheritdeptschclass_checkColumnConstraints(p_data.inheritdeptschclass) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_userinfo_autoschplan_checkColumnConstraints(p_data.autoschplan) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_userinfo_minautoschinterval_checkColumnConstraints(p_data.minautoschinterval) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_userinfo_registerot_checkColumnConstraints(p_data.registerot) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_userinfo_inheritdeptrule_checkColumnConstraints(p_data.inheritdeptrule) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_userinfo_emprivilege_checkColumnConstraints(p_data.emprivilege) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_userinfo_cardno_checkColumnConstraints(p_data.cardno) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.userinfo_checkTableConstraints
-
-{<BLOCK Name="fct.userinfo_userid_checkColumnConstraints">}
-#+ Check constraints on the "userinfo.userid" column
-#+
-#+ @param p_userid - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_userinfo_userid_checkColumnConstraints(p_userid)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_userid LIKE userinfo.userid
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_userid IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- userid: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.userinfo_userid_checkColumnConstraints
-
-{<BLOCK Name="fct.userinfo_badgenumber_checkColumnConstraints">}
-#+ Check constraints on the "userinfo.badgenumber" column
-#+
-#+ @param p_badgenumber - VARCHAR2(24) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_userinfo_badgenumber_checkColumnConstraints(p_badgenumber)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_badgenumber LIKE userinfo.badgenumber
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_badgenumber IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- badgenumber: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.userinfo_badgenumber_checkColumnConstraints
-
-{<BLOCK Name="fct.userinfo_ssn_checkColumnConstraints">}
-#+ Check constraints on the "userinfo.ssn" column
-#+
-#+ @param p_ssn - VARCHAR2(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_userinfo_ssn_checkColumnConstraints(p_ssn)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ssn LIKE userinfo.ssn
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.userinfo_ssn_checkColumnConstraints
-
-{<BLOCK Name="fct.userinfo_name_checkColumnConstraints">}
-#+ Check constraints on the "userinfo.name" column
-#+
-#+ @param p_name - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_userinfo_name_checkColumnConstraints(p_name)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_name LIKE userinfo.name
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.userinfo_name_checkColumnConstraints
-
-{<BLOCK Name="fct.userinfo_gender_checkColumnConstraints">}
-#+ Check constraints on the "userinfo.gender" column
-#+
-#+ @param p_gender - VARCHAR2(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_userinfo_gender_checkColumnConstraints(p_gender)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_gender LIKE userinfo.gender
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.userinfo_gender_checkColumnConstraints
-
-{<BLOCK Name="fct.userinfo_title_checkColumnConstraints">}
-#+ Check constraints on the "userinfo.title" column
-#+
-#+ @param p_title - VARCHAR2(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_userinfo_title_checkColumnConstraints(p_title)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_title LIKE userinfo.title
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.userinfo_title_checkColumnConstraints
-
-{<BLOCK Name="fct.userinfo_pager_checkColumnConstraints">}
-#+ Check constraints on the "userinfo.pager" column
-#+
-#+ @param p_pager - VARCHAR2(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_userinfo_pager_checkColumnConstraints(p_pager)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_pager LIKE userinfo.pager
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.userinfo_pager_checkColumnConstraints
-
-{<BLOCK Name="fct.userinfo_birthday_checkColumnConstraints">}
-#+ Check constraints on the "userinfo.birthday" column
-#+
-#+ @param p_birthday - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_userinfo_birthday_checkColumnConstraints(p_birthday)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_birthday LIKE userinfo.birthday
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.userinfo_birthday_checkColumnConstraints
-
-{<BLOCK Name="fct.userinfo_hiredday_checkColumnConstraints">}
-#+ Check constraints on the "userinfo.hiredday" column
-#+
-#+ @param p_hiredday - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_userinfo_hiredday_checkColumnConstraints(p_hiredday)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_hiredday LIKE userinfo.hiredday
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.userinfo_hiredday_checkColumnConstraints
-
-{<BLOCK Name="fct.userinfo_street_checkColumnConstraints">}
-#+ Check constraints on the "userinfo.street" column
-#+
-#+ @param p_street - VARCHAR2(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_userinfo_street_checkColumnConstraints(p_street)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_street LIKE userinfo.street
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.userinfo_street_checkColumnConstraints
-
-{<BLOCK Name="fct.userinfo_city_checkColumnConstraints">}
-#+ Check constraints on the "userinfo.city" column
-#+
-#+ @param p_city - VARCHAR2(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_userinfo_city_checkColumnConstraints(p_city)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_city LIKE userinfo.city
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.userinfo_city_checkColumnConstraints
-
-{<BLOCK Name="fct.userinfo_state_checkColumnConstraints">}
-#+ Check constraints on the "userinfo.state" column
-#+
-#+ @param p_state - VARCHAR2(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_userinfo_state_checkColumnConstraints(p_state)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_state LIKE userinfo.state
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.userinfo_state_checkColumnConstraints
-
-{<BLOCK Name="fct.userinfo_zip_checkColumnConstraints">}
-#+ Check constraints on the "userinfo.zip" column
-#+
-#+ @param p_zip - VARCHAR2(12) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_userinfo_zip_checkColumnConstraints(p_zip)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_zip LIKE userinfo.zip
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.userinfo_zip_checkColumnConstraints
-
-{<BLOCK Name="fct.userinfo_ophone_checkColumnConstraints">}
-#+ Check constraints on the "userinfo.ophone" column
-#+
-#+ @param p_ophone - VARCHAR2(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_userinfo_ophone_checkColumnConstraints(p_ophone)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ophone LIKE userinfo.ophone
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.userinfo_ophone_checkColumnConstraints
-
-{<BLOCK Name="fct.userinfo_fphone_checkColumnConstraints">}
-#+ Check constraints on the "userinfo.fphone" column
-#+
-#+ @param p_fphone - VARCHAR2(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_userinfo_fphone_checkColumnConstraints(p_fphone)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fphone LIKE userinfo.fphone
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.userinfo_fphone_checkColumnConstraints
-
-{<BLOCK Name="fct.userinfo_verificationmethod_checkColumnConstraints">}
-#+ Check constraints on the "userinfo.verificationmethod" column
-#+
-#+ @param p_verificationmethod - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_userinfo_verificationmethod_checkColumnConstraints(p_verificationmethod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_verificationmethod LIKE userinfo.verificationmethod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.userinfo_verificationmethod_checkColumnConstraints
-
-{<BLOCK Name="fct.userinfo_defaultdeptid_checkColumnConstraints">}
-#+ Check constraints on the "userinfo.defaultdeptid" column
-#+
-#+ @param p_defaultdeptid - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_userinfo_defaultdeptid_checkColumnConstraints(p_defaultdeptid)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_defaultdeptid LIKE userinfo.defaultdeptid
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.userinfo_defaultdeptid_checkColumnConstraints
-
-{<BLOCK Name="fct.userinfo_securityflags_checkColumnConstraints">}
-#+ Check constraints on the "userinfo.securityflags" column
-#+
-#+ @param p_securityflags - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_userinfo_securityflags_checkColumnConstraints(p_securityflags)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_securityflags LIKE userinfo.securityflags
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.userinfo_securityflags_checkColumnConstraints
-
-{<BLOCK Name="fct.userinfo_att_checkColumnConstraints">}
-#+ Check constraints on the "userinfo.att" column
-#+
-#+ @param p_att - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_userinfo_att_checkColumnConstraints(p_att)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_att LIKE userinfo.att
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_att IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- att: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.userinfo_att_checkColumnConstraints
-
-{<BLOCK Name="fct.userinfo_inlate_checkColumnConstraints">}
-#+ Check constraints on the "userinfo.inlate" column
-#+
-#+ @param p_inlate - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_userinfo_inlate_checkColumnConstraints(p_inlate)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_inlate LIKE userinfo.inlate
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_inlate IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- inlate: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.userinfo_inlate_checkColumnConstraints
-
-{<BLOCK Name="fct.userinfo_outearly_checkColumnConstraints">}
-#+ Check constraints on the "userinfo.outearly" column
-#+
-#+ @param p_outearly - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_userinfo_outearly_checkColumnConstraints(p_outearly)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_outearly LIKE userinfo.outearly
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_outearly IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- outearly: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.userinfo_outearly_checkColumnConstraints
-
-{<BLOCK Name="fct.userinfo_overtime_checkColumnConstraints">}
-#+ Check constraints on the "userinfo.overtime" column
-#+
-#+ @param p_overtime - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_userinfo_overtime_checkColumnConstraints(p_overtime)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_overtime LIKE userinfo.overtime
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_overtime IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- overtime: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.userinfo_overtime_checkColumnConstraints
-
-{<BLOCK Name="fct.userinfo_sep_checkColumnConstraints">}
-#+ Check constraints on the "userinfo.sep" column
-#+
-#+ @param p_sep - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_userinfo_sep_checkColumnConstraints(p_sep)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sep LIKE userinfo.sep
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_sep IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- sep: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.userinfo_sep_checkColumnConstraints
-
-{<BLOCK Name="fct.userinfo_holiday_checkColumnConstraints">}
-#+ Check constraints on the "userinfo.holiday" column
-#+
-#+ @param p_holiday - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_userinfo_holiday_checkColumnConstraints(p_holiday)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_holiday LIKE userinfo.holiday
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_holiday IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- holiday: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.userinfo_holiday_checkColumnConstraints
-
-{<BLOCK Name="fct.userinfo_minzu_checkColumnConstraints">}
-#+ Check constraints on the "userinfo.minzu" column
-#+
-#+ @param p_minzu - VARCHAR2(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_userinfo_minzu_checkColumnConstraints(p_minzu)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_minzu LIKE userinfo.minzu
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.userinfo_minzu_checkColumnConstraints
-
-{<BLOCK Name="fct.userinfo_password_checkColumnConstraints">}
-#+ Check constraints on the "userinfo.password" column
-#+
-#+ @param p_password - VARCHAR2(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_userinfo_password_checkColumnConstraints(p_password)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_password LIKE userinfo.password
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.userinfo_password_checkColumnConstraints
-
-{<BLOCK Name="fct.userinfo_lunchduration_checkColumnConstraints">}
-#+ Check constraints on the "userinfo.lunchduration" column
-#+
-#+ @param p_lunchduration - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_userinfo_lunchduration_checkColumnConstraints(p_lunchduration)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_lunchduration LIKE userinfo.lunchduration
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_lunchduration IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- lunchduration: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.userinfo_lunchduration_checkColumnConstraints
-
-{<BLOCK Name="fct.userinfo_mverifypass_checkColumnConstraints">}
-#+ Check constraints on the "userinfo.mverifypass" column
-#+
-#+ @param p_mverifypass - VARCHAR2(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_userinfo_mverifypass_checkColumnConstraints(p_mverifypass)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mverifypass LIKE userinfo.mverifypass
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.userinfo_mverifypass_checkColumnConstraints
-
-{<BLOCK Name="fct.userinfo_photo_checkColumnConstraints">}
-#+ Check constraints on the "userinfo.photo" column
-#+
-#+ @param p_photo - BYTE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_userinfo_photo_checkColumnConstraints(p_photo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_photo LIKE userinfo.photo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.userinfo_photo_checkColumnConstraints
-
-{<BLOCK Name="fct.userinfo_notes_checkColumnConstraints">}
-#+ Check constraints on the "userinfo.notes" column
-#+
-#+ @param p_notes - BYTE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_userinfo_notes_checkColumnConstraints(p_notes)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_notes LIKE userinfo.notes
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.userinfo_notes_checkColumnConstraints
-
-{<BLOCK Name="fct.userinfo_privilege_checkColumnConstraints">}
-#+ Check constraints on the "userinfo.privilege" column
-#+
-#+ @param p_privilege - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_userinfo_privilege_checkColumnConstraints(p_privilege)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_privilege LIKE userinfo.privilege
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.userinfo_privilege_checkColumnConstraints
-
-{<BLOCK Name="fct.userinfo_inheritdeptsch_checkColumnConstraints">}
-#+ Check constraints on the "userinfo.inheritdeptsch" column
-#+
-#+ @param p_inheritdeptsch - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_userinfo_inheritdeptsch_checkColumnConstraints(p_inheritdeptsch)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_inheritdeptsch LIKE userinfo.inheritdeptsch
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.userinfo_inheritdeptsch_checkColumnConstraints
-
-{<BLOCK Name="fct.userinfo_inheritdeptschclass_checkColumnConstraints">}
-#+ Check constraints on the "userinfo.inheritdeptschclass" column
-#+
-#+ @param p_inheritdeptschclass - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_userinfo_inheritdeptschclass_checkColumnConstraints(p_inheritdeptschclass)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_inheritdeptschclass LIKE userinfo.inheritdeptschclass
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.userinfo_inheritdeptschclass_checkColumnConstraints
-
-{<BLOCK Name="fct.userinfo_autoschplan_checkColumnConstraints">}
-#+ Check constraints on the "userinfo.autoschplan" column
-#+
-#+ @param p_autoschplan - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_userinfo_autoschplan_checkColumnConstraints(p_autoschplan)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_autoschplan LIKE userinfo.autoschplan
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.userinfo_autoschplan_checkColumnConstraints
-
-{<BLOCK Name="fct.userinfo_minautoschinterval_checkColumnConstraints">}
-#+ Check constraints on the "userinfo.minautoschinterval" column
-#+
-#+ @param p_minautoschinterval - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_userinfo_minautoschinterval_checkColumnConstraints(p_minautoschinterval)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_minautoschinterval LIKE userinfo.minautoschinterval
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.userinfo_minautoschinterval_checkColumnConstraints
-
-{<BLOCK Name="fct.userinfo_registerot_checkColumnConstraints">}
-#+ Check constraints on the "userinfo.registerot" column
-#+
-#+ @param p_registerot - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_userinfo_registerot_checkColumnConstraints(p_registerot)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_registerot LIKE userinfo.registerot
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.userinfo_registerot_checkColumnConstraints
-
-{<BLOCK Name="fct.userinfo_inheritdeptrule_checkColumnConstraints">}
-#+ Check constraints on the "userinfo.inheritdeptrule" column
-#+
-#+ @param p_inheritdeptrule - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_userinfo_inheritdeptrule_checkColumnConstraints(p_inheritdeptrule)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_inheritdeptrule LIKE userinfo.inheritdeptrule
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.userinfo_inheritdeptrule_checkColumnConstraints
-
-{<BLOCK Name="fct.userinfo_emprivilege_checkColumnConstraints">}
-#+ Check constraints on the "userinfo.emprivilege" column
-#+
-#+ @param p_emprivilege - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_userinfo_emprivilege_checkColumnConstraints(p_emprivilege)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_emprivilege LIKE userinfo.emprivilege
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.userinfo_emprivilege_checkColumnConstraints
-
-{<BLOCK Name="fct.userinfo_cardno_checkColumnConstraints">}
-#+ Check constraints on the "userinfo.cardno" column
-#+
-#+ @param p_cardno - VARCHAR2(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_userinfo_cardno_checkColumnConstraints(p_cardno)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cardno LIKE userinfo.cardno
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.userinfo_cardno_checkColumnConstraints
-
-{<BLOCK Name="fct.travertino_checkTableConstraints">}
-#+ Check constraints on the "travertino" table
-#+
-#+ @param p_data - a row data LIKE travertino.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_travertino_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE travertino.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_travertino_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_travertino_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_travertino_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_travertino_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_travertino_porc_checkColumnConstraints(p_data.porc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.travertino_checkTableConstraints
-
-{<BLOCK Name="fct.travertino_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "travertino.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_travertino_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE travertino.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.travertino_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.travertino_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "travertino.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_travertino_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE travertino.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.travertino_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.travertino_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "travertino.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_travertino_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE travertino.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.travertino_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.travertino_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "travertino.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_travertino_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE travertino.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.travertino_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.travertino_porc_checkColumnConstraints">}
-#+ Check constraints on the "travertino.porc" column
-#+
-#+ @param p_porc - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_travertino_porc_checkColumnConstraints(p_porc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_porc LIKE travertino.porc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.travertino_porc_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpvetb00003_checkTableConstraints">}
-#+ Check constraints on the "tmpvetb00003" table
-#+
-#+ @param p_data - a row data LIKE tmpvetb00003.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpvetb00003_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE tmpvetb00003.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_tmpvetb00003_cod_cia_checkColumnConstraints(p_data.cod_cia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpvetb00003_factura_checkColumnConstraints(p_data.factura) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpvetb00003_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpvetb00003_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpvetb00003_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpvetb00003_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpvetb00003_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpvetb00003_cantidad_2_checkColumnConstraints(p_data.cantidad_2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpvetb00003_bonificacion_checkColumnConstraints(p_data.bonificacion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpvetb00003_precio_checkColumnConstraints(p_data.precio) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpvetb00003_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpvetb00003_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpvetb00003_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpvetb00003_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpvetb00003_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpvetb00003_checkTableConstraints
-
-{<BLOCK Name="fct.tmpvetb00003_cod_cia_checkColumnConstraints">}
-#+ Check constraints on the "tmpvetb00003.cod_cia" column
-#+
-#+ @param p_cod_cia - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpvetb00003_cod_cia_checkColumnConstraints(p_cod_cia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_cia LIKE tmpvetb00003.cod_cia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpvetb00003_cod_cia_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpvetb00003_factura_checkColumnConstraints">}
-#+ Check constraints on the "tmpvetb00003.factura" column
-#+
-#+ @param p_factura - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpvetb00003_factura_checkColumnConstraints(p_factura)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_factura LIKE tmpvetb00003.factura
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpvetb00003_factura_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpvetb00003_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "tmpvetb00003.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpvetb00003_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE tmpvetb00003.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpvetb00003_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpvetb00003_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "tmpvetb00003.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpvetb00003_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE tmpvetb00003.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpvetb00003_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpvetb00003_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "tmpvetb00003.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpvetb00003_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE tmpvetb00003.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpvetb00003_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpvetb00003_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "tmpvetb00003.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpvetb00003_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE tmpvetb00003.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpvetb00003_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpvetb00003_cantidad_checkColumnConstraints">}
-#+ Check constraints on the "tmpvetb00003.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpvetb00003_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE tmpvetb00003.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpvetb00003_cantidad_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpvetb00003_cantidad_2_checkColumnConstraints">}
-#+ Check constraints on the "tmpvetb00003.cantidad_2" column
-#+
-#+ @param p_cantidad_2 - DECIMAL(14,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpvetb00003_cantidad_2_checkColumnConstraints(p_cantidad_2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad_2 LIKE tmpvetb00003.cantidad_2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpvetb00003_cantidad_2_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpvetb00003_bonificacion_checkColumnConstraints">}
-#+ Check constraints on the "tmpvetb00003.bonificacion" column
-#+
-#+ @param p_bonificacion - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpvetb00003_bonificacion_checkColumnConstraints(p_bonificacion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_bonificacion LIKE tmpvetb00003.bonificacion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpvetb00003_bonificacion_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpvetb00003_precio_checkColumnConstraints">}
-#+ Check constraints on the "tmpvetb00003.precio" column
-#+
-#+ @param p_precio - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpvetb00003_precio_checkColumnConstraints(p_precio)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_precio LIKE tmpvetb00003.precio
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpvetb00003_precio_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpvetb00003_status_t_checkColumnConstraints">}
-#+ Check constraints on the "tmpvetb00003.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpvetb00003_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE tmpvetb00003.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpvetb00003_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpvetb00003_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "tmpvetb00003.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpvetb00003_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE tmpvetb00003.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpvetb00003_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpvetb00003_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "tmpvetb00003.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpvetb00003_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE tmpvetb00003.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpvetb00003_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpvetb00003_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "tmpvetb00003.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpvetb00003_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE tmpvetb00003.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpvetb00003_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpvetb00003_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "tmpvetb00003.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpvetb00003_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE tmpvetb00003.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpvetb00003_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpvetb00002_checkTableConstraints">}
-#+ Check constraints on the "tmpvetb00002" table
-#+
-#+ @param p_data - a row data LIKE tmpvetb00002.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpvetb00002_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE tmpvetb00002.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_tmpvetb00002_cod_cia_checkColumnConstraints(p_data.cod_cia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpvetb00002_factura_checkColumnConstraints(p_data.factura) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpvetb00002_fecha_factura_checkColumnConstraints(p_data.fecha_factura) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpvetb00002_ventas_checkColumnConstraints(p_data.ventas) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpvetb00002_zona_checkColumnConstraints(p_data.zona) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpvetb00002_orden_checkColumnConstraints(p_data.orden) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpvetb00002_fecha_orden_checkColumnConstraints(p_data.fecha_orden) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpvetb00002_conduce_checkColumnConstraints(p_data.conduce) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpvetb00002_fecha_conduce_checkColumnConstraints(p_data.fecha_conduce) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpvetb00002_tipo_cliente_checkColumnConstraints(p_data.tipo_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpvetb00002_sec_cliente_checkColumnConstraints(p_data.sec_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpvetb00002_cod_vend_checkColumnConstraints(p_data.cod_vend) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpvetb00002_sec_vend_checkColumnConstraints(p_data.sec_vend) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpvetb00002_cond_pago_checkColumnConstraints(p_data.cond_pago) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpvetb00002_porc_itbi_checkColumnConstraints(p_data.porc_itbi) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpvetb00002_porc_desc_checkColumnConstraints(p_data.porc_desc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpvetb00002_prima_us_checkColumnConstraints(p_data.prima_us) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpvetb00002_sub_total_checkColumnConstraints(p_data.sub_total) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpvetb00002_monto_desc_checkColumnConstraints(p_data.monto_desc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpvetb00002_monto_itbi_checkColumnConstraints(p_data.monto_itbi) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpvetb00002_neto_checkColumnConstraints(p_data.neto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpvetb00002_fecha_embarque_checkColumnConstraints(p_data.fecha_embarque) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpvetb00002_status_impresion_checkColumnConstraints(p_data.status_impresion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpvetb00002_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpvetb00002_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpvetb00002_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpvetb00002_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpvetb00002_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpvetb00002_documento_checkColumnConstraints(p_data.documento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpvetb00002_placa_transporte_checkColumnConstraints(p_data.placa_transporte) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpvetb00002_checkTableConstraints
-
-{<BLOCK Name="fct.tmpvetb00002_cod_cia_checkColumnConstraints">}
-#+ Check constraints on the "tmpvetb00002.cod_cia" column
-#+
-#+ @param p_cod_cia - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpvetb00002_cod_cia_checkColumnConstraints(p_cod_cia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_cia LIKE tmpvetb00002.cod_cia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpvetb00002_cod_cia_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpvetb00002_factura_checkColumnConstraints">}
-#+ Check constraints on the "tmpvetb00002.factura" column
-#+
-#+ @param p_factura - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpvetb00002_factura_checkColumnConstraints(p_factura)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_factura LIKE tmpvetb00002.factura
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_factura IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- factura: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpvetb00002_factura_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpvetb00002_fecha_factura_checkColumnConstraints">}
-#+ Check constraints on the "tmpvetb00002.fecha_factura" column
-#+
-#+ @param p_fecha_factura - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpvetb00002_fecha_factura_checkColumnConstraints(p_fecha_factura)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_factura LIKE tmpvetb00002.fecha_factura
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpvetb00002_fecha_factura_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpvetb00002_ventas_checkColumnConstraints">}
-#+ Check constraints on the "tmpvetb00002.ventas" column
-#+
-#+ @param p_ventas - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpvetb00002_ventas_checkColumnConstraints(p_ventas)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ventas LIKE tmpvetb00002.ventas
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpvetb00002_ventas_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpvetb00002_zona_checkColumnConstraints">}
-#+ Check constraints on the "tmpvetb00002.zona" column
-#+
-#+ @param p_zona - VARCHAR2(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpvetb00002_zona_checkColumnConstraints(p_zona)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_zona LIKE tmpvetb00002.zona
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpvetb00002_zona_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpvetb00002_orden_checkColumnConstraints">}
-#+ Check constraints on the "tmpvetb00002.orden" column
-#+
-#+ @param p_orden - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpvetb00002_orden_checkColumnConstraints(p_orden)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_orden LIKE tmpvetb00002.orden
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpvetb00002_orden_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpvetb00002_fecha_orden_checkColumnConstraints">}
-#+ Check constraints on the "tmpvetb00002.fecha_orden" column
-#+
-#+ @param p_fecha_orden - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpvetb00002_fecha_orden_checkColumnConstraints(p_fecha_orden)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_orden LIKE tmpvetb00002.fecha_orden
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpvetb00002_fecha_orden_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpvetb00002_conduce_checkColumnConstraints">}
-#+ Check constraints on the "tmpvetb00002.conduce" column
-#+
-#+ @param p_conduce - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpvetb00002_conduce_checkColumnConstraints(p_conduce)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_conduce LIKE tmpvetb00002.conduce
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpvetb00002_conduce_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpvetb00002_fecha_conduce_checkColumnConstraints">}
-#+ Check constraints on the "tmpvetb00002.fecha_conduce" column
-#+
-#+ @param p_fecha_conduce - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpvetb00002_fecha_conduce_checkColumnConstraints(p_fecha_conduce)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_conduce LIKE tmpvetb00002.fecha_conduce
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpvetb00002_fecha_conduce_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpvetb00002_tipo_cliente_checkColumnConstraints">}
-#+ Check constraints on the "tmpvetb00002.tipo_cliente" column
-#+
-#+ @param p_tipo_cliente - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpvetb00002_tipo_cliente_checkColumnConstraints(p_tipo_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_cliente LIKE tmpvetb00002.tipo_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpvetb00002_tipo_cliente_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpvetb00002_sec_cliente_checkColumnConstraints">}
-#+ Check constraints on the "tmpvetb00002.sec_cliente" column
-#+
-#+ @param p_sec_cliente - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpvetb00002_sec_cliente_checkColumnConstraints(p_sec_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_cliente LIKE tmpvetb00002.sec_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpvetb00002_sec_cliente_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpvetb00002_cod_vend_checkColumnConstraints">}
-#+ Check constraints on the "tmpvetb00002.cod_vend" column
-#+
-#+ @param p_cod_vend - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpvetb00002_cod_vend_checkColumnConstraints(p_cod_vend)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_vend LIKE tmpvetb00002.cod_vend
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpvetb00002_cod_vend_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpvetb00002_sec_vend_checkColumnConstraints">}
-#+ Check constraints on the "tmpvetb00002.sec_vend" column
-#+
-#+ @param p_sec_vend - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpvetb00002_sec_vend_checkColumnConstraints(p_sec_vend)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_vend LIKE tmpvetb00002.sec_vend
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpvetb00002_sec_vend_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpvetb00002_cond_pago_checkColumnConstraints">}
-#+ Check constraints on the "tmpvetb00002.cond_pago" column
-#+
-#+ @param p_cond_pago - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpvetb00002_cond_pago_checkColumnConstraints(p_cond_pago)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cond_pago LIKE tmpvetb00002.cond_pago
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpvetb00002_cond_pago_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpvetb00002_porc_itbi_checkColumnConstraints">}
-#+ Check constraints on the "tmpvetb00002.porc_itbi" column
-#+
-#+ @param p_porc_itbi - DECIMAL(5,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpvetb00002_porc_itbi_checkColumnConstraints(p_porc_itbi)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_porc_itbi LIKE tmpvetb00002.porc_itbi
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpvetb00002_porc_itbi_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpvetb00002_porc_desc_checkColumnConstraints">}
-#+ Check constraints on the "tmpvetb00002.porc_desc" column
-#+
-#+ @param p_porc_desc - DECIMAL(8,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpvetb00002_porc_desc_checkColumnConstraints(p_porc_desc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_porc_desc LIKE tmpvetb00002.porc_desc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpvetb00002_porc_desc_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpvetb00002_prima_us_checkColumnConstraints">}
-#+ Check constraints on the "tmpvetb00002.prima_us" column
-#+
-#+ @param p_prima_us - DECIMAL(6,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpvetb00002_prima_us_checkColumnConstraints(p_prima_us)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_prima_us LIKE tmpvetb00002.prima_us
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpvetb00002_prima_us_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpvetb00002_sub_total_checkColumnConstraints">}
-#+ Check constraints on the "tmpvetb00002.sub_total" column
-#+
-#+ @param p_sub_total - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpvetb00002_sub_total_checkColumnConstraints(p_sub_total)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sub_total LIKE tmpvetb00002.sub_total
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpvetb00002_sub_total_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpvetb00002_monto_desc_checkColumnConstraints">}
-#+ Check constraints on the "tmpvetb00002.monto_desc" column
-#+
-#+ @param p_monto_desc - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpvetb00002_monto_desc_checkColumnConstraints(p_monto_desc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_monto_desc LIKE tmpvetb00002.monto_desc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpvetb00002_monto_desc_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpvetb00002_monto_itbi_checkColumnConstraints">}
-#+ Check constraints on the "tmpvetb00002.monto_itbi" column
-#+
-#+ @param p_monto_itbi - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpvetb00002_monto_itbi_checkColumnConstraints(p_monto_itbi)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_monto_itbi LIKE tmpvetb00002.monto_itbi
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpvetb00002_monto_itbi_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpvetb00002_neto_checkColumnConstraints">}
-#+ Check constraints on the "tmpvetb00002.neto" column
-#+
-#+ @param p_neto - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpvetb00002_neto_checkColumnConstraints(p_neto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_neto LIKE tmpvetb00002.neto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_neto IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- neto: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpvetb00002_neto_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpvetb00002_fecha_embarque_checkColumnConstraints">}
-#+ Check constraints on the "tmpvetb00002.fecha_embarque" column
-#+
-#+ @param p_fecha_embarque - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpvetb00002_fecha_embarque_checkColumnConstraints(p_fecha_embarque)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_embarque LIKE tmpvetb00002.fecha_embarque
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpvetb00002_fecha_embarque_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpvetb00002_status_impresion_checkColumnConstraints">}
-#+ Check constraints on the "tmpvetb00002.status_impresion" column
-#+
-#+ @param p_status_impresion - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpvetb00002_status_impresion_checkColumnConstraints(p_status_impresion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_impresion LIKE tmpvetb00002.status_impresion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpvetb00002_status_impresion_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpvetb00002_status_t_checkColumnConstraints">}
-#+ Check constraints on the "tmpvetb00002.status_t" column
-#+
-#+ @param p_status_t - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpvetb00002_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE tmpvetb00002.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpvetb00002_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpvetb00002_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "tmpvetb00002.us_crea" column
-#+
-#+ @param p_us_crea - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpvetb00002_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE tmpvetb00002.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpvetb00002_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpvetb00002_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "tmpvetb00002.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpvetb00002_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE tmpvetb00002.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpvetb00002_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpvetb00002_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "tmpvetb00002.us_mod" column
-#+
-#+ @param p_us_mod - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpvetb00002_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE tmpvetb00002.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpvetb00002_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpvetb00002_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "tmpvetb00002.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpvetb00002_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE tmpvetb00002.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpvetb00002_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpvetb00002_documento_checkColumnConstraints">}
-#+ Check constraints on the "tmpvetb00002.documento" column
-#+
-#+ @param p_documento - CHAR(15) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpvetb00002_documento_checkColumnConstraints(p_documento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_documento LIKE tmpvetb00002.documento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpvetb00002_documento_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpvetb00002_placa_transporte_checkColumnConstraints">}
-#+ Check constraints on the "tmpvetb00002.placa_transporte" column
-#+
-#+ @param p_placa_transporte - CHAR(25) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpvetb00002_placa_transporte_checkColumnConstraints(p_placa_transporte)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_placa_transporte LIKE tmpvetb00002.placa_transporte
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpvetb00002_placa_transporte_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpventas43_checkTableConstraints">}
-#+ Check constraints on the "tmpventas43" table
-#+
-#+ @param p_data - a row data LIKE tmpventas43.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpventas43_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE tmpventas43.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_tmpventas43_codlista_checkColumnConstraints(p_data.codlista) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpventas43_ventas_checkColumnConstraints(p_data.ventas) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpventas43_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpventas43_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpventas43_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpventas43_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpventas43_precio_checkColumnConstraints(p_data.precio) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpventas43_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpventas43_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpventas43_checkTableConstraints
-
-{<BLOCK Name="fct.tmpventas43_codlista_checkColumnConstraints">}
-#+ Check constraints on the "tmpventas43.codlista" column
-#+
-#+ @param p_codlista - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpventas43_codlista_checkColumnConstraints(p_codlista)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codlista LIKE tmpventas43.codlista
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpventas43_codlista_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpventas43_ventas_checkColumnConstraints">}
-#+ Check constraints on the "tmpventas43.ventas" column
-#+
-#+ @param p_ventas - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpventas43_ventas_checkColumnConstraints(p_ventas)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ventas LIKE tmpventas43.ventas
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpventas43_ventas_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpventas43_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "tmpventas43.cod_n" column
-#+
-#+ @param p_cod_n - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpventas43_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE tmpventas43.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpventas43_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpventas43_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "tmpventas43.cod_grupo" column
-#+
-#+ @param p_cod_grupo - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpventas43_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE tmpventas43.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpventas43_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpventas43_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "tmpventas43.cod_tipo" column
-#+
-#+ @param p_cod_tipo - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpventas43_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE tmpventas43.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpventas43_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpventas43_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "tmpventas43.cod_sec" column
-#+
-#+ @param p_cod_sec - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpventas43_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE tmpventas43.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpventas43_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpventas43_precio_checkColumnConstraints">}
-#+ Check constraints on the "tmpventas43.precio" column
-#+
-#+ @param p_precio - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpventas43_precio_checkColumnConstraints(p_precio)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_precio LIKE tmpventas43.precio
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpventas43_precio_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpventas43_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "tmpventas43.us_crea" column
-#+
-#+ @param p_us_crea - VARCHAR2(255) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpventas43_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE tmpventas43.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpventas43_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpventas43_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "tmpventas43.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpventas43_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE tmpventas43.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpventas43_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpventas_checkTableConstraints">}
-#+ Check constraints on the "tmpventas" table
-#+
-#+ @param p_data - a row data LIKE tmpventas.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpventas_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE tmpventas.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_tmpventas_descrip_checkColumnConstraints(p_data.descrip) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpventas_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpventas_vbruto_checkColumnConstraints(p_data.vbruto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpventas_ventasdia_checkColumnConstraints(p_data.ventasdia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpventas_checkTableConstraints
-
-{<BLOCK Name="fct.tmpventas_descrip_checkColumnConstraints">}
-#+ Check constraints on the "tmpventas.descrip" column
-#+
-#+ @param p_descrip - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpventas_descrip_checkColumnConstraints(p_descrip)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descrip LIKE tmpventas.descrip
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpventas_descrip_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpventas_descripcion_checkColumnConstraints">}
-#+ Check constraints on the "tmpventas.descripcion" column
-#+
-#+ @param p_descripcion - VARCHAR2(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpventas_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE tmpventas.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpventas_descripcion_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpventas_vbruto_checkColumnConstraints">}
-#+ Check constraints on the "tmpventas.vbruto" column
-#+
-#+ @param p_vbruto - CHAR(18) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpventas_vbruto_checkColumnConstraints(p_vbruto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_vbruto LIKE tmpventas.vbruto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpventas_vbruto_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpventas_ventasdia_checkColumnConstraints">}
-#+ Check constraints on the "tmpventas.ventasdia" column
-#+
-#+ @param p_ventasdia - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpventas_ventasdia_checkColumnConstraints(p_ventasdia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ventasdia LIKE tmpventas.ventasdia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_ventasdia IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- ventasdia: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpventas_ventasdia_checkColumnConstraints
-
-{<BLOCK Name="fct.tmptipo_checkTableConstraints">}
-#+ Check constraints on the "tmptipo" table
-#+
-#+ @param p_data - a row data LIKE tmptipo.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmptipo_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE tmptipo.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_tmptipo_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmptipo_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- CALL smarmotech_dbxconstraints_tmptipo_pk_tmptipo_checkUniqueConstraint(p_forUpdate, p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmptipo_checkTableConstraints
-
-{<BLOCK Name="fct.tmptipo_pk_tmptipo_checkUniqueConstraint">}
-#+ Check the primary key uniqueness constraint on the "tmptipo"
-#+
-#+ @param p_key - Primary Key
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmptipo_pk_tmptipo_checkUniqueConstraint(p_forUpdate, p_key)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_key
- RECORD
- tmptipo_cod_tipo LIKE tmptipo.cod_tipo
- END RECORD
- DEFINE l_key
- RECORD
- tmptipo_cod_tipo LIKE tmptipo.cod_tipo
- END RECORD
- DEFINE l_where STRING
- DEFINE l_sqlQuery STRING
- DEFINE l_count INTEGER
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- LET l_where = "WHERE tmptipo.cod_tipo = ? "
-
- let l_sqlQuery = "SELECT COUNT(*), cod_tipo FROM tmptipo ", l_where, " GROUP BY cod_tipo"
-
- PREPARE cur_tmptipo_pk_tmptipo_checkUniqueConstraint FROM l_sqlQuery
- EXECUTE cur_tmptipo_pk_tmptipo_checkUniqueConstraint INTO l_count, l_key.* USING p_key.*
- FREE cur_tmptipo_pk_tmptipo_checkUniqueConstraint
- IF (NOT p_forUpdate AND l_count > 0) OR (p_forUpdate AND l_count > 0 AND p_key.* != l_key.*) THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_tipo: " || ERROR_BAM_00002) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmptipo_pk_tmptipo_checkUniqueConstraint
-
-{<BLOCK Name="fct.tmptipo_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "tmptipo.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmptipo_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE tmptipo.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_tipo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_tipo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmptipo_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.tmptipo_descripcion_checkColumnConstraints">}
-#+ Check constraints on the "tmptipo.descripcion" column
-#+
-#+ @param p_descripcion - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmptipo_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE tmptipo.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmptipo_descripcion_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpproductos_checkTableConstraints">}
-#+ Check constraints on the "tmpproductos" table
-#+
-#+ @param p_data - a row data LIKE tmpproductos.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpproductos_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE tmpproductos.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_tmpproductos_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpproductos_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpproductos_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpproductos_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpproductos_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpproductos_checkTableConstraints
-
-{<BLOCK Name="fct.tmpproductos_descripcion_checkColumnConstraints">}
-#+ Check constraints on the "tmpproductos.descripcion" column
-#+
-#+ @param p_descripcion - CHAR(120) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpproductos_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE tmpproductos.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpproductos_descripcion_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpproductos_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "tmpproductos.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpproductos_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE tmpproductos.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpproductos_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpproductos_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "tmpproductos.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpproductos_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE tmpproductos.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpproductos_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpproductos_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "tmpproductos.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpproductos_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE tmpproductos.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpproductos_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpproductos_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "tmpproductos.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpproductos_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE tmpproductos.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpproductos_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.tmppreciosm2_checkTableConstraints">}
-#+ Check constraints on the "tmppreciosm2" table
-#+
-#+ @param p_data - a row data LIKE tmppreciosm2.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmppreciosm2_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE tmppreciosm2.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_tmppreciosm2_cod_lista_checkColumnConstraints(p_data.cod_lista) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmppreciosm2_ventas_checkColumnConstraints(p_data.ventas) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmppreciosm2_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmppreciosm2_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmppreciosm2_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmppreciosm2_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmppreciosm2_precio_checkColumnConstraints(p_data.precio) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmppreciosm2_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmppreciosm2_checkTableConstraints
-
-{<BLOCK Name="fct.tmppreciosm2_cod_lista_checkColumnConstraints">}
-#+ Check constraints on the "tmppreciosm2.cod_lista" column
-#+
-#+ @param p_cod_lista - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmppreciosm2_cod_lista_checkColumnConstraints(p_cod_lista)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_lista LIKE tmppreciosm2.cod_lista
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmppreciosm2_cod_lista_checkColumnConstraints
-
-{<BLOCK Name="fct.tmppreciosm2_ventas_checkColumnConstraints">}
-#+ Check constraints on the "tmppreciosm2.ventas" column
-#+
-#+ @param p_ventas - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmppreciosm2_ventas_checkColumnConstraints(p_ventas)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ventas LIKE tmppreciosm2.ventas
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmppreciosm2_ventas_checkColumnConstraints
-
-{<BLOCK Name="fct.tmppreciosm2_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "tmppreciosm2.cod_n" column
-#+
-#+ @param p_cod_n - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmppreciosm2_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE tmppreciosm2.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmppreciosm2_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.tmppreciosm2_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "tmppreciosm2.cod_grupo" column
-#+
-#+ @param p_cod_grupo - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmppreciosm2_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE tmppreciosm2.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmppreciosm2_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.tmppreciosm2_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "tmppreciosm2.cod_tipo" column
-#+
-#+ @param p_cod_tipo - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmppreciosm2_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE tmppreciosm2.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmppreciosm2_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.tmppreciosm2_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "tmppreciosm2.cod_sec" column
-#+
-#+ @param p_cod_sec - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmppreciosm2_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE tmppreciosm2.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmppreciosm2_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.tmppreciosm2_precio_checkColumnConstraints">}
-#+ Check constraints on the "tmppreciosm2.precio" column
-#+
-#+ @param p_precio - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmppreciosm2_precio_checkColumnConstraints(p_precio)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_precio LIKE tmppreciosm2.precio
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmppreciosm2_precio_checkColumnConstraints
-
-{<BLOCK Name="fct.tmppreciosm2_descripcion_checkColumnConstraints">}
-#+ Check constraints on the "tmppreciosm2.descripcion" column
-#+
-#+ @param p_descripcion - VARCHAR2(255) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmppreciosm2_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE tmppreciosm2.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmppreciosm2_descripcion_checkColumnConstraints
-
-{<BLOCK Name="fct.tmppreciosm1_checkTableConstraints">}
-#+ Check constraints on the "tmppreciosm1" table
-#+
-#+ @param p_data - a row data LIKE tmppreciosm1.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmppreciosm1_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE tmppreciosm1.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_tmppreciosm1_cod_lista_checkColumnConstraints(p_data.cod_lista) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmppreciosm1_ventas_checkColumnConstraints(p_data.ventas) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmppreciosm1_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmppreciosm1_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmppreciosm1_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmppreciosm1_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmppreciosm1_precio_checkColumnConstraints(p_data.precio) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmppreciosm1_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmppreciosm1_checkTableConstraints
-
-{<BLOCK Name="fct.tmppreciosm1_cod_lista_checkColumnConstraints">}
-#+ Check constraints on the "tmppreciosm1.cod_lista" column
-#+
-#+ @param p_cod_lista - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmppreciosm1_cod_lista_checkColumnConstraints(p_cod_lista)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_lista LIKE tmppreciosm1.cod_lista
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmppreciosm1_cod_lista_checkColumnConstraints
-
-{<BLOCK Name="fct.tmppreciosm1_ventas_checkColumnConstraints">}
-#+ Check constraints on the "tmppreciosm1.ventas" column
-#+
-#+ @param p_ventas - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmppreciosm1_ventas_checkColumnConstraints(p_ventas)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ventas LIKE tmppreciosm1.ventas
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmppreciosm1_ventas_checkColumnConstraints
-
-{<BLOCK Name="fct.tmppreciosm1_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "tmppreciosm1.cod_n" column
-#+
-#+ @param p_cod_n - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmppreciosm1_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE tmppreciosm1.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmppreciosm1_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.tmppreciosm1_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "tmppreciosm1.cod_grupo" column
-#+
-#+ @param p_cod_grupo - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmppreciosm1_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE tmppreciosm1.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmppreciosm1_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.tmppreciosm1_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "tmppreciosm1.cod_tipo" column
-#+
-#+ @param p_cod_tipo - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmppreciosm1_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE tmppreciosm1.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmppreciosm1_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.tmppreciosm1_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "tmppreciosm1.cod_sec" column
-#+
-#+ @param p_cod_sec - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmppreciosm1_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE tmppreciosm1.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmppreciosm1_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.tmppreciosm1_precio_checkColumnConstraints">}
-#+ Check constraints on the "tmppreciosm1.precio" column
-#+
-#+ @param p_precio - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmppreciosm1_precio_checkColumnConstraints(p_precio)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_precio LIKE tmppreciosm1.precio
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmppreciosm1_precio_checkColumnConstraints
-
-{<BLOCK Name="fct.tmppreciosm1_descripcion_checkColumnConstraints">}
-#+ Check constraints on the "tmppreciosm1.descripcion" column
-#+
-#+ @param p_descripcion - VARCHAR2(255) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmppreciosm1_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE tmppreciosm1.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmppreciosm1_descripcion_checkColumnConstraints
-
-{<BLOCK Name="fct.tmppreciosg2_checkTableConstraints">}
-#+ Check constraints on the "tmppreciosg2" table
-#+
-#+ @param p_data - a row data LIKE tmppreciosg2.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmppreciosg2_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE tmppreciosg2.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_tmppreciosg2_ventas_checkColumnConstraints(p_data.ventas) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmppreciosg2_cod_lista_checkColumnConstraints(p_data.cod_lista) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmppreciosg2_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmppreciosg2_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmppreciosg2_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmppreciosg2_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmppreciosg2_precio_checkColumnConstraints(p_data.precio) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmppreciosg2_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmppreciosg2_checkTableConstraints
-
-{<BLOCK Name="fct.tmppreciosg2_ventas_checkColumnConstraints">}
-#+ Check constraints on the "tmppreciosg2.ventas" column
-#+
-#+ @param p_ventas - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmppreciosg2_ventas_checkColumnConstraints(p_ventas)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ventas LIKE tmppreciosg2.ventas
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmppreciosg2_ventas_checkColumnConstraints
-
-{<BLOCK Name="fct.tmppreciosg2_cod_lista_checkColumnConstraints">}
-#+ Check constraints on the "tmppreciosg2.cod_lista" column
-#+
-#+ @param p_cod_lista - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmppreciosg2_cod_lista_checkColumnConstraints(p_cod_lista)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_lista LIKE tmppreciosg2.cod_lista
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmppreciosg2_cod_lista_checkColumnConstraints
-
-{<BLOCK Name="fct.tmppreciosg2_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "tmppreciosg2.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmppreciosg2_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE tmppreciosg2.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmppreciosg2_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.tmppreciosg2_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "tmppreciosg2.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmppreciosg2_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE tmppreciosg2.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmppreciosg2_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.tmppreciosg2_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "tmppreciosg2.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmppreciosg2_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE tmppreciosg2.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmppreciosg2_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.tmppreciosg2_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "tmppreciosg2.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmppreciosg2_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE tmppreciosg2.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmppreciosg2_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.tmppreciosg2_precio_checkColumnConstraints">}
-#+ Check constraints on the "tmppreciosg2.precio" column
-#+
-#+ @param p_precio - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmppreciosg2_precio_checkColumnConstraints(p_precio)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_precio LIKE tmppreciosg2.precio
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmppreciosg2_precio_checkColumnConstraints
-
-{<BLOCK Name="fct.tmppreciosg2_descripcion_checkColumnConstraints">}
-#+ Check constraints on the "tmppreciosg2.descripcion" column
-#+
-#+ @param p_descripcion - VARCHAR2(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmppreciosg2_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE tmppreciosg2.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmppreciosg2_descripcion_checkColumnConstraints
-
-{<BLOCK Name="fct.tmppreciosg1_checkTableConstraints">}
-#+ Check constraints on the "tmppreciosg1" table
-#+
-#+ @param p_data - a row data LIKE tmppreciosg1.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmppreciosg1_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE tmppreciosg1.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_tmppreciosg1_ventas_checkColumnConstraints(p_data.ventas) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmppreciosg1_cod_lista_checkColumnConstraints(p_data.cod_lista) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmppreciosg1_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmppreciosg1_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmppreciosg1_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmppreciosg1_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmppreciosg1_precio_checkColumnConstraints(p_data.precio) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmppreciosg1_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmppreciosg1_checkTableConstraints
-
-{<BLOCK Name="fct.tmppreciosg1_ventas_checkColumnConstraints">}
-#+ Check constraints on the "tmppreciosg1.ventas" column
-#+
-#+ @param p_ventas - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmppreciosg1_ventas_checkColumnConstraints(p_ventas)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ventas LIKE tmppreciosg1.ventas
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmppreciosg1_ventas_checkColumnConstraints
-
-{<BLOCK Name="fct.tmppreciosg1_cod_lista_checkColumnConstraints">}
-#+ Check constraints on the "tmppreciosg1.cod_lista" column
-#+
-#+ @param p_cod_lista - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmppreciosg1_cod_lista_checkColumnConstraints(p_cod_lista)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_lista LIKE tmppreciosg1.cod_lista
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmppreciosg1_cod_lista_checkColumnConstraints
-
-{<BLOCK Name="fct.tmppreciosg1_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "tmppreciosg1.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmppreciosg1_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE tmppreciosg1.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmppreciosg1_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.tmppreciosg1_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "tmppreciosg1.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmppreciosg1_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE tmppreciosg1.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmppreciosg1_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.tmppreciosg1_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "tmppreciosg1.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmppreciosg1_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE tmppreciosg1.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmppreciosg1_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.tmppreciosg1_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "tmppreciosg1.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmppreciosg1_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE tmppreciosg1.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmppreciosg1_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.tmppreciosg1_precio_checkColumnConstraints">}
-#+ Check constraints on the "tmppreciosg1.precio" column
-#+
-#+ @param p_precio - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmppreciosg1_precio_checkColumnConstraints(p_precio)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_precio LIKE tmppreciosg1.precio
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmppreciosg1_precio_checkColumnConstraints
-
-{<BLOCK Name="fct.tmppreciosg1_descripcion_checkColumnConstraints">}
-#+ Check constraints on the "tmppreciosg1.descripcion" column
-#+
-#+ @param p_descripcion - VARCHAR2(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmppreciosg1_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE tmppreciosg1.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmppreciosg1_descripcion_checkColumnConstraints
-
-{<BLOCK Name="fct.tmppreciosferia_checkTableConstraints">}
-#+ Check constraints on the "tmppreciosferia" table
-#+
-#+ @param p_data - a row data LIKE tmppreciosferia.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmppreciosferia_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE tmppreciosferia.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_tmppreciosferia_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmppreciosferia_cod_lista_checkColumnConstraints(p_data.cod_lista) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmppreciosferia_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmppreciosferia_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmppreciosferia_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmppreciosferia_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmppreciosferia_precio_checkColumnConstraints(p_data.precio) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmppreciosferia_f8_checkColumnConstraints(p_data.f8) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmppreciosferia_f9_checkColumnConstraints(p_data.f9) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmppreciosferia_f10_checkColumnConstraints(p_data.f10) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmppreciosferia_f11_checkColumnConstraints(p_data.f11) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmppreciosferia_checkTableConstraints
-
-{<BLOCK Name="fct.tmppreciosferia_descripcion_checkColumnConstraints">}
-#+ Check constraints on the "tmppreciosferia.descripcion" column
-#+
-#+ @param p_descripcion - VARCHAR2(255) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmppreciosferia_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE tmppreciosferia.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmppreciosferia_descripcion_checkColumnConstraints
-
-{<BLOCK Name="fct.tmppreciosferia_cod_lista_checkColumnConstraints">}
-#+ Check constraints on the "tmppreciosferia.cod_lista" column
-#+
-#+ @param p_cod_lista - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmppreciosferia_cod_lista_checkColumnConstraints(p_cod_lista)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_lista LIKE tmppreciosferia.cod_lista
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmppreciosferia_cod_lista_checkColumnConstraints
-
-{<BLOCK Name="fct.tmppreciosferia_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "tmppreciosferia.cod_n" column
-#+
-#+ @param p_cod_n - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmppreciosferia_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE tmppreciosferia.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmppreciosferia_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.tmppreciosferia_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "tmppreciosferia.cod_grupo" column
-#+
-#+ @param p_cod_grupo - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmppreciosferia_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE tmppreciosferia.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmppreciosferia_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.tmppreciosferia_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "tmppreciosferia.cod_tipo" column
-#+
-#+ @param p_cod_tipo - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmppreciosferia_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE tmppreciosferia.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmppreciosferia_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.tmppreciosferia_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "tmppreciosferia.cod_sec" column
-#+
-#+ @param p_cod_sec - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmppreciosferia_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE tmppreciosferia.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmppreciosferia_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.tmppreciosferia_precio_checkColumnConstraints">}
-#+ Check constraints on the "tmppreciosferia.precio" column
-#+
-#+ @param p_precio - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmppreciosferia_precio_checkColumnConstraints(p_precio)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_precio LIKE tmppreciosferia.precio
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmppreciosferia_precio_checkColumnConstraints
-
-{<BLOCK Name="fct.tmppreciosferia_f8_checkColumnConstraints">}
-#+ Check constraints on the "tmppreciosferia.f8" column
-#+
-#+ @param p_f8 - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmppreciosferia_f8_checkColumnConstraints(p_f8)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_f8 LIKE tmppreciosferia.f8
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmppreciosferia_f8_checkColumnConstraints
-
-{<BLOCK Name="fct.tmppreciosferia_f9_checkColumnConstraints">}
-#+ Check constraints on the "tmppreciosferia.f9" column
-#+
-#+ @param p_f9 - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmppreciosferia_f9_checkColumnConstraints(p_f9)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_f9 LIKE tmppreciosferia.f9
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmppreciosferia_f9_checkColumnConstraints
-
-{<BLOCK Name="fct.tmppreciosferia_f10_checkColumnConstraints">}
-#+ Check constraints on the "tmppreciosferia.f10" column
-#+
-#+ @param p_f10 - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmppreciosferia_f10_checkColumnConstraints(p_f10)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_f10 LIKE tmppreciosferia.f10
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmppreciosferia_f10_checkColumnConstraints
-
-{<BLOCK Name="fct.tmppreciosferia_f11_checkColumnConstraints">}
-#+ Check constraints on the "tmppreciosferia.f11" column
-#+
-#+ @param p_f11 - VARCHAR2(255) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmppreciosferia_f11_checkColumnConstraints(p_f11)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_f11 LIKE tmppreciosferia.f11
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmppreciosferia_f11_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpplanchas_checkTableConstraints">}
-#+ Check constraints on the "tmpplanchas" table
-#+
-#+ @param p_data - a row data LIKE tmpplanchas.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpplanchas_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE tmpplanchas.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_tmpplanchas_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpplanchas_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpplanchas_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpplanchas_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpplanchas_material_checkColumnConstraints(p_data.material) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpplanchas_labor_checkColumnConstraints(p_data.labor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpplanchas_gasto_checkColumnConstraints(p_data.gasto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpplanchas_checkTableConstraints
-
-{<BLOCK Name="fct.tmpplanchas_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "tmpplanchas.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpplanchas_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE tmpplanchas.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpplanchas_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpplanchas_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "tmpplanchas.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpplanchas_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE tmpplanchas.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpplanchas_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpplanchas_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "tmpplanchas.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpplanchas_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE tmpplanchas.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpplanchas_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpplanchas_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "tmpplanchas.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpplanchas_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE tmpplanchas.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpplanchas_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpplanchas_material_checkColumnConstraints">}
-#+ Check constraints on the "tmpplanchas.material" column
-#+
-#+ @param p_material - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpplanchas_material_checkColumnConstraints(p_material)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_material LIKE tmpplanchas.material
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpplanchas_material_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpplanchas_labor_checkColumnConstraints">}
-#+ Check constraints on the "tmpplanchas.labor" column
-#+
-#+ @param p_labor - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpplanchas_labor_checkColumnConstraints(p_labor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_labor LIKE tmpplanchas.labor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpplanchas_labor_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpplanchas_gasto_checkColumnConstraints">}
-#+ Check constraints on the "tmpplanchas.gasto" column
-#+
-#+ @param p_gasto - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpplanchas_gasto_checkColumnConstraints(p_gasto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_gasto LIKE tmpplanchas.gasto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpplanchas_gasto_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpordenes_checkTableConstraints">}
-#+ Check constraints on the "tmpordenes" table
-#+
-#+ @param p_data - a row data LIKE tmpordenes.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpordenes_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE tmpordenes.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_tmpordenes_num_oc_checkColumnConstraints(p_data.num_oc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpordenes_cantidad_orden_checkColumnConstraints(p_data.cantidad_orden) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpordenes_cantidad_conduce_checkColumnConstraints(p_data.cantidad_conduce) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpordenes_diferencia_checkColumnConstraints(p_data.diferencia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpordenes_checkTableConstraints
-
-{<BLOCK Name="fct.tmpordenes_num_oc_checkColumnConstraints">}
-#+ Check constraints on the "tmpordenes.num_oc" column
-#+
-#+ @param p_num_oc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpordenes_num_oc_checkColumnConstraints(p_num_oc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_oc LIKE tmpordenes.num_oc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpordenes_num_oc_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpordenes_cantidad_orden_checkColumnConstraints">}
-#+ Check constraints on the "tmpordenes.cantidad_orden" column
-#+
-#+ @param p_cantidad_orden - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpordenes_cantidad_orden_checkColumnConstraints(p_cantidad_orden)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad_orden LIKE tmpordenes.cantidad_orden
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpordenes_cantidad_orden_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpordenes_cantidad_conduce_checkColumnConstraints">}
-#+ Check constraints on the "tmpordenes.cantidad_conduce" column
-#+
-#+ @param p_cantidad_conduce - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpordenes_cantidad_conduce_checkColumnConstraints(p_cantidad_conduce)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad_conduce LIKE tmpordenes.cantidad_conduce
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpordenes_cantidad_conduce_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpordenes_diferencia_checkColumnConstraints">}
-#+ Check constraints on the "tmpordenes.diferencia" column
-#+
-#+ @param p_diferencia - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpordenes_diferencia_checkColumnConstraints(p_diferencia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_diferencia LIKE tmpordenes.diferencia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpordenes_diferencia_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpmedida_checkTableConstraints">}
-#+ Check constraints on the "tmpmedida" table
-#+
-#+ @param p_data - a row data LIKE tmpmedida.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpmedida_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE tmpmedida.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_tmpmedida_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpmedida_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- CALL smarmotech_dbxconstraints_tmpmedida_pk_tmpmedida_checkUniqueConstraint(p_forUpdate, p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpmedida_checkTableConstraints
-
-{<BLOCK Name="fct.tmpmedida_pk_tmpmedida_checkUniqueConstraint">}
-#+ Check the primary key uniqueness constraint on the "tmpmedida"
-#+
-#+ @param p_key - Primary Key
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpmedida_pk_tmpmedida_checkUniqueConstraint(p_forUpdate, p_key)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_key
- RECORD
- tmpmedida_cod_sec LIKE tmpmedida.cod_sec
- END RECORD
- DEFINE l_key
- RECORD
- tmpmedida_cod_sec LIKE tmpmedida.cod_sec
- END RECORD
- DEFINE l_where STRING
- DEFINE l_sqlQuery STRING
- DEFINE l_count INTEGER
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- LET l_where = "WHERE tmpmedida.cod_sec = ? "
-
- let l_sqlQuery = "SELECT COUNT(*), cod_sec FROM tmpmedida ", l_where, " GROUP BY cod_sec"
-
- PREPARE cur_tmpmedida_pk_tmpmedida_checkUniqueConstraint FROM l_sqlQuery
- EXECUTE cur_tmpmedida_pk_tmpmedida_checkUniqueConstraint INTO l_count, l_key.* USING p_key.*
- FREE cur_tmpmedida_pk_tmpmedida_checkUniqueConstraint
- IF (NOT p_forUpdate AND l_count > 0) OR (p_forUpdate AND l_count > 0 AND p_key.* != l_key.*) THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_sec: " || ERROR_BAM_00002) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpmedida_pk_tmpmedida_checkUniqueConstraint
-
-{<BLOCK Name="fct.tmpmedida_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "tmpmedida.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpmedida_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE tmpmedida.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_sec IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_sec: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpmedida_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpmedida_descripcion_checkColumnConstraints">}
-#+ Check constraints on the "tmpmedida.descripcion" column
-#+
-#+ @param p_descripcion - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpmedida_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE tmpmedida.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpmedida_descripcion_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpmatprima_checkTableConstraints">}
-#+ Check constraints on the "tmpmatprima" table
-#+
-#+ @param p_data - a row data LIKE tmpmatprima.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpmatprima_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE tmpmatprima.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_tmpmatprima_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpmatprima_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpmatprima_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpmatprima_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpmatprima_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpmatprima_checkTableConstraints
-
-{<BLOCK Name="fct.tmpmatprima_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "tmpmatprima.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpmatprima_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE tmpmatprima.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpmatprima_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpmatprima_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "tmpmatprima.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpmatprima_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE tmpmatprima.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpmatprima_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpmatprima_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "tmpmatprima.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpmatprima_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE tmpmatprima.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpmatprima_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpmatprima_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "tmpmatprima.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpmatprima_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE tmpmatprima.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpmatprima_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpmatprima_cantidad_checkColumnConstraints">}
-#+ Check constraints on the "tmpmatprima.cantidad" column
-#+
-#+ @param p_cantidad - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpmatprima_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE tmpmatprima.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpmatprima_cantidad_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpiptb012_checkTableConstraints">}
-#+ Check constraints on the "tmpiptb012" table
-#+
-#+ @param p_data - a row data LIKE tmpiptb012.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb012_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE tmpiptb012.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_tmpiptb012_idtrx_checkColumnConstraints(p_data.idtrx) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb012_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb012_bodega_checkColumnConstraints(p_data.bodega) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb012_cod_seccion_checkColumnConstraints(p_data.cod_seccion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb012_cod_tramo_checkColumnConstraints(p_data.cod_tramo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb012_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb012_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb012_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb012_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb012_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb012_balance_checkColumnConstraints(p_data.balance) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb012_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb012_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb012_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb012_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb012_lado_1_checkColumnConstraints(p_data.lado_1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb012_lado_2_checkColumnConstraints(p_data.lado_2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb012_lado_3_checkColumnConstraints(p_data.lado_3) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpiptb012_checkTableConstraints
-
-{<BLOCK Name="fct.tmpiptb012_idtrx_checkColumnConstraints">}
-#+ Check constraints on the "tmpiptb012.idtrx" column
-#+
-#+ @param p_idtrx - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb012_idtrx_checkColumnConstraints(p_idtrx)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_idtrx LIKE tmpiptb012.idtrx
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpiptb012_idtrx_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpiptb012_fecha_checkColumnConstraints">}
-#+ Check constraints on the "tmpiptb012.fecha" column
-#+
-#+ @param p_fecha - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb012_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE tmpiptb012.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpiptb012_fecha_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpiptb012_bodega_checkColumnConstraints">}
-#+ Check constraints on the "tmpiptb012.bodega" column
-#+
-#+ @param p_bodega - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb012_bodega_checkColumnConstraints(p_bodega)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_bodega LIKE tmpiptb012.bodega
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpiptb012_bodega_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpiptb012_cod_seccion_checkColumnConstraints">}
-#+ Check constraints on the "tmpiptb012.cod_seccion" column
-#+
-#+ @param p_cod_seccion - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb012_cod_seccion_checkColumnConstraints(p_cod_seccion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_seccion LIKE tmpiptb012.cod_seccion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpiptb012_cod_seccion_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpiptb012_cod_tramo_checkColumnConstraints">}
-#+ Check constraints on the "tmpiptb012.cod_tramo" column
-#+
-#+ @param p_cod_tramo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb012_cod_tramo_checkColumnConstraints(p_cod_tramo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tramo LIKE tmpiptb012.cod_tramo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpiptb012_cod_tramo_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpiptb012_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "tmpiptb012.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb012_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE tmpiptb012.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpiptb012_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpiptb012_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "tmpiptb012.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb012_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE tmpiptb012.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpiptb012_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpiptb012_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "tmpiptb012.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb012_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE tmpiptb012.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpiptb012_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpiptb012_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "tmpiptb012.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb012_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE tmpiptb012.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpiptb012_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpiptb012_cantidad_checkColumnConstraints">}
-#+ Check constraints on the "tmpiptb012.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb012_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE tmpiptb012.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpiptb012_cantidad_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpiptb012_balance_checkColumnConstraints">}
-#+ Check constraints on the "tmpiptb012.balance" column
-#+
-#+ @param p_balance - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb012_balance_checkColumnConstraints(p_balance)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_balance LIKE tmpiptb012.balance
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpiptb012_balance_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpiptb012_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "tmpiptb012.us_crea" column
-#+
-#+ @param p_us_crea - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb012_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE tmpiptb012.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpiptb012_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpiptb012_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "tmpiptb012.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb012_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE tmpiptb012.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpiptb012_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpiptb012_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "tmpiptb012.us_mod" column
-#+
-#+ @param p_us_mod - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb012_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE tmpiptb012.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpiptb012_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpiptb012_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "tmpiptb012.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb012_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE tmpiptb012.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpiptb012_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpiptb012_lado_1_checkColumnConstraints">}
-#+ Check constraints on the "tmpiptb012.lado_1" column
-#+
-#+ @param p_lado_1 - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb012_lado_1_checkColumnConstraints(p_lado_1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_lado_1 LIKE tmpiptb012.lado_1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpiptb012_lado_1_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpiptb012_lado_2_checkColumnConstraints">}
-#+ Check constraints on the "tmpiptb012.lado_2" column
-#+
-#+ @param p_lado_2 - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb012_lado_2_checkColumnConstraints(p_lado_2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_lado_2 LIKE tmpiptb012.lado_2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpiptb012_lado_2_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpiptb012_lado_3_checkColumnConstraints">}
-#+ Check constraints on the "tmpiptb012.lado_3" column
-#+
-#+ @param p_lado_3 - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb012_lado_3_checkColumnConstraints(p_lado_3)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_lado_3 LIKE tmpiptb012.lado_3
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpiptb012_lado_3_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpiptb00027_checkTableConstraints">}
-#+ Check constraints on the "tmpiptb00027" table
-#+
-#+ @param p_data - a row data LIKE tmpiptb00027.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00027_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE tmpiptb00027.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_tmpiptb00027_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00027_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00027_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00027_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpiptb00027_checkTableConstraints
-
-{<BLOCK Name="fct.tmpiptb00027_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "tmpiptb00027.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00027_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE tmpiptb00027.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpiptb00027_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpiptb00027_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "tmpiptb00027.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00027_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE tmpiptb00027.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpiptb00027_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpiptb00027_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "tmpiptb00027.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00027_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE tmpiptb00027.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpiptb00027_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpiptb00027_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "tmpiptb00027.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00027_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE tmpiptb00027.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpiptb00027_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpiptb00012_checkTableConstraints">}
-#+ Check constraints on the "tmpiptb00012" table
-#+
-#+ @param p_data - a row data LIKE tmpiptb00012.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00012_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE tmpiptb00012.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_tmpiptb00012_idtrx_checkColumnConstraints(p_data.idtrx) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00012_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00012_bodega_checkColumnConstraints(p_data.bodega) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00012_cod_seccion_checkColumnConstraints(p_data.cod_seccion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00012_cod_tramo_checkColumnConstraints(p_data.cod_tramo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00012_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00012_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00012_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00012_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00012_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00012_balance_checkColumnConstraints(p_data.balance) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00012_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00012_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00012_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00012_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00012_lado_1_checkColumnConstraints(p_data.lado_1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00012_lado_2_checkColumnConstraints(p_data.lado_2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00012_lado_3_checkColumnConstraints(p_data.lado_3) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpiptb00012_checkTableConstraints
-
-{<BLOCK Name="fct.tmpiptb00012_idtrx_checkColumnConstraints">}
-#+ Check constraints on the "tmpiptb00012.idtrx" column
-#+
-#+ @param p_idtrx - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00012_idtrx_checkColumnConstraints(p_idtrx)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_idtrx LIKE tmpiptb00012.idtrx
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpiptb00012_idtrx_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpiptb00012_fecha_checkColumnConstraints">}
-#+ Check constraints on the "tmpiptb00012.fecha" column
-#+
-#+ @param p_fecha - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00012_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE tmpiptb00012.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpiptb00012_fecha_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpiptb00012_bodega_checkColumnConstraints">}
-#+ Check constraints on the "tmpiptb00012.bodega" column
-#+
-#+ @param p_bodega - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00012_bodega_checkColumnConstraints(p_bodega)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_bodega LIKE tmpiptb00012.bodega
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpiptb00012_bodega_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpiptb00012_cod_seccion_checkColumnConstraints">}
-#+ Check constraints on the "tmpiptb00012.cod_seccion" column
-#+
-#+ @param p_cod_seccion - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00012_cod_seccion_checkColumnConstraints(p_cod_seccion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_seccion LIKE tmpiptb00012.cod_seccion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpiptb00012_cod_seccion_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpiptb00012_cod_tramo_checkColumnConstraints">}
-#+ Check constraints on the "tmpiptb00012.cod_tramo" column
-#+
-#+ @param p_cod_tramo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00012_cod_tramo_checkColumnConstraints(p_cod_tramo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tramo LIKE tmpiptb00012.cod_tramo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpiptb00012_cod_tramo_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpiptb00012_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "tmpiptb00012.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00012_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE tmpiptb00012.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpiptb00012_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpiptb00012_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "tmpiptb00012.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00012_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE tmpiptb00012.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpiptb00012_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpiptb00012_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "tmpiptb00012.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00012_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE tmpiptb00012.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpiptb00012_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpiptb00012_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "tmpiptb00012.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00012_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE tmpiptb00012.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpiptb00012_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpiptb00012_cantidad_checkColumnConstraints">}
-#+ Check constraints on the "tmpiptb00012.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00012_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE tmpiptb00012.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpiptb00012_cantidad_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpiptb00012_balance_checkColumnConstraints">}
-#+ Check constraints on the "tmpiptb00012.balance" column
-#+
-#+ @param p_balance - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00012_balance_checkColumnConstraints(p_balance)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_balance LIKE tmpiptb00012.balance
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpiptb00012_balance_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpiptb00012_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "tmpiptb00012.us_crea" column
-#+
-#+ @param p_us_crea - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00012_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE tmpiptb00012.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpiptb00012_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpiptb00012_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "tmpiptb00012.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00012_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE tmpiptb00012.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpiptb00012_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpiptb00012_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "tmpiptb00012.us_mod" column
-#+
-#+ @param p_us_mod - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00012_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE tmpiptb00012.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpiptb00012_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpiptb00012_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "tmpiptb00012.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00012_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE tmpiptb00012.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpiptb00012_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpiptb00012_lado_1_checkColumnConstraints">}
-#+ Check constraints on the "tmpiptb00012.lado_1" column
-#+
-#+ @param p_lado_1 - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00012_lado_1_checkColumnConstraints(p_lado_1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_lado_1 LIKE tmpiptb00012.lado_1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpiptb00012_lado_1_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpiptb00012_lado_2_checkColumnConstraints">}
-#+ Check constraints on the "tmpiptb00012.lado_2" column
-#+
-#+ @param p_lado_2 - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00012_lado_2_checkColumnConstraints(p_lado_2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_lado_2 LIKE tmpiptb00012.lado_2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpiptb00012_lado_2_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpiptb00012_lado_3_checkColumnConstraints">}
-#+ Check constraints on the "tmpiptb00012.lado_3" column
-#+
-#+ @param p_lado_3 - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00012_lado_3_checkColumnConstraints(p_lado_3)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_lado_3 LIKE tmpiptb00012.lado_3
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpiptb00012_lado_3_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpiptb00006_checkTableConstraints">}
-#+ Check constraints on the "tmpiptb00006" table
-#+
-#+ @param p_data - a row data LIKE tmpiptb00006.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00006_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE tmpiptb00006.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_tmpiptb00006_cod_cia_checkColumnConstraints(p_data.cod_cia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00006_num_doc_checkColumnConstraints(p_data.num_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00006_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00006_fact_no_checkColumnConstraints(p_data.fact_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00006_conduce_no_checkColumnConstraints(p_data.conduce_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00006_tipo_checkColumnConstraints(p_data.tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00006_orden_compra_checkColumnConstraints(p_data.orden_compra) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00006_cod_sp_checkColumnConstraints(p_data.cod_sp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00006_cod_sp_sec_checkColumnConstraints(p_data.cod_sp_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00006_cod_transp_checkColumnConstraints(p_data.cod_transp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00006_sec_transp_checkColumnConstraints(p_data.sec_transp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00006_placa_checkColumnConstraints(p_data.placa) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00006_cod_tarifa_checkColumnConstraints(p_data.cod_tarifa) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00006_cod_mov_checkColumnConstraints(p_data.cod_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00006_detalle_checkColumnConstraints(p_data.detalle) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00006_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00006_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00006_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00006_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00006_cantidad_1_checkColumnConstraints(p_data.cantidad_1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00006_cantidad_2_checkColumnConstraints(p_data.cantidad_2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00006_cond_recep_checkColumnConstraints(p_data.cond_recep) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00006_uso_tiempo_checkColumnConstraints(p_data.uso_tiempo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00006_bodega_checkColumnConstraints(p_data.bodega) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00006_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00006_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00006_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00006_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00006_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00006_num_req_checkColumnConstraints(p_data.num_req) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpiptb00006_checkTableConstraints
-
-{<BLOCK Name="fct.tmpiptb00006_cod_cia_checkColumnConstraints">}
-#+ Check constraints on the "tmpiptb00006.cod_cia" column
-#+
-#+ @param p_cod_cia - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00006_cod_cia_checkColumnConstraints(p_cod_cia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_cia LIKE tmpiptb00006.cod_cia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpiptb00006_cod_cia_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpiptb00006_num_doc_checkColumnConstraints">}
-#+ Check constraints on the "tmpiptb00006.num_doc" column
-#+
-#+ @param p_num_doc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00006_num_doc_checkColumnConstraints(p_num_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_doc LIKE tmpiptb00006.num_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_num_doc IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- num_doc: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpiptb00006_num_doc_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpiptb00006_fecha_checkColumnConstraints">}
-#+ Check constraints on the "tmpiptb00006.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00006_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE tmpiptb00006.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_fecha IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- fecha: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpiptb00006_fecha_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpiptb00006_fact_no_checkColumnConstraints">}
-#+ Check constraints on the "tmpiptb00006.fact_no" column
-#+
-#+ @param p_fact_no - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00006_fact_no_checkColumnConstraints(p_fact_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fact_no LIKE tmpiptb00006.fact_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpiptb00006_fact_no_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpiptb00006_conduce_no_checkColumnConstraints">}
-#+ Check constraints on the "tmpiptb00006.conduce_no" column
-#+
-#+ @param p_conduce_no - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00006_conduce_no_checkColumnConstraints(p_conduce_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_conduce_no LIKE tmpiptb00006.conduce_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpiptb00006_conduce_no_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpiptb00006_tipo_checkColumnConstraints">}
-#+ Check constraints on the "tmpiptb00006.tipo" column
-#+
-#+ @param p_tipo - CHAR(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00006_tipo_checkColumnConstraints(p_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo LIKE tmpiptb00006.tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpiptb00006_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpiptb00006_orden_compra_checkColumnConstraints">}
-#+ Check constraints on the "tmpiptb00006.orden_compra" column
-#+
-#+ @param p_orden_compra - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00006_orden_compra_checkColumnConstraints(p_orden_compra)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_orden_compra LIKE tmpiptb00006.orden_compra
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpiptb00006_orden_compra_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpiptb00006_cod_sp_checkColumnConstraints">}
-#+ Check constraints on the "tmpiptb00006.cod_sp" column
-#+
-#+ @param p_cod_sp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00006_cod_sp_checkColumnConstraints(p_cod_sp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sp LIKE tmpiptb00006.cod_sp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpiptb00006_cod_sp_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpiptb00006_cod_sp_sec_checkColumnConstraints">}
-#+ Check constraints on the "tmpiptb00006.cod_sp_sec" column
-#+
-#+ @param p_cod_sp_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00006_cod_sp_sec_checkColumnConstraints(p_cod_sp_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sp_sec LIKE tmpiptb00006.cod_sp_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpiptb00006_cod_sp_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpiptb00006_cod_transp_checkColumnConstraints">}
-#+ Check constraints on the "tmpiptb00006.cod_transp" column
-#+
-#+ @param p_cod_transp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00006_cod_transp_checkColumnConstraints(p_cod_transp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_transp LIKE tmpiptb00006.cod_transp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpiptb00006_cod_transp_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpiptb00006_sec_transp_checkColumnConstraints">}
-#+ Check constraints on the "tmpiptb00006.sec_transp" column
-#+
-#+ @param p_sec_transp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00006_sec_transp_checkColumnConstraints(p_sec_transp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_transp LIKE tmpiptb00006.sec_transp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpiptb00006_sec_transp_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpiptb00006_placa_checkColumnConstraints">}
-#+ Check constraints on the "tmpiptb00006.placa" column
-#+
-#+ @param p_placa - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00006_placa_checkColumnConstraints(p_placa)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_placa LIKE tmpiptb00006.placa
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpiptb00006_placa_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpiptb00006_cod_tarifa_checkColumnConstraints">}
-#+ Check constraints on the "tmpiptb00006.cod_tarifa" column
-#+
-#+ @param p_cod_tarifa - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00006_cod_tarifa_checkColumnConstraints(p_cod_tarifa)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tarifa LIKE tmpiptb00006.cod_tarifa
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpiptb00006_cod_tarifa_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpiptb00006_cod_mov_checkColumnConstraints">}
-#+ Check constraints on the "tmpiptb00006.cod_mov" column
-#+
-#+ @param p_cod_mov - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00006_cod_mov_checkColumnConstraints(p_cod_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mov LIKE tmpiptb00006.cod_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_mov IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_mov: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpiptb00006_cod_mov_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpiptb00006_detalle_checkColumnConstraints">}
-#+ Check constraints on the "tmpiptb00006.detalle" column
-#+
-#+ @param p_detalle - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00006_detalle_checkColumnConstraints(p_detalle)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_detalle LIKE tmpiptb00006.detalle
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpiptb00006_detalle_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpiptb00006_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "tmpiptb00006.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00006_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE tmpiptb00006.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_n IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_n: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpiptb00006_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpiptb00006_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "tmpiptb00006.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00006_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE tmpiptb00006.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_grupo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_grupo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpiptb00006_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpiptb00006_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "tmpiptb00006.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00006_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE tmpiptb00006.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_tipo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_tipo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpiptb00006_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpiptb00006_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "tmpiptb00006.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00006_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE tmpiptb00006.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_sec IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_sec: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpiptb00006_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpiptb00006_cantidad_1_checkColumnConstraints">}
-#+ Check constraints on the "tmpiptb00006.cantidad_1" column
-#+
-#+ @param p_cantidad_1 - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00006_cantidad_1_checkColumnConstraints(p_cantidad_1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad_1 LIKE tmpiptb00006.cantidad_1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpiptb00006_cantidad_1_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpiptb00006_cantidad_2_checkColumnConstraints">}
-#+ Check constraints on the "tmpiptb00006.cantidad_2" column
-#+
-#+ @param p_cantidad_2 - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00006_cantidad_2_checkColumnConstraints(p_cantidad_2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad_2 LIKE tmpiptb00006.cantidad_2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cantidad_2 IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cantidad_2: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpiptb00006_cantidad_2_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpiptb00006_cond_recep_checkColumnConstraints">}
-#+ Check constraints on the "tmpiptb00006.cond_recep" column
-#+
-#+ @param p_cond_recep - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00006_cond_recep_checkColumnConstraints(p_cond_recep)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cond_recep LIKE tmpiptb00006.cond_recep
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpiptb00006_cond_recep_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpiptb00006_uso_tiempo_checkColumnConstraints">}
-#+ Check constraints on the "tmpiptb00006.uso_tiempo" column
-#+
-#+ @param p_uso_tiempo - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00006_uso_tiempo_checkColumnConstraints(p_uso_tiempo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_uso_tiempo LIKE tmpiptb00006.uso_tiempo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpiptb00006_uso_tiempo_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpiptb00006_bodega_checkColumnConstraints">}
-#+ Check constraints on the "tmpiptb00006.bodega" column
-#+
-#+ @param p_bodega - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00006_bodega_checkColumnConstraints(p_bodega)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_bodega LIKE tmpiptb00006.bodega
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpiptb00006_bodega_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpiptb00006_status_t_checkColumnConstraints">}
-#+ Check constraints on the "tmpiptb00006.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00006_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE tmpiptb00006.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpiptb00006_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpiptb00006_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "tmpiptb00006.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00006_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE tmpiptb00006.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpiptb00006_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpiptb00006_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "tmpiptb00006.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00006_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE tmpiptb00006.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpiptb00006_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpiptb00006_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "tmpiptb00006.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00006_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE tmpiptb00006.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpiptb00006_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpiptb00006_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "tmpiptb00006.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00006_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE tmpiptb00006.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpiptb00006_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpiptb00006_num_req_checkColumnConstraints">}
-#+ Check constraints on the "tmpiptb00006.num_req" column
-#+
-#+ @param p_num_req - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00006_num_req_checkColumnConstraints(p_num_req)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_req LIKE tmpiptb00006.num_req
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpiptb00006_num_req_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpiptb00002_checkTableConstraints">}
-#+ Check constraints on the "tmpiptb00002" table
-#+
-#+ @param p_data - a row data LIKE tmpiptb00002.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00002_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE tmpiptb00002.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_tmpiptb00002_cod_cia_checkColumnConstraints(p_data.cod_cia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00002_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00002_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00002_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00002_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00002_descrip_esp_checkColumnConstraints(p_data.descrip_esp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00002_descrip_ing_checkColumnConstraints(p_data.descrip_ing) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00002_unidad_med_checkColumnConstraints(p_data.unidad_med) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00002_nomenclatura_checkColumnConstraints(p_data.nomenclatura) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00002_bodega_checkColumnConstraints(p_data.bodega) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00002_exist_max_checkColumnConstraints(p_data.exist_max) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00002_exist_min_checkColumnConstraints(p_data.exist_min) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00002_dia_llegada_checkColumnConstraints(p_data.dia_llegada) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00002_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00002_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00002_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00002_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00002_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00002_control_existencia_checkColumnConstraints(p_data.control_existencia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00002_control_itbis_checkColumnConstraints(p_data.control_itbis) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00002_pcodn_checkColumnConstraints(p_data.pcodn) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00002_pcodgrupo_checkColumnConstraints(p_data.pcodgrupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00002_pcodtipo_checkColumnConstraints(p_data.pcodtipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00002_pcodsec_checkColumnConstraints(p_data.pcodsec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00002_material_checkColumnConstraints(p_data.material) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00002_labor_checkColumnConstraints(p_data.labor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00002_gastos_checkColumnConstraints(p_data.gastos) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpiptb00002_factor_checkColumnConstraints(p_data.factor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpiptb00002_checkTableConstraints
-
-{<BLOCK Name="fct.tmpiptb00002_cod_cia_checkColumnConstraints">}
-#+ Check constraints on the "tmpiptb00002.cod_cia" column
-#+
-#+ @param p_cod_cia - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00002_cod_cia_checkColumnConstraints(p_cod_cia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_cia LIKE tmpiptb00002.cod_cia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpiptb00002_cod_cia_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpiptb00002_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "tmpiptb00002.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00002_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE tmpiptb00002.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpiptb00002_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpiptb00002_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "tmpiptb00002.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00002_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE tmpiptb00002.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpiptb00002_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpiptb00002_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "tmpiptb00002.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00002_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE tmpiptb00002.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpiptb00002_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpiptb00002_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "tmpiptb00002.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00002_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE tmpiptb00002.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpiptb00002_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpiptb00002_descrip_esp_checkColumnConstraints">}
-#+ Check constraints on the "tmpiptb00002.descrip_esp" column
-#+
-#+ @param p_descrip_esp - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00002_descrip_esp_checkColumnConstraints(p_descrip_esp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descrip_esp LIKE tmpiptb00002.descrip_esp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpiptb00002_descrip_esp_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpiptb00002_descrip_ing_checkColumnConstraints">}
-#+ Check constraints on the "tmpiptb00002.descrip_ing" column
-#+
-#+ @param p_descrip_ing - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00002_descrip_ing_checkColumnConstraints(p_descrip_ing)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descrip_ing LIKE tmpiptb00002.descrip_ing
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpiptb00002_descrip_ing_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpiptb00002_unidad_med_checkColumnConstraints">}
-#+ Check constraints on the "tmpiptb00002.unidad_med" column
-#+
-#+ @param p_unidad_med - CHAR(4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00002_unidad_med_checkColumnConstraints(p_unidad_med)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_unidad_med LIKE tmpiptb00002.unidad_med
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpiptb00002_unidad_med_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpiptb00002_nomenclatura_checkColumnConstraints">}
-#+ Check constraints on the "tmpiptb00002.nomenclatura" column
-#+
-#+ @param p_nomenclatura - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00002_nomenclatura_checkColumnConstraints(p_nomenclatura)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nomenclatura LIKE tmpiptb00002.nomenclatura
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpiptb00002_nomenclatura_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpiptb00002_bodega_checkColumnConstraints">}
-#+ Check constraints on the "tmpiptb00002.bodega" column
-#+
-#+ @param p_bodega - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00002_bodega_checkColumnConstraints(p_bodega)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_bodega LIKE tmpiptb00002.bodega
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpiptb00002_bodega_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpiptb00002_exist_max_checkColumnConstraints">}
-#+ Check constraints on the "tmpiptb00002.exist_max" column
-#+
-#+ @param p_exist_max - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00002_exist_max_checkColumnConstraints(p_exist_max)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_exist_max LIKE tmpiptb00002.exist_max
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpiptb00002_exist_max_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpiptb00002_exist_min_checkColumnConstraints">}
-#+ Check constraints on the "tmpiptb00002.exist_min" column
-#+
-#+ @param p_exist_min - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00002_exist_min_checkColumnConstraints(p_exist_min)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_exist_min LIKE tmpiptb00002.exist_min
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpiptb00002_exist_min_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpiptb00002_dia_llegada_checkColumnConstraints">}
-#+ Check constraints on the "tmpiptb00002.dia_llegada" column
-#+
-#+ @param p_dia_llegada - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00002_dia_llegada_checkColumnConstraints(p_dia_llegada)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_dia_llegada LIKE tmpiptb00002.dia_llegada
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpiptb00002_dia_llegada_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpiptb00002_status_t_checkColumnConstraints">}
-#+ Check constraints on the "tmpiptb00002.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00002_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE tmpiptb00002.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpiptb00002_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpiptb00002_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "tmpiptb00002.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00002_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE tmpiptb00002.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpiptb00002_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpiptb00002_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "tmpiptb00002.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00002_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE tmpiptb00002.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpiptb00002_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpiptb00002_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "tmpiptb00002.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00002_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE tmpiptb00002.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpiptb00002_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpiptb00002_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "tmpiptb00002.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00002_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE tmpiptb00002.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpiptb00002_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpiptb00002_control_existencia_checkColumnConstraints">}
-#+ Check constraints on the "tmpiptb00002.control_existencia" column
-#+
-#+ @param p_control_existencia - VARCHAR2(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00002_control_existencia_checkColumnConstraints(p_control_existencia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_control_existencia LIKE tmpiptb00002.control_existencia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpiptb00002_control_existencia_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpiptb00002_control_itbis_checkColumnConstraints">}
-#+ Check constraints on the "tmpiptb00002.control_itbis" column
-#+
-#+ @param p_control_itbis - VARCHAR2(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00002_control_itbis_checkColumnConstraints(p_control_itbis)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_control_itbis LIKE tmpiptb00002.control_itbis
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpiptb00002_control_itbis_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpiptb00002_pcodn_checkColumnConstraints">}
-#+ Check constraints on the "tmpiptb00002.pcodn" column
-#+
-#+ @param p_pcodn - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00002_pcodn_checkColumnConstraints(p_pcodn)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_pcodn LIKE tmpiptb00002.pcodn
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpiptb00002_pcodn_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpiptb00002_pcodgrupo_checkColumnConstraints">}
-#+ Check constraints on the "tmpiptb00002.pcodgrupo" column
-#+
-#+ @param p_pcodgrupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00002_pcodgrupo_checkColumnConstraints(p_pcodgrupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_pcodgrupo LIKE tmpiptb00002.pcodgrupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpiptb00002_pcodgrupo_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpiptb00002_pcodtipo_checkColumnConstraints">}
-#+ Check constraints on the "tmpiptb00002.pcodtipo" column
-#+
-#+ @param p_pcodtipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00002_pcodtipo_checkColumnConstraints(p_pcodtipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_pcodtipo LIKE tmpiptb00002.pcodtipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpiptb00002_pcodtipo_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpiptb00002_pcodsec_checkColumnConstraints">}
-#+ Check constraints on the "tmpiptb00002.pcodsec" column
-#+
-#+ @param p_pcodsec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00002_pcodsec_checkColumnConstraints(p_pcodsec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_pcodsec LIKE tmpiptb00002.pcodsec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpiptb00002_pcodsec_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpiptb00002_material_checkColumnConstraints">}
-#+ Check constraints on the "tmpiptb00002.material" column
-#+
-#+ @param p_material - DECIMAL(18,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00002_material_checkColumnConstraints(p_material)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_material LIKE tmpiptb00002.material
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpiptb00002_material_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpiptb00002_labor_checkColumnConstraints">}
-#+ Check constraints on the "tmpiptb00002.labor" column
-#+
-#+ @param p_labor - DECIMAL(18,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00002_labor_checkColumnConstraints(p_labor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_labor LIKE tmpiptb00002.labor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpiptb00002_labor_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpiptb00002_gastos_checkColumnConstraints">}
-#+ Check constraints on the "tmpiptb00002.gastos" column
-#+
-#+ @param p_gastos - DECIMAL(18,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00002_gastos_checkColumnConstraints(p_gastos)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_gastos LIKE tmpiptb00002.gastos
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpiptb00002_gastos_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpiptb00002_factor_checkColumnConstraints">}
-#+ Check constraints on the "tmpiptb00002.factor" column
-#+
-#+ @param p_factor - DECIMAL(18,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpiptb00002_factor_checkColumnConstraints(p_factor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_factor LIKE tmpiptb00002.factor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpiptb00002_factor_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpinvm_checkTableConstraints">}
-#+ Check constraints on the "tmpinvm" table
-#+
-#+ @param p_data - a row data LIKE tmpinvm.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpinvm_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE tmpinvm.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_tmpinvm_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpinvm_l1_checkColumnConstraints(p_data.l1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpinvm_l2_checkColumnConstraints(p_data.l2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpinvm_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpinvm_medida_checkColumnConstraints(p_data.medida) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpinvm_codn_checkColumnConstraints(p_data.codn) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpinvm_codgrupo_checkColumnConstraints(p_data.codgrupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpinvm_codtipo_checkColumnConstraints(p_data.codtipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpinvm_codsec_checkColumnConstraints(p_data.codsec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpinvm_existencia_checkColumnConstraints(p_data.existencia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpinvm_costo_checkColumnConstraints(p_data.costo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpinvm_clasificacion_checkColumnConstraints(p_data.clasificacion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpinvm_checkTableConstraints
-
-{<BLOCK Name="fct.tmpinvm_descripcion_checkColumnConstraints">}
-#+ Check constraints on the "tmpinvm.descripcion" column
-#+
-#+ @param p_descripcion - VARCHAR2(255) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpinvm_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE tmpinvm.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpinvm_descripcion_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpinvm_l1_checkColumnConstraints">}
-#+ Check constraints on the "tmpinvm.l1" column
-#+
-#+ @param p_l1 - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpinvm_l1_checkColumnConstraints(p_l1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_l1 LIKE tmpinvm.l1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpinvm_l1_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpinvm_l2_checkColumnConstraints">}
-#+ Check constraints on the "tmpinvm.l2" column
-#+
-#+ @param p_l2 - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpinvm_l2_checkColumnConstraints(p_l2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_l2 LIKE tmpinvm.l2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpinvm_l2_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpinvm_cantidad_checkColumnConstraints">}
-#+ Check constraints on the "tmpinvm.cantidad" column
-#+
-#+ @param p_cantidad - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpinvm_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE tmpinvm.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpinvm_cantidad_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpinvm_medida_checkColumnConstraints">}
-#+ Check constraints on the "tmpinvm.medida" column
-#+
-#+ @param p_medida - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpinvm_medida_checkColumnConstraints(p_medida)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_medida LIKE tmpinvm.medida
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpinvm_medida_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpinvm_codn_checkColumnConstraints">}
-#+ Check constraints on the "tmpinvm.codn" column
-#+
-#+ @param p_codn - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpinvm_codn_checkColumnConstraints(p_codn)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codn LIKE tmpinvm.codn
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpinvm_codn_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpinvm_codgrupo_checkColumnConstraints">}
-#+ Check constraints on the "tmpinvm.codgrupo" column
-#+
-#+ @param p_codgrupo - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpinvm_codgrupo_checkColumnConstraints(p_codgrupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codgrupo LIKE tmpinvm.codgrupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpinvm_codgrupo_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpinvm_codtipo_checkColumnConstraints">}
-#+ Check constraints on the "tmpinvm.codtipo" column
-#+
-#+ @param p_codtipo - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpinvm_codtipo_checkColumnConstraints(p_codtipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codtipo LIKE tmpinvm.codtipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpinvm_codtipo_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpinvm_codsec_checkColumnConstraints">}
-#+ Check constraints on the "tmpinvm.codsec" column
-#+
-#+ @param p_codsec - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpinvm_codsec_checkColumnConstraints(p_codsec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codsec LIKE tmpinvm.codsec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpinvm_codsec_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpinvm_existencia_checkColumnConstraints">}
-#+ Check constraints on the "tmpinvm.existencia" column
-#+
-#+ @param p_existencia - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpinvm_existencia_checkColumnConstraints(p_existencia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_existencia LIKE tmpinvm.existencia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpinvm_existencia_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpinvm_costo_checkColumnConstraints">}
-#+ Check constraints on the "tmpinvm.costo" column
-#+
-#+ @param p_costo - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpinvm_costo_checkColumnConstraints(p_costo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_costo LIKE tmpinvm.costo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpinvm_costo_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpinvm_clasificacion_checkColumnConstraints">}
-#+ Check constraints on the "tmpinvm.clasificacion" column
-#+
-#+ @param p_clasificacion - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpinvm_clasificacion_checkColumnConstraints(p_clasificacion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_clasificacion LIKE tmpinvm.clasificacion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpinvm_clasificacion_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpinventariofisico_checkTableConstraints">}
-#+ Check constraints on the "tmpinventariofisico" table
-#+
-#+ @param p_data - a row data LIKE tmpinventariofisico.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpinventariofisico_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE tmpinventariofisico.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_tmpinventariofisico_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpinventariofisico_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpinventariofisico_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpinventariofisico_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpinventariofisico_existencia_checkColumnConstraints(p_data.existencia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpinventariofisico_cod_n1_checkColumnConstraints(p_data.cod_n1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpinventariofisico_cod_grupo1_checkColumnConstraints(p_data.cod_grupo1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpinventariofisico_cod_tipo1_checkColumnConstraints(p_data.cod_tipo1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpinventariofisico_cod_sec1_checkColumnConstraints(p_data.cod_sec1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpinventariofisico_fisico_checkColumnConstraints(p_data.fisico) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpinventariofisico_costo_checkColumnConstraints(p_data.costo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpinventariofisico_checkTableConstraints
-
-{<BLOCK Name="fct.tmpinventariofisico_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "tmpinventariofisico.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpinventariofisico_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE tmpinventariofisico.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpinventariofisico_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpinventariofisico_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "tmpinventariofisico.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpinventariofisico_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE tmpinventariofisico.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpinventariofisico_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpinventariofisico_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "tmpinventariofisico.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpinventariofisico_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE tmpinventariofisico.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpinventariofisico_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpinventariofisico_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "tmpinventariofisico.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpinventariofisico_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE tmpinventariofisico.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpinventariofisico_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpinventariofisico_existencia_checkColumnConstraints">}
-#+ Check constraints on the "tmpinventariofisico.existencia" column
-#+
-#+ @param p_existencia - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpinventariofisico_existencia_checkColumnConstraints(p_existencia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_existencia LIKE tmpinventariofisico.existencia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpinventariofisico_existencia_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpinventariofisico_cod_n1_checkColumnConstraints">}
-#+ Check constraints on the "tmpinventariofisico.cod_n1" column
-#+
-#+ @param p_cod_n1 - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpinventariofisico_cod_n1_checkColumnConstraints(p_cod_n1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n1 LIKE tmpinventariofisico.cod_n1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpinventariofisico_cod_n1_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpinventariofisico_cod_grupo1_checkColumnConstraints">}
-#+ Check constraints on the "tmpinventariofisico.cod_grupo1" column
-#+
-#+ @param p_cod_grupo1 - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpinventariofisico_cod_grupo1_checkColumnConstraints(p_cod_grupo1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo1 LIKE tmpinventariofisico.cod_grupo1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpinventariofisico_cod_grupo1_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpinventariofisico_cod_tipo1_checkColumnConstraints">}
-#+ Check constraints on the "tmpinventariofisico.cod_tipo1" column
-#+
-#+ @param p_cod_tipo1 - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpinventariofisico_cod_tipo1_checkColumnConstraints(p_cod_tipo1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo1 LIKE tmpinventariofisico.cod_tipo1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpinventariofisico_cod_tipo1_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpinventariofisico_cod_sec1_checkColumnConstraints">}
-#+ Check constraints on the "tmpinventariofisico.cod_sec1" column
-#+
-#+ @param p_cod_sec1 - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpinventariofisico_cod_sec1_checkColumnConstraints(p_cod_sec1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec1 LIKE tmpinventariofisico.cod_sec1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpinventariofisico_cod_sec1_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpinventariofisico_fisico_checkColumnConstraints">}
-#+ Check constraints on the "tmpinventariofisico.fisico" column
-#+
-#+ @param p_fisico - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpinventariofisico_fisico_checkColumnConstraints(p_fisico)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fisico LIKE tmpinventariofisico.fisico
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpinventariofisico_fisico_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpinventariofisico_costo_checkColumnConstraints">}
-#+ Check constraints on the "tmpinventariofisico.costo" column
-#+
-#+ @param p_costo - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpinventariofisico_costo_checkColumnConstraints(p_costo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_costo LIKE tmpinventariofisico.costo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpinventariofisico_costo_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpinventario_checkTableConstraints">}
-#+ Check constraints on the "tmpinventario" table
-#+
-#+ @param p_data - a row data LIKE tmpinventario.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpinventario_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE tmpinventario.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_tmpinventario_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpinventario_l1_checkColumnConstraints(p_data.l1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpinventario_l2_checkColumnConstraints(p_data.l2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpinventario_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpinventario_metros_checkColumnConstraints(p_data.metros) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpinventario_codn_checkColumnConstraints(p_data.codn) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpinventario_codgrupo_checkColumnConstraints(p_data.codgrupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpinventario_codtipo_checkColumnConstraints(p_data.codtipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpinventario_codsec_checkColumnConstraints(p_data.codsec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpinventario_existencia_checkColumnConstraints(p_data.existencia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpinventario_tipo_checkColumnConstraints(p_data.tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpinventario_checkTableConstraints
-
-{<BLOCK Name="fct.tmpinventario_descripcion_checkColumnConstraints">}
-#+ Check constraints on the "tmpinventario.descripcion" column
-#+
-#+ @param p_descripcion - VARCHAR2(255) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpinventario_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE tmpinventario.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpinventario_descripcion_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpinventario_l1_checkColumnConstraints">}
-#+ Check constraints on the "tmpinventario.l1" column
-#+
-#+ @param p_l1 - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpinventario_l1_checkColumnConstraints(p_l1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_l1 LIKE tmpinventario.l1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpinventario_l1_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpinventario_l2_checkColumnConstraints">}
-#+ Check constraints on the "tmpinventario.l2" column
-#+
-#+ @param p_l2 - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpinventario_l2_checkColumnConstraints(p_l2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_l2 LIKE tmpinventario.l2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpinventario_l2_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpinventario_cantidad_checkColumnConstraints">}
-#+ Check constraints on the "tmpinventario.cantidad" column
-#+
-#+ @param p_cantidad - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpinventario_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE tmpinventario.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpinventario_cantidad_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpinventario_metros_checkColumnConstraints">}
-#+ Check constraints on the "tmpinventario.metros" column
-#+
-#+ @param p_metros - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpinventario_metros_checkColumnConstraints(p_metros)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_metros LIKE tmpinventario.metros
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpinventario_metros_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpinventario_codn_checkColumnConstraints">}
-#+ Check constraints on the "tmpinventario.codn" column
-#+
-#+ @param p_codn - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpinventario_codn_checkColumnConstraints(p_codn)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codn LIKE tmpinventario.codn
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpinventario_codn_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpinventario_codgrupo_checkColumnConstraints">}
-#+ Check constraints on the "tmpinventario.codgrupo" column
-#+
-#+ @param p_codgrupo - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpinventario_codgrupo_checkColumnConstraints(p_codgrupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codgrupo LIKE tmpinventario.codgrupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpinventario_codgrupo_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpinventario_codtipo_checkColumnConstraints">}
-#+ Check constraints on the "tmpinventario.codtipo" column
-#+
-#+ @param p_codtipo - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpinventario_codtipo_checkColumnConstraints(p_codtipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codtipo LIKE tmpinventario.codtipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpinventario_codtipo_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpinventario_codsec_checkColumnConstraints">}
-#+ Check constraints on the "tmpinventario.codsec" column
-#+
-#+ @param p_codsec - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpinventario_codsec_checkColumnConstraints(p_codsec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codsec LIKE tmpinventario.codsec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpinventario_codsec_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpinventario_existencia_checkColumnConstraints">}
-#+ Check constraints on the "tmpinventario.existencia" column
-#+
-#+ @param p_existencia - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpinventario_existencia_checkColumnConstraints(p_existencia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_existencia LIKE tmpinventario.existencia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpinventario_existencia_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpinventario_tipo_checkColumnConstraints">}
-#+ Check constraints on the "tmpinventario.tipo" column
-#+
-#+ @param p_tipo - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpinventario_tipo_checkColumnConstraints(p_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo LIKE tmpinventario.tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpinventario_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpgrupo_checkTableConstraints">}
-#+ Check constraints on the "tmpgrupo" table
-#+
-#+ @param p_data - a row data LIKE tmpgrupo.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpgrupo_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE tmpgrupo.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_tmpgrupo_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpgrupo_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- CALL smarmotech_dbxconstraints_tmpgrupo_pk_tmpgrupo_checkUniqueConstraint(p_forUpdate, p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpgrupo_checkTableConstraints
-
-{<BLOCK Name="fct.tmpgrupo_pk_tmpgrupo_checkUniqueConstraint">}
-#+ Check the primary key uniqueness constraint on the "tmpgrupo"
-#+
-#+ @param p_key - Primary Key
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpgrupo_pk_tmpgrupo_checkUniqueConstraint(p_forUpdate, p_key)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_key
- RECORD
- tmpgrupo_cod_grupo LIKE tmpgrupo.cod_grupo
- END RECORD
- DEFINE l_key
- RECORD
- tmpgrupo_cod_grupo LIKE tmpgrupo.cod_grupo
- END RECORD
- DEFINE l_where STRING
- DEFINE l_sqlQuery STRING
- DEFINE l_count INTEGER
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- LET l_where = "WHERE tmpgrupo.cod_grupo = ? "
-
- let l_sqlQuery = "SELECT COUNT(*), cod_grupo FROM tmpgrupo ", l_where, " GROUP BY cod_grupo"
-
- PREPARE cur_tmpgrupo_pk_tmpgrupo_checkUniqueConstraint FROM l_sqlQuery
- EXECUTE cur_tmpgrupo_pk_tmpgrupo_checkUniqueConstraint INTO l_count, l_key.* USING p_key.*
- FREE cur_tmpgrupo_pk_tmpgrupo_checkUniqueConstraint
- IF (NOT p_forUpdate AND l_count > 0) OR (p_forUpdate AND l_count > 0 AND p_key.* != l_key.*) THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_grupo: " || ERROR_BAM_00002) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpgrupo_pk_tmpgrupo_checkUniqueConstraint
-
-{<BLOCK Name="fct.tmpgrupo_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "tmpgrupo.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpgrupo_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE tmpgrupo.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_grupo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_grupo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpgrupo_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpgrupo_descripcion_checkColumnConstraints">}
-#+ Check constraints on the "tmpgrupo.descripcion" column
-#+
-#+ @param p_descripcion - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpgrupo_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE tmpgrupo.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpgrupo_descripcion_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpferia5_checkTableConstraints">}
-#+ Check constraints on the "tmpferia5" table
-#+
-#+ @param p_data - a row data LIKE tmpferia5.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpferia5_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE tmpferia5.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_tmpferia5_cod_lista_checkColumnConstraints(p_data.cod_lista) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpferia5_ventas_checkColumnConstraints(p_data.ventas) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpferia5_codn_checkColumnConstraints(p_data.codn) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpferia5_codgrupo_checkColumnConstraints(p_data.codgrupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpferia5_codtipo_checkColumnConstraints(p_data.codtipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpferia5_codsec_checkColumnConstraints(p_data.codsec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpferia5_precio_checkColumnConstraints(p_data.precio) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpferia5_checkTableConstraints
-
-{<BLOCK Name="fct.tmpferia5_cod_lista_checkColumnConstraints">}
-#+ Check constraints on the "tmpferia5.cod_lista" column
-#+
-#+ @param p_cod_lista - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpferia5_cod_lista_checkColumnConstraints(p_cod_lista)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_lista LIKE tmpferia5.cod_lista
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpferia5_cod_lista_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpferia5_ventas_checkColumnConstraints">}
-#+ Check constraints on the "tmpferia5.ventas" column
-#+
-#+ @param p_ventas - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpferia5_ventas_checkColumnConstraints(p_ventas)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ventas LIKE tmpferia5.ventas
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpferia5_ventas_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpferia5_codn_checkColumnConstraints">}
-#+ Check constraints on the "tmpferia5.codn" column
-#+
-#+ @param p_codn - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpferia5_codn_checkColumnConstraints(p_codn)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codn LIKE tmpferia5.codn
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpferia5_codn_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpferia5_codgrupo_checkColumnConstraints">}
-#+ Check constraints on the "tmpferia5.codgrupo" column
-#+
-#+ @param p_codgrupo - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpferia5_codgrupo_checkColumnConstraints(p_codgrupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codgrupo LIKE tmpferia5.codgrupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpferia5_codgrupo_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpferia5_codtipo_checkColumnConstraints">}
-#+ Check constraints on the "tmpferia5.codtipo" column
-#+
-#+ @param p_codtipo - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpferia5_codtipo_checkColumnConstraints(p_codtipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codtipo LIKE tmpferia5.codtipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpferia5_codtipo_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpferia5_codsec_checkColumnConstraints">}
-#+ Check constraints on the "tmpferia5.codsec" column
-#+
-#+ @param p_codsec - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpferia5_codsec_checkColumnConstraints(p_codsec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codsec LIKE tmpferia5.codsec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpferia5_codsec_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpferia5_precio_checkColumnConstraints">}
-#+ Check constraints on the "tmpferia5.precio" column
-#+
-#+ @param p_precio - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpferia5_precio_checkColumnConstraints(p_precio)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_precio LIKE tmpferia5.precio
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpferia5_precio_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpferia3_checkTableConstraints">}
-#+ Check constraints on the "tmpferia3" table
-#+
-#+ @param p_data - a row data LIKE tmpferia3.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpferia3_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE tmpferia3.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_tmpferia3_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpferia3_cod_lista_checkColumnConstraints(p_data.cod_lista) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpferia3_ventas_checkColumnConstraints(p_data.ventas) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpferia3_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpferia3_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpferia3_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpferia3_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpferia3_precio_checkColumnConstraints(p_data.precio) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpferia3_checkTableConstraints
-
-{<BLOCK Name="fct.tmpferia3_descripcion_checkColumnConstraints">}
-#+ Check constraints on the "tmpferia3.descripcion" column
-#+
-#+ @param p_descripcion - VARCHAR2(255) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpferia3_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE tmpferia3.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpferia3_descripcion_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpferia3_cod_lista_checkColumnConstraints">}
-#+ Check constraints on the "tmpferia3.cod_lista" column
-#+
-#+ @param p_cod_lista - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpferia3_cod_lista_checkColumnConstraints(p_cod_lista)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_lista LIKE tmpferia3.cod_lista
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpferia3_cod_lista_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpferia3_ventas_checkColumnConstraints">}
-#+ Check constraints on the "tmpferia3.ventas" column
-#+
-#+ @param p_ventas - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpferia3_ventas_checkColumnConstraints(p_ventas)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ventas LIKE tmpferia3.ventas
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpferia3_ventas_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpferia3_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "tmpferia3.cod_n" column
-#+
-#+ @param p_cod_n - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpferia3_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE tmpferia3.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpferia3_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpferia3_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "tmpferia3.cod_grupo" column
-#+
-#+ @param p_cod_grupo - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpferia3_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE tmpferia3.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpferia3_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpferia3_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "tmpferia3.cod_tipo" column
-#+
-#+ @param p_cod_tipo - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpferia3_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE tmpferia3.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpferia3_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpferia3_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "tmpferia3.cod_sec" column
-#+
-#+ @param p_cod_sec - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpferia3_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE tmpferia3.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpferia3_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpferia3_precio_checkColumnConstraints">}
-#+ Check constraints on the "tmpferia3.precio" column
-#+
-#+ @param p_precio - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpferia3_precio_checkColumnConstraints(p_precio)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_precio LIKE tmpferia3.precio
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpferia3_precio_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpferia2_checkTableConstraints">}
-#+ Check constraints on the "tmpferia2" table
-#+
-#+ @param p_data - a row data LIKE tmpferia2.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpferia2_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE tmpferia2.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_tmpferia2_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpferia2_cod_lista_checkColumnConstraints(p_data.cod_lista) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpferia2_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpferia2_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpferia2_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpferia2_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpferia2_precio_checkColumnConstraints(p_data.precio) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpferia2_f8_checkColumnConstraints(p_data.f8) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpferia2_f9_checkColumnConstraints(p_data.f9) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpferia2_f10_checkColumnConstraints(p_data.f10) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpferia2_checkTableConstraints
-
-{<BLOCK Name="fct.tmpferia2_descripcion_checkColumnConstraints">}
-#+ Check constraints on the "tmpferia2.descripcion" column
-#+
-#+ @param p_descripcion - VARCHAR2(255) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpferia2_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE tmpferia2.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpferia2_descripcion_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpferia2_cod_lista_checkColumnConstraints">}
-#+ Check constraints on the "tmpferia2.cod_lista" column
-#+
-#+ @param p_cod_lista - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpferia2_cod_lista_checkColumnConstraints(p_cod_lista)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_lista LIKE tmpferia2.cod_lista
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpferia2_cod_lista_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpferia2_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "tmpferia2.cod_n" column
-#+
-#+ @param p_cod_n - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpferia2_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE tmpferia2.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpferia2_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpferia2_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "tmpferia2.cod_grupo" column
-#+
-#+ @param p_cod_grupo - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpferia2_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE tmpferia2.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpferia2_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpferia2_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "tmpferia2.cod_tipo" column
-#+
-#+ @param p_cod_tipo - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpferia2_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE tmpferia2.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpferia2_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpferia2_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "tmpferia2.cod_sec" column
-#+
-#+ @param p_cod_sec - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpferia2_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE tmpferia2.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpferia2_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpferia2_precio_checkColumnConstraints">}
-#+ Check constraints on the "tmpferia2.precio" column
-#+
-#+ @param p_precio - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpferia2_precio_checkColumnConstraints(p_precio)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_precio LIKE tmpferia2.precio
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpferia2_precio_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpferia2_f8_checkColumnConstraints">}
-#+ Check constraints on the "tmpferia2.f8" column
-#+
-#+ @param p_f8 - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpferia2_f8_checkColumnConstraints(p_f8)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_f8 LIKE tmpferia2.f8
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpferia2_f8_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpferia2_f9_checkColumnConstraints">}
-#+ Check constraints on the "tmpferia2.f9" column
-#+
-#+ @param p_f9 - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpferia2_f9_checkColumnConstraints(p_f9)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_f9 LIKE tmpferia2.f9
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpferia2_f9_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpferia2_f10_checkColumnConstraints">}
-#+ Check constraints on the "tmpferia2.f10" column
-#+
-#+ @param p_f10 - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpferia2_f10_checkColumnConstraints(p_f10)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_f10 LIKE tmpferia2.f10
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpferia2_f10_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpfempleados_checkTableConstraints">}
-#+ Check constraints on the "tmpfempleados" table
-#+
-#+ @param p_data - a row data LIKE tmpfempleados.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpfempleados_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE tmpfempleados.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_tmpfempleados_num_emp_checkColumnConstraints(p_data.num_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpfempleados_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpfempleados_fecha_inicio_checkColumnConstraints(p_data.fecha_inicio) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpfempleados_valor_checkColumnConstraints(p_data.valor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpfempleados_estado_checkColumnConstraints(p_data.estado) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpfempleados_checkTableConstraints
-
-{<BLOCK Name="fct.tmpfempleados_num_emp_checkColumnConstraints">}
-#+ Check constraints on the "tmpfempleados.num_emp" column
-#+
-#+ @param p_num_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpfempleados_num_emp_checkColumnConstraints(p_num_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_emp LIKE tmpfempleados.num_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpfempleados_num_emp_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpfempleados_fecha_checkColumnConstraints">}
-#+ Check constraints on the "tmpfempleados.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpfempleados_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE tmpfempleados.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpfempleados_fecha_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpfempleados_fecha_inicio_checkColumnConstraints">}
-#+ Check constraints on the "tmpfempleados.fecha_inicio" column
-#+
-#+ @param p_fecha_inicio - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpfempleados_fecha_inicio_checkColumnConstraints(p_fecha_inicio)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_inicio LIKE tmpfempleados.fecha_inicio
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpfempleados_fecha_inicio_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpfempleados_valor_checkColumnConstraints">}
-#+ Check constraints on the "tmpfempleados.valor" column
-#+
-#+ @param p_valor - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpfempleados_valor_checkColumnConstraints(p_valor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valor LIKE tmpfempleados.valor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpfempleados_valor_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpfempleados_estado_checkColumnConstraints">}
-#+ Check constraints on the "tmpfempleados.estado" column
-#+
-#+ @param p_estado - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpfempleados_estado_checkColumnConstraints(p_estado)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_estado LIKE tmpfempleados.estado
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpfempleados_estado_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpfacturas_checkTableConstraints">}
-#+ Check constraints on the "tmpfacturas" table
-#+
-#+ @param p_data - a row data LIKE tmpfacturas.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpfacturas_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE tmpfacturas.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_tmpfacturas_factura_checkColumnConstraints(p_data.factura) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpfacturas_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpfacturas_precio_checkColumnConstraints(p_data.precio) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpfacturas_desc#_checkColumnConstraints(p_data.desc#) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpfacturas_valor_checkColumnConstraints(p_data.valor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpfacturas_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpfacturas_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpfacturas_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpfacturas_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpfacturas_f10_checkColumnConstraints(p_data.f10) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpfacturas_f11_checkColumnConstraints(p_data.f11) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpfacturas_f12_checkColumnConstraints(p_data.f12) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpfacturas_f13_checkColumnConstraints(p_data.f13) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpfacturas_f14_checkColumnConstraints(p_data.f14) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpfacturas_f15_checkColumnConstraints(p_data.f15) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpfacturas_checkTableConstraints
-
-{<BLOCK Name="fct.tmpfacturas_factura_checkColumnConstraints">}
-#+ Check constraints on the "tmpfacturas.factura" column
-#+
-#+ @param p_factura - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpfacturas_factura_checkColumnConstraints(p_factura)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_factura LIKE tmpfacturas.factura
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpfacturas_factura_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpfacturas_cantidad_checkColumnConstraints">}
-#+ Check constraints on the "tmpfacturas.cantidad" column
-#+
-#+ @param p_cantidad - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpfacturas_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE tmpfacturas.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpfacturas_cantidad_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpfacturas_precio_checkColumnConstraints">}
-#+ Check constraints on the "tmpfacturas.precio" column
-#+
-#+ @param p_precio - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpfacturas_precio_checkColumnConstraints(p_precio)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_precio LIKE tmpfacturas.precio
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpfacturas_precio_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpfacturas_desc#_checkColumnConstraints">}
-#+ Check constraints on the "tmpfacturas.desc#" column
-#+
-#+ @param p_desc# - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpfacturas_desc#_checkColumnConstraints(p_desc#)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_desc# LIKE tmpfacturas.desc#
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpfacturas_desc#_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpfacturas_valor_checkColumnConstraints">}
-#+ Check constraints on the "tmpfacturas.valor" column
-#+
-#+ @param p_valor - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpfacturas_valor_checkColumnConstraints(p_valor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valor LIKE tmpfacturas.valor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpfacturas_valor_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpfacturas_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "tmpfacturas.cod_n" column
-#+
-#+ @param p_cod_n - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpfacturas_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE tmpfacturas.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpfacturas_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpfacturas_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "tmpfacturas.cod_grupo" column
-#+
-#+ @param p_cod_grupo - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpfacturas_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE tmpfacturas.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpfacturas_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpfacturas_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "tmpfacturas.cod_tipo" column
-#+
-#+ @param p_cod_tipo - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpfacturas_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE tmpfacturas.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpfacturas_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpfacturas_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "tmpfacturas.cod_sec" column
-#+
-#+ @param p_cod_sec - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpfacturas_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE tmpfacturas.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpfacturas_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpfacturas_f10_checkColumnConstraints">}
-#+ Check constraints on the "tmpfacturas.f10" column
-#+
-#+ @param p_f10 - VARCHAR2(255) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpfacturas_f10_checkColumnConstraints(p_f10)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_f10 LIKE tmpfacturas.f10
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpfacturas_f10_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpfacturas_f11_checkColumnConstraints">}
-#+ Check constraints on the "tmpfacturas.f11" column
-#+
-#+ @param p_f11 - VARCHAR2(255) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpfacturas_f11_checkColumnConstraints(p_f11)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_f11 LIKE tmpfacturas.f11
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpfacturas_f11_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpfacturas_f12_checkColumnConstraints">}
-#+ Check constraints on the "tmpfacturas.f12" column
-#+
-#+ @param p_f12 - VARCHAR2(255) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpfacturas_f12_checkColumnConstraints(p_f12)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_f12 LIKE tmpfacturas.f12
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpfacturas_f12_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpfacturas_f13_checkColumnConstraints">}
-#+ Check constraints on the "tmpfacturas.f13" column
-#+
-#+ @param p_f13 - VARCHAR2(255) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpfacturas_f13_checkColumnConstraints(p_f13)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_f13 LIKE tmpfacturas.f13
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpfacturas_f13_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpfacturas_f14_checkColumnConstraints">}
-#+ Check constraints on the "tmpfacturas.f14" column
-#+
-#+ @param p_f14 - VARCHAR2(255) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpfacturas_f14_checkColumnConstraints(p_f14)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_f14 LIKE tmpfacturas.f14
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpfacturas_f14_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpfacturas_f15_checkColumnConstraints">}
-#+ Check constraints on the "tmpfacturas.f15" column
-#+
-#+ @param p_f15 - VARCHAR2(255) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpfacturas_f15_checkColumnConstraints(p_f15)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_f15 LIKE tmpfacturas.f15
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpfacturas_f15_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpexcel_checkTableConstraints">}
-#+ Check constraints on the "tmpexcel" table
-#+
-#+ @param p_data - a row data LIKE tmpexcel.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpexcel_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE tmpexcel.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_tmpexcel_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpexcel_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpexcel_checkTableConstraints
-
-{<BLOCK Name="fct.tmpexcel_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "tmpexcel.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpexcel_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE tmpexcel.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpexcel_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpexcel_descripcion_checkColumnConstraints">}
-#+ Check constraints on the "tmpexcel.descripcion" column
-#+
-#+ @param p_descripcion - VARCHAR2(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpexcel_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE tmpexcel.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpexcel_descripcion_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpduplicados_checkTableConstraints">}
-#+ Check constraints on the "tmpduplicados" table
-#+
-#+ @param p_data - a row data LIKE tmpduplicados.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpduplicados_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE tmpduplicados.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_tmpduplicados_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpduplicados_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpduplicados_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpduplicados_cod_seg_checkColumnConstraints(p_data.cod_seg) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpduplicados_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpduplicados_veces_checkColumnConstraints(p_data.veces) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpduplicados_checkTableConstraints
-
-{<BLOCK Name="fct.tmpduplicados_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "tmpduplicados.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpduplicados_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE tmpduplicados.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpduplicados_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpduplicados_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "tmpduplicados.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpduplicados_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE tmpduplicados.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpduplicados_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpduplicados_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "tmpduplicados.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpduplicados_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE tmpduplicados.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpduplicados_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpduplicados_cod_seg_checkColumnConstraints">}
-#+ Check constraints on the "tmpduplicados.cod_seg" column
-#+
-#+ @param p_cod_seg - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpduplicados_cod_seg_checkColumnConstraints(p_cod_seg)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_seg LIKE tmpduplicados.cod_seg
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpduplicados_cod_seg_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpduplicados_cantidad_checkColumnConstraints">}
-#+ Check constraints on the "tmpduplicados.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpduplicados_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE tmpduplicados.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpduplicados_cantidad_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpduplicados_veces_checkColumnConstraints">}
-#+ Check constraints on the "tmpduplicados.veces" column
-#+
-#+ @param p_veces - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpduplicados_veces_checkColumnConstraints(p_veces)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_veces LIKE tmpduplicados.veces
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpduplicados_veces_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpdetallefact_checkTableConstraints">}
-#+ Check constraints on the "tmpdetallefact" table
-#+
-#+ @param p_data - a row data LIKE tmpdetallefact.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpdetallefact_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE tmpdetallefact.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_tmpdetallefact_factura_checkColumnConstraints(p_data.factura) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpdetallefact_clase_checkColumnConstraints(p_data.clase) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpdetallefact_grupo_checkColumnConstraints(p_data.grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpdetallefact_tipo_checkColumnConstraints(p_data.tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpdetallefact_medida_checkColumnConstraints(p_data.medida) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpdetallefact_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpdetallefact_precio_checkColumnConstraints(p_data.precio) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpdetallefact_descuento_checkColumnConstraints(p_data.descuento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpdetallefact_f9_checkColumnConstraints(p_data.f9) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpdetallefact_checkTableConstraints
-
-{<BLOCK Name="fct.tmpdetallefact_factura_checkColumnConstraints">}
-#+ Check constraints on the "tmpdetallefact.factura" column
-#+
-#+ @param p_factura - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpdetallefact_factura_checkColumnConstraints(p_factura)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_factura LIKE tmpdetallefact.factura
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpdetallefact_factura_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpdetallefact_clase_checkColumnConstraints">}
-#+ Check constraints on the "tmpdetallefact.clase" column
-#+
-#+ @param p_clase - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpdetallefact_clase_checkColumnConstraints(p_clase)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_clase LIKE tmpdetallefact.clase
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpdetallefact_clase_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpdetallefact_grupo_checkColumnConstraints">}
-#+ Check constraints on the "tmpdetallefact.grupo" column
-#+
-#+ @param p_grupo - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpdetallefact_grupo_checkColumnConstraints(p_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_grupo LIKE tmpdetallefact.grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpdetallefact_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpdetallefact_tipo_checkColumnConstraints">}
-#+ Check constraints on the "tmpdetallefact.tipo" column
-#+
-#+ @param p_tipo - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpdetallefact_tipo_checkColumnConstraints(p_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo LIKE tmpdetallefact.tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpdetallefact_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpdetallefact_medida_checkColumnConstraints">}
-#+ Check constraints on the "tmpdetallefact.medida" column
-#+
-#+ @param p_medida - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpdetallefact_medida_checkColumnConstraints(p_medida)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_medida LIKE tmpdetallefact.medida
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpdetallefact_medida_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpdetallefact_cantidad_checkColumnConstraints">}
-#+ Check constraints on the "tmpdetallefact.cantidad" column
-#+
-#+ @param p_cantidad - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpdetallefact_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE tmpdetallefact.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpdetallefact_cantidad_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpdetallefact_precio_checkColumnConstraints">}
-#+ Check constraints on the "tmpdetallefact.precio" column
-#+
-#+ @param p_precio - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpdetallefact_precio_checkColumnConstraints(p_precio)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_precio LIKE tmpdetallefact.precio
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpdetallefact_precio_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpdetallefact_descuento_checkColumnConstraints">}
-#+ Check constraints on the "tmpdetallefact.descuento" column
-#+
-#+ @param p_descuento - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpdetallefact_descuento_checkColumnConstraints(p_descuento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descuento LIKE tmpdetallefact.descuento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpdetallefact_descuento_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpdetallefact_f9_checkColumnConstraints">}
-#+ Check constraints on the "tmpdetallefact.f9" column
-#+
-#+ @param p_f9 - VARCHAR2(255) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpdetallefact_f9_checkColumnConstraints(p_f9)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_f9 LIKE tmpdetallefact.f9
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpdetallefact_f9_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpcostosferia_checkTableConstraints">}
-#+ Check constraints on the "tmpcostosferia" table
-#+
-#+ @param p_data - a row data LIKE tmpcostosferia.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcostosferia_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE tmpcostosferia.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_tmpcostosferia_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcostosferia_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcostosferia_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcostosferia_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcostosferia_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcostosferia_existencia_checkColumnConstraints(p_data.existencia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcostosferia_costo_std_checkColumnConstraints(p_data.costo_std) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcostosferia_precio_us_checkColumnConstraints(p_data.precio_us) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcostosferia_costo_liq_checkColumnConstraints(p_data.costo_liq) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpcostosferia_checkTableConstraints
-
-{<BLOCK Name="fct.tmpcostosferia_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "tmpcostosferia.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcostosferia_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE tmpcostosferia.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpcostosferia_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpcostosferia_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "tmpcostosferia.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcostosferia_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE tmpcostosferia.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpcostosferia_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpcostosferia_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "tmpcostosferia.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcostosferia_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE tmpcostosferia.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpcostosferia_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpcostosferia_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "tmpcostosferia.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcostosferia_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE tmpcostosferia.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpcostosferia_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpcostosferia_descripcion_checkColumnConstraints">}
-#+ Check constraints on the "tmpcostosferia.descripcion" column
-#+
-#+ @param p_descripcion - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcostosferia_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE tmpcostosferia.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpcostosferia_descripcion_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpcostosferia_existencia_checkColumnConstraints">}
-#+ Check constraints on the "tmpcostosferia.existencia" column
-#+
-#+ @param p_existencia - DECIMAL(12,3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcostosferia_existencia_checkColumnConstraints(p_existencia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_existencia LIKE tmpcostosferia.existencia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpcostosferia_existencia_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpcostosferia_costo_std_checkColumnConstraints">}
-#+ Check constraints on the "tmpcostosferia.costo_std" column
-#+
-#+ @param p_costo_std - DECIMAL(12,3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcostosferia_costo_std_checkColumnConstraints(p_costo_std)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_costo_std LIKE tmpcostosferia.costo_std
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpcostosferia_costo_std_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpcostosferia_precio_us_checkColumnConstraints">}
-#+ Check constraints on the "tmpcostosferia.precio_us" column
-#+
-#+ @param p_precio_us - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcostosferia_precio_us_checkColumnConstraints(p_precio_us)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_precio_us LIKE tmpcostosferia.precio_us
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpcostosferia_precio_us_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpcostosferia_costo_liq_checkColumnConstraints">}
-#+ Check constraints on the "tmpcostosferia.costo_liq" column
-#+
-#+ @param p_costo_liq - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcostosferia_costo_liq_checkColumnConstraints(p_costo_liq)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_costo_liq LIKE tmpcostosferia.costo_liq
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpcostosferia_costo_liq_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpcostos1_checkTableConstraints">}
-#+ Check constraints on the "tmpcostos1" table
-#+
-#+ @param p_data - a row data LIKE tmpcostos1.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcostos1_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE tmpcostos1.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_tmpcostos1_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcostos1_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcostos1_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcostos1_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcostos1_costo_mat#_checkColumnConstraints(p_data.costo_mat#) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcostos1_labor_checkColumnConstraints(p_data.labor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcostos1_gastos_checkColumnConstraints(p_data.gastos) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpcostos1_checkTableConstraints
-
-{<BLOCK Name="fct.tmpcostos1_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "tmpcostos1.cod_n" column
-#+
-#+ @param p_cod_n - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcostos1_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE tmpcostos1.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpcostos1_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpcostos1_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "tmpcostos1.cod_grupo" column
-#+
-#+ @param p_cod_grupo - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcostos1_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE tmpcostos1.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpcostos1_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpcostos1_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "tmpcostos1.cod_tipo" column
-#+
-#+ @param p_cod_tipo - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcostos1_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE tmpcostos1.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpcostos1_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpcostos1_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "tmpcostos1.cod_sec" column
-#+
-#+ @param p_cod_sec - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcostos1_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE tmpcostos1.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpcostos1_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpcostos1_costo_mat#_checkColumnConstraints">}
-#+ Check constraints on the "tmpcostos1.costo_mat#" column
-#+
-#+ @param p_costo_mat# - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcostos1_costo_mat#_checkColumnConstraints(p_costo_mat#)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_costo_mat# LIKE tmpcostos1.costo_mat#
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpcostos1_costo_mat#_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpcostos1_labor_checkColumnConstraints">}
-#+ Check constraints on the "tmpcostos1.labor" column
-#+
-#+ @param p_labor - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcostos1_labor_checkColumnConstraints(p_labor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_labor LIKE tmpcostos1.labor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpcostos1_labor_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpcostos1_gastos_checkColumnConstraints">}
-#+ Check constraints on the "tmpcostos1.gastos" column
-#+
-#+ @param p_gastos - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcostos1_gastos_checkColumnConstraints(p_gastos)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_gastos LIKE tmpcostos1.gastos
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpcostos1_gastos_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpcostos_checkTableConstraints">}
-#+ Check constraints on the "tmpcostos" table
-#+
-#+ @param p_data - a row data LIKE tmpcostos.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcostos_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE tmpcostos.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_tmpcostos_ventas_checkColumnConstraints(p_data.ventas) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcostos_ano_checkColumnConstraints(p_data.ano) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcostos_mes_ini_checkColumnConstraints(p_data.mes_ini) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcostos_mes_fin_checkColumnConstraints(p_data.mes_fin) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcostos_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcostos_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcostos_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcostos_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcostos_material_checkColumnConstraints(p_data.material) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcostos_labor_checkColumnConstraints(p_data.labor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcostos_gastos_checkColumnConstraints(p_data.gastos) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcostos_f12_checkColumnConstraints(p_data.f12) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcostos_f13_checkColumnConstraints(p_data.f13) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpcostos_checkTableConstraints
-
-{<BLOCK Name="fct.tmpcostos_ventas_checkColumnConstraints">}
-#+ Check constraints on the "tmpcostos.ventas" column
-#+
-#+ @param p_ventas - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcostos_ventas_checkColumnConstraints(p_ventas)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ventas LIKE tmpcostos.ventas
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpcostos_ventas_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpcostos_ano_checkColumnConstraints">}
-#+ Check constraints on the "tmpcostos.ano" column
-#+
-#+ @param p_ano - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcostos_ano_checkColumnConstraints(p_ano)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ano LIKE tmpcostos.ano
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpcostos_ano_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpcostos_mes_ini_checkColumnConstraints">}
-#+ Check constraints on the "tmpcostos.mes_ini" column
-#+
-#+ @param p_mes_ini - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcostos_mes_ini_checkColumnConstraints(p_mes_ini)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mes_ini LIKE tmpcostos.mes_ini
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpcostos_mes_ini_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpcostos_mes_fin_checkColumnConstraints">}
-#+ Check constraints on the "tmpcostos.mes_fin" column
-#+
-#+ @param p_mes_fin - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcostos_mes_fin_checkColumnConstraints(p_mes_fin)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mes_fin LIKE tmpcostos.mes_fin
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpcostos_mes_fin_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpcostos_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "tmpcostos.cod_n" column
-#+
-#+ @param p_cod_n - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcostos_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE tmpcostos.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpcostos_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpcostos_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "tmpcostos.cod_grupo" column
-#+
-#+ @param p_cod_grupo - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcostos_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE tmpcostos.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpcostos_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpcostos_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "tmpcostos.cod_tipo" column
-#+
-#+ @param p_cod_tipo - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcostos_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE tmpcostos.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpcostos_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpcostos_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "tmpcostos.cod_sec" column
-#+
-#+ @param p_cod_sec - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcostos_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE tmpcostos.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpcostos_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpcostos_material_checkColumnConstraints">}
-#+ Check constraints on the "tmpcostos.material" column
-#+
-#+ @param p_material - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcostos_material_checkColumnConstraints(p_material)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_material LIKE tmpcostos.material
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpcostos_material_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpcostos_labor_checkColumnConstraints">}
-#+ Check constraints on the "tmpcostos.labor" column
-#+
-#+ @param p_labor - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcostos_labor_checkColumnConstraints(p_labor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_labor LIKE tmpcostos.labor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpcostos_labor_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpcostos_gastos_checkColumnConstraints">}
-#+ Check constraints on the "tmpcostos.gastos" column
-#+
-#+ @param p_gastos - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcostos_gastos_checkColumnConstraints(p_gastos)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_gastos LIKE tmpcostos.gastos
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpcostos_gastos_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpcostos_f12_checkColumnConstraints">}
-#+ Check constraints on the "tmpcostos.f12" column
-#+
-#+ @param p_f12 - VARCHAR2(255) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcostos_f12_checkColumnConstraints(p_f12)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_f12 LIKE tmpcostos.f12
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpcostos_f12_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpcostos_f13_checkColumnConstraints">}
-#+ Check constraints on the "tmpcostos.f13" column
-#+
-#+ @param p_f13 - VARCHAR2(255) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcostos_f13_checkColumnConstraints(p_f13)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_f13 LIKE tmpcostos.f13
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpcostos_f13_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpcodsec_checkTableConstraints">}
-#+ Check constraints on the "tmpcodsec" table
-#+
-#+ @param p_data - a row data LIKE tmpcodsec.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcodsec_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE tmpcodsec.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_tmpcodsec_codsec_checkColumnConstraints(p_data.codsec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcodsec_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpcodsec_checkTableConstraints
-
-{<BLOCK Name="fct.tmpcodsec_codsec_checkColumnConstraints">}
-#+ Check constraints on the "tmpcodsec.codsec" column
-#+
-#+ @param p_codsec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcodsec_codsec_checkColumnConstraints(p_codsec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codsec LIKE tmpcodsec.codsec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpcodsec_codsec_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpcodsec_descripcion_checkColumnConstraints">}
-#+ Check constraints on the "tmpcodsec.descripcion" column
-#+
-#+ @param p_descripcion - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcodsec_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE tmpcodsec.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpcodsec_descripcion_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpcodigos1_checkTableConstraints">}
-#+ Check constraints on the "tmpcodigos1" table
-#+
-#+ @param p_data - a row data LIKE tmpcodigos1.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcodigos1_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE tmpcodigos1.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_tmpcodigos1_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcodigos1_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcodigos1_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcodigos1_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcodigos1_material_checkColumnConstraints(p_data.material) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcodigos1_labor_checkColumnConstraints(p_data.labor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcodigos1_gasto_checkColumnConstraints(p_data.gasto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpcodigos1_checkTableConstraints
-
-{<BLOCK Name="fct.tmpcodigos1_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "tmpcodigos1.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcodigos1_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE tmpcodigos1.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpcodigos1_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpcodigos1_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "tmpcodigos1.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcodigos1_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE tmpcodigos1.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpcodigos1_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpcodigos1_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "tmpcodigos1.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcodigos1_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE tmpcodigos1.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpcodigos1_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpcodigos1_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "tmpcodigos1.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcodigos1_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE tmpcodigos1.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpcodigos1_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpcodigos1_material_checkColumnConstraints">}
-#+ Check constraints on the "tmpcodigos1.material" column
-#+
-#+ @param p_material - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcodigos1_material_checkColumnConstraints(p_material)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_material LIKE tmpcodigos1.material
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpcodigos1_material_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpcodigos1_labor_checkColumnConstraints">}
-#+ Check constraints on the "tmpcodigos1.labor" column
-#+
-#+ @param p_labor - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcodigos1_labor_checkColumnConstraints(p_labor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_labor LIKE tmpcodigos1.labor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpcodigos1_labor_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpcodigos1_gasto_checkColumnConstraints">}
-#+ Check constraints on the "tmpcodigos1.gasto" column
-#+
-#+ @param p_gasto - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcodigos1_gasto_checkColumnConstraints(p_gasto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_gasto LIKE tmpcodigos1.gasto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpcodigos1_gasto_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpcodigos_checkTableConstraints">}
-#+ Check constraints on the "tmpcodigos" table
-#+
-#+ @param p_data - a row data LIKE tmpcodigos.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcodigos_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE tmpcodigos.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_tmpcodigos_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcodigos_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcodigos_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcodigos_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpcodigos_checkTableConstraints
-
-{<BLOCK Name="fct.tmpcodigos_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "tmpcodigos.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcodigos_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE tmpcodigos.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpcodigos_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpcodigos_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "tmpcodigos.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcodigos_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE tmpcodigos.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpcodigos_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpcodigos_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "tmpcodigos.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcodigos_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE tmpcodigos.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpcodigos_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpcodigos_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "tmpcodigos.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcodigos_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE tmpcodigos.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpcodigos_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpcodigorepetido_checkTableConstraints">}
-#+ Check constraints on the "tmpcodigorepetido" table
-#+
-#+ @param p_data - a row data LIKE tmpcodigorepetido.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcodigorepetido_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE tmpcodigorepetido.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_tmpcodigorepetido_cod_cia_checkColumnConstraints(p_data.cod_cia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcodigorepetido_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcodigorepetido_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcodigorepetido_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcodigorepetido_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcodigorepetido_cuenta_checkColumnConstraints(p_data.cuenta) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpcodigorepetido_checkTableConstraints
-
-{<BLOCK Name="fct.tmpcodigorepetido_cod_cia_checkColumnConstraints">}
-#+ Check constraints on the "tmpcodigorepetido.cod_cia" column
-#+
-#+ @param p_cod_cia - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcodigorepetido_cod_cia_checkColumnConstraints(p_cod_cia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_cia LIKE tmpcodigorepetido.cod_cia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpcodigorepetido_cod_cia_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpcodigorepetido_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "tmpcodigorepetido.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcodigorepetido_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE tmpcodigorepetido.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpcodigorepetido_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpcodigorepetido_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "tmpcodigorepetido.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcodigorepetido_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE tmpcodigorepetido.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpcodigorepetido_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpcodigorepetido_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "tmpcodigorepetido.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcodigorepetido_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE tmpcodigorepetido.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpcodigorepetido_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpcodigorepetido_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "tmpcodigorepetido.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcodigorepetido_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE tmpcodigorepetido.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpcodigorepetido_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpcodigorepetido_cuenta_checkColumnConstraints">}
-#+ Check constraints on the "tmpcodigorepetido.cuenta" column
-#+
-#+ @param p_cuenta - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcodigorepetido_cuenta_checkColumnConstraints(p_cuenta)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cuenta LIKE tmpcodigorepetido.cuenta
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpcodigorepetido_cuenta_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpcod12_checkTableConstraints">}
-#+ Check constraints on the "tmpcod12" table
-#+
-#+ @param p_data - a row data LIKE tmpcod12.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcod12_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE tmpcod12.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_tmpcod12_ficha_checkColumnConstraints(p_data.ficha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcod12_valor_checkColumnConstraints(p_data.valor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcod12_codmov_checkColumnConstraints(p_data.codmov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpcod12_checkTableConstraints
-
-{<BLOCK Name="fct.tmpcod12_ficha_checkColumnConstraints">}
-#+ Check constraints on the "tmpcod12.ficha" column
-#+
-#+ @param p_ficha - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcod12_ficha_checkColumnConstraints(p_ficha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ficha LIKE tmpcod12.ficha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpcod12_ficha_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpcod12_valor_checkColumnConstraints">}
-#+ Check constraints on the "tmpcod12.valor" column
-#+
-#+ @param p_valor - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcod12_valor_checkColumnConstraints(p_valor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valor LIKE tmpcod12.valor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpcod12_valor_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpcod12_codmov_checkColumnConstraints">}
-#+ Check constraints on the "tmpcod12.codmov" column
-#+
-#+ @param p_codmov - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcod12_codmov_checkColumnConstraints(p_codmov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codmov LIKE tmpcod12.codmov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpcod12_codmov_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpcod11_checkTableConstraints">}
-#+ Check constraints on the "tmpcod11" table
-#+
-#+ @param p_data - a row data LIKE tmpcod11.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcod11_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE tmpcod11.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_tmpcod11_ficha_checkColumnConstraints(p_data.ficha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcod11_valor_checkColumnConstraints(p_data.valor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcod11_codmov_checkColumnConstraints(p_data.codmov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpcod11_checkTableConstraints
-
-{<BLOCK Name="fct.tmpcod11_ficha_checkColumnConstraints">}
-#+ Check constraints on the "tmpcod11.ficha" column
-#+
-#+ @param p_ficha - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcod11_ficha_checkColumnConstraints(p_ficha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ficha LIKE tmpcod11.ficha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpcod11_ficha_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpcod11_valor_checkColumnConstraints">}
-#+ Check constraints on the "tmpcod11.valor" column
-#+
-#+ @param p_valor - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcod11_valor_checkColumnConstraints(p_valor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valor LIKE tmpcod11.valor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpcod11_valor_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpcod11_codmov_checkColumnConstraints">}
-#+ Check constraints on the "tmpcod11.codmov" column
-#+
-#+ @param p_codmov - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcod11_codmov_checkColumnConstraints(p_codmov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codmov LIKE tmpcod11.codmov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpcod11_codmov_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpclientes_checkTableConstraints">}
-#+ Check constraints on the "tmpclientes" table
-#+
-#+ @param p_data - a row data LIKE tmpclientes.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpclientes_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE tmpclientes.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_tmpclientes_tipo_cliente_checkColumnConstraints(p_data.tipo_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpclientes_sec_cliente_checkColumnConstraints(p_data.sec_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpclientes_nombre_checkColumnConstraints(p_data.nombre) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpclientes_cod_zona_checkColumnConstraints(p_data.cod_zona) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpclientes_cod_provincia_checkColumnConstraints(p_data.cod_provincia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpclientes_telefono_checkColumnConstraints(p_data.telefono) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpclientes_fax_checkColumnConstraints(p_data.fax) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpclientes_telex_checkColumnConstraints(p_data.telex) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpclientes_patente_checkColumnConstraints(p_data.patente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpclientes_limite_credito_checkColumnConstraints(p_data.limite_credito) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpclientes_zona_postal_checkColumnConstraints(p_data.zona_postal) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpclientes_num_rnc_checkColumnConstraints(p_data.num_rnc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpclientes_nombre_patente_checkColumnConstraints(p_data.nombre_patente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpclientes_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpclientes_checkTableConstraints
-
-{<BLOCK Name="fct.tmpclientes_tipo_cliente_checkColumnConstraints">}
-#+ Check constraints on the "tmpclientes.tipo_cliente" column
-#+
-#+ @param p_tipo_cliente - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpclientes_tipo_cliente_checkColumnConstraints(p_tipo_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_cliente LIKE tmpclientes.tipo_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpclientes_tipo_cliente_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpclientes_sec_cliente_checkColumnConstraints">}
-#+ Check constraints on the "tmpclientes.sec_cliente" column
-#+
-#+ @param p_sec_cliente - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpclientes_sec_cliente_checkColumnConstraints(p_sec_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_cliente LIKE tmpclientes.sec_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpclientes_sec_cliente_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpclientes_nombre_checkColumnConstraints">}
-#+ Check constraints on the "tmpclientes.nombre" column
-#+
-#+ @param p_nombre - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpclientes_nombre_checkColumnConstraints(p_nombre)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombre LIKE tmpclientes.nombre
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpclientes_nombre_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpclientes_cod_zona_checkColumnConstraints">}
-#+ Check constraints on the "tmpclientes.cod_zona" column
-#+
-#+ @param p_cod_zona - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpclientes_cod_zona_checkColumnConstraints(p_cod_zona)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_zona LIKE tmpclientes.cod_zona
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpclientes_cod_zona_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpclientes_cod_provincia_checkColumnConstraints">}
-#+ Check constraints on the "tmpclientes.cod_provincia" column
-#+
-#+ @param p_cod_provincia - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpclientes_cod_provincia_checkColumnConstraints(p_cod_provincia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_provincia LIKE tmpclientes.cod_provincia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpclientes_cod_provincia_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpclientes_telefono_checkColumnConstraints">}
-#+ Check constraints on the "tmpclientes.telefono" column
-#+
-#+ @param p_telefono - CHAR(16) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpclientes_telefono_checkColumnConstraints(p_telefono)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_telefono LIKE tmpclientes.telefono
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpclientes_telefono_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpclientes_fax_checkColumnConstraints">}
-#+ Check constraints on the "tmpclientes.fax" column
-#+
-#+ @param p_fax - CHAR(16) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpclientes_fax_checkColumnConstraints(p_fax)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fax LIKE tmpclientes.fax
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpclientes_fax_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpclientes_telex_checkColumnConstraints">}
-#+ Check constraints on the "tmpclientes.telex" column
-#+
-#+ @param p_telex - CHAR(16) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpclientes_telex_checkColumnConstraints(p_telex)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_telex LIKE tmpclientes.telex
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpclientes_telex_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpclientes_patente_checkColumnConstraints">}
-#+ Check constraints on the "tmpclientes.patente" column
-#+
-#+ @param p_patente - CHAR(11) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpclientes_patente_checkColumnConstraints(p_patente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_patente LIKE tmpclientes.patente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpclientes_patente_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpclientes_limite_credito_checkColumnConstraints">}
-#+ Check constraints on the "tmpclientes.limite_credito" column
-#+
-#+ @param p_limite_credito - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpclientes_limite_credito_checkColumnConstraints(p_limite_credito)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_limite_credito LIKE tmpclientes.limite_credito
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpclientes_limite_credito_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpclientes_zona_postal_checkColumnConstraints">}
-#+ Check constraints on the "tmpclientes.zona_postal" column
-#+
-#+ @param p_zona_postal - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpclientes_zona_postal_checkColumnConstraints(p_zona_postal)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_zona_postal LIKE tmpclientes.zona_postal
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpclientes_zona_postal_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpclientes_num_rnc_checkColumnConstraints">}
-#+ Check constraints on the "tmpclientes.num_rnc" column
-#+
-#+ @param p_num_rnc - CHAR(11) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpclientes_num_rnc_checkColumnConstraints(p_num_rnc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_rnc LIKE tmpclientes.num_rnc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpclientes_num_rnc_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpclientes_nombre_patente_checkColumnConstraints">}
-#+ Check constraints on the "tmpclientes.nombre_patente" column
-#+
-#+ @param p_nombre_patente - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpclientes_nombre_patente_checkColumnConstraints(p_nombre_patente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombre_patente LIKE tmpclientes.nombre_patente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpclientes_nombre_patente_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpclientes_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "tmpclientes.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpclientes_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE tmpclientes.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpclientes_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpclasificacion_checkTableConstraints">}
-#+ Check constraints on the "tmpclasificacion" table
-#+
-#+ @param p_data - a row data LIKE tmpclasificacion.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpclasificacion_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE tmpclasificacion.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_tmpclasificacion_tipo_cliente_checkColumnConstraints(p_data.tipo_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpclasificacion_sec_cliente_checkColumnConstraints(p_data.sec_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpclasificacion_tipo_negocio_checkColumnConstraints(p_data.tipo_negocio) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpclasificacion_f4_checkColumnConstraints(p_data.f4) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpclasificacion_f5_checkColumnConstraints(p_data.f5) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpclasificacion_f6_checkColumnConstraints(p_data.f6) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpclasificacion_f7_checkColumnConstraints(p_data.f7) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpclasificacion_checkTableConstraints
-
-{<BLOCK Name="fct.tmpclasificacion_tipo_cliente_checkColumnConstraints">}
-#+ Check constraints on the "tmpclasificacion.tipo_cliente" column
-#+
-#+ @param p_tipo_cliente - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpclasificacion_tipo_cliente_checkColumnConstraints(p_tipo_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_cliente LIKE tmpclasificacion.tipo_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpclasificacion_tipo_cliente_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpclasificacion_sec_cliente_checkColumnConstraints">}
-#+ Check constraints on the "tmpclasificacion.sec_cliente" column
-#+
-#+ @param p_sec_cliente - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpclasificacion_sec_cliente_checkColumnConstraints(p_sec_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_cliente LIKE tmpclasificacion.sec_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpclasificacion_sec_cliente_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpclasificacion_tipo_negocio_checkColumnConstraints">}
-#+ Check constraints on the "tmpclasificacion.tipo_negocio" column
-#+
-#+ @param p_tipo_negocio - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpclasificacion_tipo_negocio_checkColumnConstraints(p_tipo_negocio)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_negocio LIKE tmpclasificacion.tipo_negocio
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpclasificacion_tipo_negocio_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpclasificacion_f4_checkColumnConstraints">}
-#+ Check constraints on the "tmpclasificacion.f4" column
-#+
-#+ @param p_f4 - VARCHAR2(255) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpclasificacion_f4_checkColumnConstraints(p_f4)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_f4 LIKE tmpclasificacion.f4
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpclasificacion_f4_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpclasificacion_f5_checkColumnConstraints">}
-#+ Check constraints on the "tmpclasificacion.f5" column
-#+
-#+ @param p_f5 - VARCHAR2(255) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpclasificacion_f5_checkColumnConstraints(p_f5)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_f5 LIKE tmpclasificacion.f5
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpclasificacion_f5_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpclasificacion_f6_checkColumnConstraints">}
-#+ Check constraints on the "tmpclasificacion.f6" column
-#+
-#+ @param p_f6 - VARCHAR2(255) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpclasificacion_f6_checkColumnConstraints(p_f6)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_f6 LIKE tmpclasificacion.f6
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpclasificacion_f6_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpclasificacion_f7_checkColumnConstraints">}
-#+ Check constraints on the "tmpclasificacion.f7" column
-#+
-#+ @param p_f7 - VARCHAR2(255) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpclasificacion_f7_checkColumnConstraints(p_f7)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_f7 LIKE tmpclasificacion.f7
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpclasificacion_f7_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpclase1_checkTableConstraints">}
-#+ Check constraints on the "tmpclase1" table
-#+
-#+ @param p_data - a row data LIKE tmpclase1.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpclase1_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE tmpclase1.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_tmpclase1_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpclase1_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpclase1_checkTableConstraints
-
-{<BLOCK Name="fct.tmpclase1_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "tmpclase1.cod_n" column
-#+
-#+ @param p_cod_n - VARCHAR2(255) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpclase1_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE tmpclase1.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpclase1_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpclase1_descripcion_checkColumnConstraints">}
-#+ Check constraints on the "tmpclase1.descripcion" column
-#+
-#+ @param p_descripcion - VARCHAR2(255) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpclase1_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE tmpclase1.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpclase1_descripcion_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpclase_checkTableConstraints">}
-#+ Check constraints on the "tmpclase" table
-#+
-#+ @param p_data - a row data LIKE tmpclase.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpclase_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE tmpclase.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_tmpclase_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpclase_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- CALL smarmotech_dbxconstraints_tmpclase_pk_tmpclase_checkUniqueConstraint(p_forUpdate, p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpclase_checkTableConstraints
-
-{<BLOCK Name="fct.tmpclase_pk_tmpclase_checkUniqueConstraint">}
-#+ Check the primary key uniqueness constraint on the "tmpclase"
-#+
-#+ @param p_key - Primary Key
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpclase_pk_tmpclase_checkUniqueConstraint(p_forUpdate, p_key)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_key
- RECORD
- tmpclase_cod_n LIKE tmpclase.cod_n
- END RECORD
- DEFINE l_key
- RECORD
- tmpclase_cod_n LIKE tmpclase.cod_n
- END RECORD
- DEFINE l_where STRING
- DEFINE l_sqlQuery STRING
- DEFINE l_count INTEGER
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- LET l_where = "WHERE tmpclase.cod_n = ? "
-
- let l_sqlQuery = "SELECT COUNT(*), cod_n FROM tmpclase ", l_where, " GROUP BY cod_n"
-
- PREPARE cur_tmpclase_pk_tmpclase_checkUniqueConstraint FROM l_sqlQuery
- EXECUTE cur_tmpclase_pk_tmpclase_checkUniqueConstraint INTO l_count, l_key.* USING p_key.*
- FREE cur_tmpclase_pk_tmpclase_checkUniqueConstraint
- IF (NOT p_forUpdate AND l_count > 0) OR (p_forUpdate AND l_count > 0 AND p_key.* != l_key.*) THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_n: " || ERROR_BAM_00002) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpclase_pk_tmpclase_checkUniqueConstraint
-
-{<BLOCK Name="fct.tmpclase_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "tmpclase.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpclase_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE tmpclase.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_n IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_n: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpclase_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpclase_descripcion_checkColumnConstraints">}
-#+ Check constraints on the "tmpclase.descripcion" column
-#+
-#+ @param p_descripcion - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpclase_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE tmpclase.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpclase_descripcion_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpcctb01_checkTableConstraints">}
-#+ Check constraints on the "tmpcctb01" table
-#+
-#+ @param p_data - a row data LIKE tmpcctb01.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcctb01_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE tmpcctb01.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_tmpcctb01_cuenta_no_checkColumnConstraints(p_data.cuenta_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcctb01_cod_cia_checkColumnConstraints(p_data.cod_cia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcctb01_tipo_doc_checkColumnConstraints(p_data.tipo_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcctb01_num_doc_checkColumnConstraints(p_data.num_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcctb01_tipo_cliente_checkColumnConstraints(p_data.tipo_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcctb01_sec_cliente_checkColumnConstraints(p_data.sec_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcctb01_cod_emp_checkColumnConstraints(p_data.cod_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcctb01_cod_emp_sec_checkColumnConstraints(p_data.cod_emp_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcctb01_fecha_orig_checkColumnConstraints(p_data.fecha_orig) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcctb01_fecha_ven_checkColumnConstraints(p_data.fecha_ven) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcctb01_aplica_a_checkColumnConstraints(p_data.aplica_a) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcctb01_banco_checkColumnConstraints(p_data.banco) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcctb01_num_cheque_checkColumnConstraints(p_data.num_cheque) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcctb01_valor_checkColumnConstraints(p_data.valor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcctb01_valor_efectivo_checkColumnConstraints(p_data.valor_efectivo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcctb01_valor_cheque_checkColumnConstraints(p_data.valor_cheque) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcctb01_costo_checkColumnConstraints(p_data.costo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcctb01_monto_desc_checkColumnConstraints(p_data.monto_desc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcctb01_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcctb01_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcctb01_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcctb01_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcctb01_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpcctb01_checkTableConstraints
-
-{<BLOCK Name="fct.tmpcctb01_cuenta_no_checkColumnConstraints">}
-#+ Check constraints on the "tmpcctb01.cuenta_no" column
-#+
-#+ @param p_cuenta_no - CHAR(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcctb01_cuenta_no_checkColumnConstraints(p_cuenta_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cuenta_no LIKE tmpcctb01.cuenta_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpcctb01_cuenta_no_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpcctb01_cod_cia_checkColumnConstraints">}
-#+ Check constraints on the "tmpcctb01.cod_cia" column
-#+
-#+ @param p_cod_cia - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcctb01_cod_cia_checkColumnConstraints(p_cod_cia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_cia LIKE tmpcctb01.cod_cia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpcctb01_cod_cia_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpcctb01_tipo_doc_checkColumnConstraints">}
-#+ Check constraints on the "tmpcctb01.tipo_doc" column
-#+
-#+ @param p_tipo_doc - CHAR(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcctb01_tipo_doc_checkColumnConstraints(p_tipo_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_doc LIKE tmpcctb01.tipo_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpcctb01_tipo_doc_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpcctb01_num_doc_checkColumnConstraints">}
-#+ Check constraints on the "tmpcctb01.num_doc" column
-#+
-#+ @param p_num_doc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcctb01_num_doc_checkColumnConstraints(p_num_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_doc LIKE tmpcctb01.num_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_num_doc IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- num_doc: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpcctb01_num_doc_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpcctb01_tipo_cliente_checkColumnConstraints">}
-#+ Check constraints on the "tmpcctb01.tipo_cliente" column
-#+
-#+ @param p_tipo_cliente - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcctb01_tipo_cliente_checkColumnConstraints(p_tipo_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_cliente LIKE tmpcctb01.tipo_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpcctb01_tipo_cliente_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpcctb01_sec_cliente_checkColumnConstraints">}
-#+ Check constraints on the "tmpcctb01.sec_cliente" column
-#+
-#+ @param p_sec_cliente - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcctb01_sec_cliente_checkColumnConstraints(p_sec_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_cliente LIKE tmpcctb01.sec_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpcctb01_sec_cliente_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpcctb01_cod_emp_checkColumnConstraints">}
-#+ Check constraints on the "tmpcctb01.cod_emp" column
-#+
-#+ @param p_cod_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcctb01_cod_emp_checkColumnConstraints(p_cod_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_emp LIKE tmpcctb01.cod_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpcctb01_cod_emp_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpcctb01_cod_emp_sec_checkColumnConstraints">}
-#+ Check constraints on the "tmpcctb01.cod_emp_sec" column
-#+
-#+ @param p_cod_emp_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcctb01_cod_emp_sec_checkColumnConstraints(p_cod_emp_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_emp_sec LIKE tmpcctb01.cod_emp_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpcctb01_cod_emp_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpcctb01_fecha_orig_checkColumnConstraints">}
-#+ Check constraints on the "tmpcctb01.fecha_orig" column
-#+
-#+ @param p_fecha_orig - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcctb01_fecha_orig_checkColumnConstraints(p_fecha_orig)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_orig LIKE tmpcctb01.fecha_orig
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpcctb01_fecha_orig_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpcctb01_fecha_ven_checkColumnConstraints">}
-#+ Check constraints on the "tmpcctb01.fecha_ven" column
-#+
-#+ @param p_fecha_ven - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcctb01_fecha_ven_checkColumnConstraints(p_fecha_ven)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_ven LIKE tmpcctb01.fecha_ven
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpcctb01_fecha_ven_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpcctb01_aplica_a_checkColumnConstraints">}
-#+ Check constraints on the "tmpcctb01.aplica_a" column
-#+
-#+ @param p_aplica_a - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcctb01_aplica_a_checkColumnConstraints(p_aplica_a)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_aplica_a LIKE tmpcctb01.aplica_a
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpcctb01_aplica_a_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpcctb01_banco_checkColumnConstraints">}
-#+ Check constraints on the "tmpcctb01.banco" column
-#+
-#+ @param p_banco - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcctb01_banco_checkColumnConstraints(p_banco)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_banco LIKE tmpcctb01.banco
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpcctb01_banco_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpcctb01_num_cheque_checkColumnConstraints">}
-#+ Check constraints on the "tmpcctb01.num_cheque" column
-#+
-#+ @param p_num_cheque - CHAR(12) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcctb01_num_cheque_checkColumnConstraints(p_num_cheque)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_cheque LIKE tmpcctb01.num_cheque
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpcctb01_num_cheque_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpcctb01_valor_checkColumnConstraints">}
-#+ Check constraints on the "tmpcctb01.valor" column
-#+
-#+ @param p_valor - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcctb01_valor_checkColumnConstraints(p_valor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valor LIKE tmpcctb01.valor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_valor IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- valor: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpcctb01_valor_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpcctb01_valor_efectivo_checkColumnConstraints">}
-#+ Check constraints on the "tmpcctb01.valor_efectivo" column
-#+
-#+ @param p_valor_efectivo - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcctb01_valor_efectivo_checkColumnConstraints(p_valor_efectivo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valor_efectivo LIKE tmpcctb01.valor_efectivo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpcctb01_valor_efectivo_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpcctb01_valor_cheque_checkColumnConstraints">}
-#+ Check constraints on the "tmpcctb01.valor_cheque" column
-#+
-#+ @param p_valor_cheque - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcctb01_valor_cheque_checkColumnConstraints(p_valor_cheque)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valor_cheque LIKE tmpcctb01.valor_cheque
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpcctb01_valor_cheque_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpcctb01_costo_checkColumnConstraints">}
-#+ Check constraints on the "tmpcctb01.costo" column
-#+
-#+ @param p_costo - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcctb01_costo_checkColumnConstraints(p_costo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_costo LIKE tmpcctb01.costo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpcctb01_costo_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpcctb01_monto_desc_checkColumnConstraints">}
-#+ Check constraints on the "tmpcctb01.monto_desc" column
-#+
-#+ @param p_monto_desc - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcctb01_monto_desc_checkColumnConstraints(p_monto_desc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_monto_desc LIKE tmpcctb01.monto_desc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpcctb01_monto_desc_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpcctb01_status_t_checkColumnConstraints">}
-#+ Check constraints on the "tmpcctb01.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcctb01_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE tmpcctb01.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpcctb01_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpcctb01_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "tmpcctb01.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcctb01_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE tmpcctb01.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpcctb01_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpcctb01_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "tmpcctb01.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcctb01_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE tmpcctb01.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpcctb01_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpcctb01_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "tmpcctb01.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcctb01_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE tmpcctb01.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpcctb01_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpcctb01_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "tmpcctb01.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcctb01_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE tmpcctb01.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpcctb01_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpcam_checkTableConstraints">}
-#+ Check constraints on the "tmpcam" table
-#+
-#+ @param p_data - a row data LIKE tmpcam.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcam_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE tmpcam.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_tmpcam_labor_checkColumnConstraints(p_data.labor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcam_gasto_checkColumnConstraints(p_data.gasto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcam_codn_checkColumnConstraints(p_data.codn) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcam_codgrupo_checkColumnConstraints(p_data.codgrupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcam_codtipo_checkColumnConstraints(p_data.codtipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpcam_codsec_checkColumnConstraints(p_data.codsec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpcam_checkTableConstraints
-
-{<BLOCK Name="fct.tmpcam_labor_checkColumnConstraints">}
-#+ Check constraints on the "tmpcam.labor" column
-#+
-#+ @param p_labor - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcam_labor_checkColumnConstraints(p_labor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_labor LIKE tmpcam.labor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpcam_labor_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpcam_gasto_checkColumnConstraints">}
-#+ Check constraints on the "tmpcam.gasto" column
-#+
-#+ @param p_gasto - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcam_gasto_checkColumnConstraints(p_gasto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_gasto LIKE tmpcam.gasto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpcam_gasto_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpcam_codn_checkColumnConstraints">}
-#+ Check constraints on the "tmpcam.codn" column
-#+
-#+ @param p_codn - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcam_codn_checkColumnConstraints(p_codn)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codn LIKE tmpcam.codn
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpcam_codn_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpcam_codgrupo_checkColumnConstraints">}
-#+ Check constraints on the "tmpcam.codgrupo" column
-#+
-#+ @param p_codgrupo - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcam_codgrupo_checkColumnConstraints(p_codgrupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codgrupo LIKE tmpcam.codgrupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpcam_codgrupo_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpcam_codtipo_checkColumnConstraints">}
-#+ Check constraints on the "tmpcam.codtipo" column
-#+
-#+ @param p_codtipo - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcam_codtipo_checkColumnConstraints(p_codtipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codtipo LIKE tmpcam.codtipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpcam_codtipo_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpcam_codsec_checkColumnConstraints">}
-#+ Check constraints on the "tmpcam.codsec" column
-#+
-#+ @param p_codsec - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpcam_codsec_checkColumnConstraints(p_codsec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codsec LIKE tmpcam.codsec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpcam_codsec_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpaumento_checkTableConstraints">}
-#+ Check constraints on the "tmpaumento" table
-#+
-#+ @param p_data - a row data LIKE tmpaumento.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpaumento_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE tmpaumento.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_tmpaumento_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpaumento_num_nomi_checkColumnConstraints(p_data.num_nomi) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpaumento_num_emp_checkColumnConstraints(p_data.num_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpaumento_valor_checkColumnConstraints(p_data.valor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpaumento_cod_mov_checkColumnConstraints(p_data.cod_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpaumento_checkTableConstraints
-
-{<BLOCK Name="fct.tmpaumento_fecha_checkColumnConstraints">}
-#+ Check constraints on the "tmpaumento.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpaumento_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE tmpaumento.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpaumento_fecha_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpaumento_num_nomi_checkColumnConstraints">}
-#+ Check constraints on the "tmpaumento.num_nomi" column
-#+
-#+ @param p_num_nomi - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpaumento_num_nomi_checkColumnConstraints(p_num_nomi)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_nomi LIKE tmpaumento.num_nomi
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpaumento_num_nomi_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpaumento_num_emp_checkColumnConstraints">}
-#+ Check constraints on the "tmpaumento.num_emp" column
-#+
-#+ @param p_num_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpaumento_num_emp_checkColumnConstraints(p_num_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_emp LIKE tmpaumento.num_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpaumento_num_emp_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpaumento_valor_checkColumnConstraints">}
-#+ Check constraints on the "tmpaumento.valor" column
-#+
-#+ @param p_valor - DECIMAL(18,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpaumento_valor_checkColumnConstraints(p_valor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valor LIKE tmpaumento.valor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpaumento_valor_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpaumento_cod_mov_checkColumnConstraints">}
-#+ Check constraints on the "tmpaumento.cod_mov" column
-#+
-#+ @param p_cod_mov - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpaumento_cod_mov_checkColumnConstraints(p_cod_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mov LIKE tmpaumento.cod_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpaumento_cod_mov_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpactualiza_checkTableConstraints">}
-#+ Check constraints on the "tmpactualiza" table
-#+
-#+ @param p_data - a row data LIKE tmpactualiza.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpactualiza_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE tmpactualiza.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_tmpactualiza_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpactualiza_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpactualiza_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpactualiza_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpactualiza_cod1_checkColumnConstraints(p_data.cod1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpactualiza_grupo1_checkColumnConstraints(p_data.grupo1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpactualiza_tipo2_checkColumnConstraints(p_data.tipo2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmpactualiza_sec1_checkColumnConstraints(p_data.sec1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpactualiza_checkTableConstraints
-
-{<BLOCK Name="fct.tmpactualiza_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "tmpactualiza.cod_n" column
-#+
-#+ @param p_cod_n - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpactualiza_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE tmpactualiza.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpactualiza_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpactualiza_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "tmpactualiza.cod_grupo" column
-#+
-#+ @param p_cod_grupo - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpactualiza_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE tmpactualiza.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpactualiza_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpactualiza_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "tmpactualiza.cod_tipo" column
-#+
-#+ @param p_cod_tipo - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpactualiza_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE tmpactualiza.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpactualiza_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpactualiza_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "tmpactualiza.cod_sec" column
-#+
-#+ @param p_cod_sec - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpactualiza_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE tmpactualiza.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpactualiza_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpactualiza_cod1_checkColumnConstraints">}
-#+ Check constraints on the "tmpactualiza.cod1" column
-#+
-#+ @param p_cod1 - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpactualiza_cod1_checkColumnConstraints(p_cod1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod1 LIKE tmpactualiza.cod1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpactualiza_cod1_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpactualiza_grupo1_checkColumnConstraints">}
-#+ Check constraints on the "tmpactualiza.grupo1" column
-#+
-#+ @param p_grupo1 - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpactualiza_grupo1_checkColumnConstraints(p_grupo1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_grupo1 LIKE tmpactualiza.grupo1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpactualiza_grupo1_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpactualiza_tipo2_checkColumnConstraints">}
-#+ Check constraints on the "tmpactualiza.tipo2" column
-#+
-#+ @param p_tipo2 - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpactualiza_tipo2_checkColumnConstraints(p_tipo2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo2 LIKE tmpactualiza.tipo2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpactualiza_tipo2_checkColumnConstraints
-
-{<BLOCK Name="fct.tmpactualiza_sec1_checkColumnConstraints">}
-#+ Check constraints on the "tmpactualiza.sec1" column
-#+
-#+ @param p_sec1 - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmpactualiza_sec1_checkColumnConstraints(p_sec1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec1 LIKE tmpactualiza.sec1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmpactualiza_sec1_checkColumnConstraints
-
-{<BLOCK Name="fct.tmp_kit_checkTableConstraints">}
-#+ Check constraints on the "tmp_kit" table
-#+
-#+ @param p_data - a row data LIKE tmp_kit.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmp_kit_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE tmp_kit.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_tmp_kit_id_kit_checkColumnConstraints(p_data.id_kit) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmp_kit_cotizacion_no_checkColumnConstraints(p_data.cotizacion_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmp_kit_area_checkColumnConstraints(p_data.area) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmp_kit_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmp_kit_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmp_kit_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmp_kit_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmp_kit_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmp_kit_precio_checkColumnConstraints(p_data.precio) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmp_kit_porc_desc_checkColumnConstraints(p_data.porc_desc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmp_kit_checkTableConstraints
-
-{<BLOCK Name="fct.tmp_kit_id_kit_checkColumnConstraints">}
-#+ Check constraints on the "tmp_kit.id_kit" column
-#+
-#+ @param p_id_kit - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmp_kit_id_kit_checkColumnConstraints(p_id_kit)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_id_kit LIKE tmp_kit.id_kit
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmp_kit_id_kit_checkColumnConstraints
-
-{<BLOCK Name="fct.tmp_kit_cotizacion_no_checkColumnConstraints">}
-#+ Check constraints on the "tmp_kit.cotizacion_no" column
-#+
-#+ @param p_cotizacion_no - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmp_kit_cotizacion_no_checkColumnConstraints(p_cotizacion_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cotizacion_no LIKE tmp_kit.cotizacion_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmp_kit_cotizacion_no_checkColumnConstraints
-
-{<BLOCK Name="fct.tmp_kit_area_checkColumnConstraints">}
-#+ Check constraints on the "tmp_kit.area" column
-#+
-#+ @param p_area - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmp_kit_area_checkColumnConstraints(p_area)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_area LIKE tmp_kit.area
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmp_kit_area_checkColumnConstraints
-
-{<BLOCK Name="fct.tmp_kit_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "tmp_kit.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmp_kit_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE tmp_kit.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmp_kit_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.tmp_kit_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "tmp_kit.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmp_kit_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE tmp_kit.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmp_kit_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.tmp_kit_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "tmp_kit.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmp_kit_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE tmp_kit.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmp_kit_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.tmp_kit_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "tmp_kit.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmp_kit_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE tmp_kit.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmp_kit_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.tmp_kit_cantidad_checkColumnConstraints">}
-#+ Check constraints on the "tmp_kit.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmp_kit_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE tmp_kit.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmp_kit_cantidad_checkColumnConstraints
-
-{<BLOCK Name="fct.tmp_kit_precio_checkColumnConstraints">}
-#+ Check constraints on the "tmp_kit.precio" column
-#+
-#+ @param p_precio - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmp_kit_precio_checkColumnConstraints(p_precio)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_precio LIKE tmp_kit.precio
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmp_kit_precio_checkColumnConstraints
-
-{<BLOCK Name="fct.tmp_kit_porc_desc_checkColumnConstraints">}
-#+ Check constraints on the "tmp_kit.porc_desc" column
-#+
-#+ @param p_porc_desc - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmp_kit_porc_desc_checkColumnConstraints(p_porc_desc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_porc_desc LIKE tmp_kit.porc_desc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmp_kit_porc_desc_checkColumnConstraints
-
-{<BLOCK Name="fct.tmp3iptb00012_checkTableConstraints">}
-#+ Check constraints on the "tmp3iptb00012" table
-#+
-#+ @param p_data - a row data LIKE tmp3iptb00012.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmp3iptb00012_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE tmp3iptb00012.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_tmp3iptb00012_idtrx_checkColumnConstraints(p_data.idtrx) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmp3iptb00012_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmp3iptb00012_bodega_checkColumnConstraints(p_data.bodega) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmp3iptb00012_cod_seccion_checkColumnConstraints(p_data.cod_seccion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmp3iptb00012_cod_tramo_checkColumnConstraints(p_data.cod_tramo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmp3iptb00012_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmp3iptb00012_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmp3iptb00012_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmp3iptb00012_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmp3iptb00012_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmp3iptb00012_balance_checkColumnConstraints(p_data.balance) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmp3iptb00012_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmp3iptb00012_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmp3iptb00012_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmp3iptb00012_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmp3iptb00012_lado_1_checkColumnConstraints(p_data.lado_1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmp3iptb00012_lado_2_checkColumnConstraints(p_data.lado_2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmp3iptb00012_lado_3_checkColumnConstraints(p_data.lado_3) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmp3iptb00012_checkTableConstraints
-
-{<BLOCK Name="fct.tmp3iptb00012_idtrx_checkColumnConstraints">}
-#+ Check constraints on the "tmp3iptb00012.idtrx" column
-#+
-#+ @param p_idtrx - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmp3iptb00012_idtrx_checkColumnConstraints(p_idtrx)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_idtrx LIKE tmp3iptb00012.idtrx
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmp3iptb00012_idtrx_checkColumnConstraints
-
-{<BLOCK Name="fct.tmp3iptb00012_fecha_checkColumnConstraints">}
-#+ Check constraints on the "tmp3iptb00012.fecha" column
-#+
-#+ @param p_fecha - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmp3iptb00012_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE tmp3iptb00012.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmp3iptb00012_fecha_checkColumnConstraints
-
-{<BLOCK Name="fct.tmp3iptb00012_bodega_checkColumnConstraints">}
-#+ Check constraints on the "tmp3iptb00012.bodega" column
-#+
-#+ @param p_bodega - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmp3iptb00012_bodega_checkColumnConstraints(p_bodega)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_bodega LIKE tmp3iptb00012.bodega
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmp3iptb00012_bodega_checkColumnConstraints
-
-{<BLOCK Name="fct.tmp3iptb00012_cod_seccion_checkColumnConstraints">}
-#+ Check constraints on the "tmp3iptb00012.cod_seccion" column
-#+
-#+ @param p_cod_seccion - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmp3iptb00012_cod_seccion_checkColumnConstraints(p_cod_seccion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_seccion LIKE tmp3iptb00012.cod_seccion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmp3iptb00012_cod_seccion_checkColumnConstraints
-
-{<BLOCK Name="fct.tmp3iptb00012_cod_tramo_checkColumnConstraints">}
-#+ Check constraints on the "tmp3iptb00012.cod_tramo" column
-#+
-#+ @param p_cod_tramo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmp3iptb00012_cod_tramo_checkColumnConstraints(p_cod_tramo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tramo LIKE tmp3iptb00012.cod_tramo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmp3iptb00012_cod_tramo_checkColumnConstraints
-
-{<BLOCK Name="fct.tmp3iptb00012_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "tmp3iptb00012.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmp3iptb00012_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE tmp3iptb00012.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmp3iptb00012_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.tmp3iptb00012_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "tmp3iptb00012.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmp3iptb00012_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE tmp3iptb00012.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmp3iptb00012_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.tmp3iptb00012_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "tmp3iptb00012.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmp3iptb00012_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE tmp3iptb00012.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmp3iptb00012_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.tmp3iptb00012_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "tmp3iptb00012.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmp3iptb00012_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE tmp3iptb00012.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmp3iptb00012_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.tmp3iptb00012_cantidad_checkColumnConstraints">}
-#+ Check constraints on the "tmp3iptb00012.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmp3iptb00012_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE tmp3iptb00012.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmp3iptb00012_cantidad_checkColumnConstraints
-
-{<BLOCK Name="fct.tmp3iptb00012_balance_checkColumnConstraints">}
-#+ Check constraints on the "tmp3iptb00012.balance" column
-#+
-#+ @param p_balance - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmp3iptb00012_balance_checkColumnConstraints(p_balance)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_balance LIKE tmp3iptb00012.balance
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmp3iptb00012_balance_checkColumnConstraints
-
-{<BLOCK Name="fct.tmp3iptb00012_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "tmp3iptb00012.us_crea" column
-#+
-#+ @param p_us_crea - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmp3iptb00012_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE tmp3iptb00012.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmp3iptb00012_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.tmp3iptb00012_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "tmp3iptb00012.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmp3iptb00012_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE tmp3iptb00012.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmp3iptb00012_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.tmp3iptb00012_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "tmp3iptb00012.us_mod" column
-#+
-#+ @param p_us_mod - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmp3iptb00012_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE tmp3iptb00012.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmp3iptb00012_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.tmp3iptb00012_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "tmp3iptb00012.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmp3iptb00012_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE tmp3iptb00012.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmp3iptb00012_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.tmp3iptb00012_lado_1_checkColumnConstraints">}
-#+ Check constraints on the "tmp3iptb00012.lado_1" column
-#+
-#+ @param p_lado_1 - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmp3iptb00012_lado_1_checkColumnConstraints(p_lado_1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_lado_1 LIKE tmp3iptb00012.lado_1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmp3iptb00012_lado_1_checkColumnConstraints
-
-{<BLOCK Name="fct.tmp3iptb00012_lado_2_checkColumnConstraints">}
-#+ Check constraints on the "tmp3iptb00012.lado_2" column
-#+
-#+ @param p_lado_2 - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmp3iptb00012_lado_2_checkColumnConstraints(p_lado_2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_lado_2 LIKE tmp3iptb00012.lado_2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmp3iptb00012_lado_2_checkColumnConstraints
-
-{<BLOCK Name="fct.tmp3iptb00012_lado_3_checkColumnConstraints">}
-#+ Check constraints on the "tmp3iptb00012.lado_3" column
-#+
-#+ @param p_lado_3 - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmp3iptb00012_lado_3_checkColumnConstraints(p_lado_3)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_lado_3 LIKE tmp3iptb00012.lado_3
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmp3iptb00012_lado_3_checkColumnConstraints
-
-{<BLOCK Name="fct.tmp2iptb00012_checkTableConstraints">}
-#+ Check constraints on the "tmp2iptb00012" table
-#+
-#+ @param p_data - a row data LIKE tmp2iptb00012.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmp2iptb00012_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE tmp2iptb00012.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_tmp2iptb00012_idtrx_checkColumnConstraints(p_data.idtrx) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmp2iptb00012_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmp2iptb00012_bodega_checkColumnConstraints(p_data.bodega) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmp2iptb00012_cod_seccion_checkColumnConstraints(p_data.cod_seccion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmp2iptb00012_cod_tramo_checkColumnConstraints(p_data.cod_tramo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmp2iptb00012_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmp2iptb00012_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmp2iptb00012_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmp2iptb00012_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmp2iptb00012_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmp2iptb00012_balance_checkColumnConstraints(p_data.balance) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmp2iptb00012_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmp2iptb00012_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmp2iptb00012_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmp2iptb00012_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmp2iptb00012_lado_1_checkColumnConstraints(p_data.lado_1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmp2iptb00012_lado_2_checkColumnConstraints(p_data.lado_2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tmp2iptb00012_lado_3_checkColumnConstraints(p_data.lado_3) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmp2iptb00012_checkTableConstraints
-
-{<BLOCK Name="fct.tmp2iptb00012_idtrx_checkColumnConstraints">}
-#+ Check constraints on the "tmp2iptb00012.idtrx" column
-#+
-#+ @param p_idtrx - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmp2iptb00012_idtrx_checkColumnConstraints(p_idtrx)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_idtrx LIKE tmp2iptb00012.idtrx
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmp2iptb00012_idtrx_checkColumnConstraints
-
-{<BLOCK Name="fct.tmp2iptb00012_fecha_checkColumnConstraints">}
-#+ Check constraints on the "tmp2iptb00012.fecha" column
-#+
-#+ @param p_fecha - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmp2iptb00012_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE tmp2iptb00012.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmp2iptb00012_fecha_checkColumnConstraints
-
-{<BLOCK Name="fct.tmp2iptb00012_bodega_checkColumnConstraints">}
-#+ Check constraints on the "tmp2iptb00012.bodega" column
-#+
-#+ @param p_bodega - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmp2iptb00012_bodega_checkColumnConstraints(p_bodega)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_bodega LIKE tmp2iptb00012.bodega
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmp2iptb00012_bodega_checkColumnConstraints
-
-{<BLOCK Name="fct.tmp2iptb00012_cod_seccion_checkColumnConstraints">}
-#+ Check constraints on the "tmp2iptb00012.cod_seccion" column
-#+
-#+ @param p_cod_seccion - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmp2iptb00012_cod_seccion_checkColumnConstraints(p_cod_seccion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_seccion LIKE tmp2iptb00012.cod_seccion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmp2iptb00012_cod_seccion_checkColumnConstraints
-
-{<BLOCK Name="fct.tmp2iptb00012_cod_tramo_checkColumnConstraints">}
-#+ Check constraints on the "tmp2iptb00012.cod_tramo" column
-#+
-#+ @param p_cod_tramo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmp2iptb00012_cod_tramo_checkColumnConstraints(p_cod_tramo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tramo LIKE tmp2iptb00012.cod_tramo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmp2iptb00012_cod_tramo_checkColumnConstraints
-
-{<BLOCK Name="fct.tmp2iptb00012_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "tmp2iptb00012.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmp2iptb00012_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE tmp2iptb00012.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmp2iptb00012_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.tmp2iptb00012_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "tmp2iptb00012.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmp2iptb00012_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE tmp2iptb00012.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmp2iptb00012_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.tmp2iptb00012_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "tmp2iptb00012.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmp2iptb00012_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE tmp2iptb00012.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmp2iptb00012_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.tmp2iptb00012_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "tmp2iptb00012.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmp2iptb00012_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE tmp2iptb00012.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmp2iptb00012_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.tmp2iptb00012_cantidad_checkColumnConstraints">}
-#+ Check constraints on the "tmp2iptb00012.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmp2iptb00012_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE tmp2iptb00012.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmp2iptb00012_cantidad_checkColumnConstraints
-
-{<BLOCK Name="fct.tmp2iptb00012_balance_checkColumnConstraints">}
-#+ Check constraints on the "tmp2iptb00012.balance" column
-#+
-#+ @param p_balance - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmp2iptb00012_balance_checkColumnConstraints(p_balance)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_balance LIKE tmp2iptb00012.balance
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmp2iptb00012_balance_checkColumnConstraints
-
-{<BLOCK Name="fct.tmp2iptb00012_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "tmp2iptb00012.us_crea" column
-#+
-#+ @param p_us_crea - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmp2iptb00012_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE tmp2iptb00012.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmp2iptb00012_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.tmp2iptb00012_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "tmp2iptb00012.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmp2iptb00012_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE tmp2iptb00012.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmp2iptb00012_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.tmp2iptb00012_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "tmp2iptb00012.us_mod" column
-#+
-#+ @param p_us_mod - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmp2iptb00012_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE tmp2iptb00012.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmp2iptb00012_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.tmp2iptb00012_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "tmp2iptb00012.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmp2iptb00012_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE tmp2iptb00012.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmp2iptb00012_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.tmp2iptb00012_lado_1_checkColumnConstraints">}
-#+ Check constraints on the "tmp2iptb00012.lado_1" column
-#+
-#+ @param p_lado_1 - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmp2iptb00012_lado_1_checkColumnConstraints(p_lado_1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_lado_1 LIKE tmp2iptb00012.lado_1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmp2iptb00012_lado_1_checkColumnConstraints
-
-{<BLOCK Name="fct.tmp2iptb00012_lado_2_checkColumnConstraints">}
-#+ Check constraints on the "tmp2iptb00012.lado_2" column
-#+
-#+ @param p_lado_2 - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmp2iptb00012_lado_2_checkColumnConstraints(p_lado_2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_lado_2 LIKE tmp2iptb00012.lado_2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmp2iptb00012_lado_2_checkColumnConstraints
-
-{<BLOCK Name="fct.tmp2iptb00012_lado_3_checkColumnConstraints">}
-#+ Check constraints on the "tmp2iptb00012.lado_3" column
-#+
-#+ @param p_lado_3 - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tmp2iptb00012_lado_3_checkColumnConstraints(p_lado_3)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_lado_3 LIKE tmp2iptb00012.lado_3
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tmp2iptb00012_lado_3_checkColumnConstraints
-
-{<BLOCK Name="fct.tetb00006_checkTableConstraints">}
-#+ Check constraints on the "tetb00006" table
-#+
-#+ @param p_data - a row data LIKE tetb00006.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_tetb00006_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE tetb00006.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_tetb00006_cheque_no_checkColumnConstraints(p_data.cheque_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tetb00006_banco_checkColumnConstraints(p_data.banco) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tetb00006_codigo_checkColumnConstraints(p_data.codigo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tetb00006_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tetb00006_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tetb00006_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tetb00006_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tetb00006_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tetb00006_checkTableConstraints
-
-{<BLOCK Name="fct.tetb00006_cheque_no_checkColumnConstraints">}
-#+ Check constraints on the "tetb00006.cheque_no" column
-#+
-#+ @param p_cheque_no - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tetb00006_cheque_no_checkColumnConstraints(p_cheque_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cheque_no LIKE tetb00006.cheque_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tetb00006_cheque_no_checkColumnConstraints
-
-{<BLOCK Name="fct.tetb00006_banco_checkColumnConstraints">}
-#+ Check constraints on the "tetb00006.banco" column
-#+
-#+ @param p_banco - CHAR(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tetb00006_banco_checkColumnConstraints(p_banco)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_banco LIKE tetb00006.banco
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tetb00006_banco_checkColumnConstraints
-
-{<BLOCK Name="fct.tetb00006_codigo_checkColumnConstraints">}
-#+ Check constraints on the "tetb00006.codigo" column
-#+
-#+ @param p_codigo - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tetb00006_codigo_checkColumnConstraints(p_codigo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codigo LIKE tetb00006.codigo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tetb00006_codigo_checkColumnConstraints
-
-{<BLOCK Name="fct.tetb00006_status_t_checkColumnConstraints">}
-#+ Check constraints on the "tetb00006.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tetb00006_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE tetb00006.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tetb00006_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.tetb00006_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "tetb00006.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tetb00006_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE tetb00006.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tetb00006_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.tetb00006_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "tetb00006.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tetb00006_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE tetb00006.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tetb00006_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.tetb00006_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "tetb00006.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tetb00006_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE tetb00006.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tetb00006_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.tetb00006_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "tetb00006.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tetb00006_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE tetb00006.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tetb00006_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.tetb00003_checkTableConstraints">}
-#+ Check constraints on the "tetb00003" table
-#+
-#+ @param p_data - a row data LIKE tetb00003.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_tetb00003_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE tetb00003.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_tetb00003_codigo_checkColumnConstraints(p_data.codigo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tetb00003_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tetb00003_tipo_checkColumnConstraints(p_data.tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tetb00003_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tetb00003_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tetb00003_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tetb00003_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_tetb00003_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tetb00003_checkTableConstraints
-
-{<BLOCK Name="fct.tetb00003_codigo_checkColumnConstraints">}
-#+ Check constraints on the "tetb00003.codigo" column
-#+
-#+ @param p_codigo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tetb00003_codigo_checkColumnConstraints(p_codigo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codigo LIKE tetb00003.codigo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tetb00003_codigo_checkColumnConstraints
-
-{<BLOCK Name="fct.tetb00003_descripcion_checkColumnConstraints">}
-#+ Check constraints on the "tetb00003.descripcion" column
-#+
-#+ @param p_descripcion - VARCHAR2(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tetb00003_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE tetb00003.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tetb00003_descripcion_checkColumnConstraints
-
-{<BLOCK Name="fct.tetb00003_tipo_checkColumnConstraints">}
-#+ Check constraints on the "tetb00003.tipo" column
-#+
-#+ @param p_tipo - VARCHAR2(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tetb00003_tipo_checkColumnConstraints(p_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo LIKE tetb00003.tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tetb00003_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.tetb00003_status_t_checkColumnConstraints">}
-#+ Check constraints on the "tetb00003.status_t" column
-#+
-#+ @param p_status_t - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tetb00003_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE tetb00003.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tetb00003_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.tetb00003_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "tetb00003.us_crea" column
-#+
-#+ @param p_us_crea - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tetb00003_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE tetb00003.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tetb00003_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.tetb00003_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "tetb00003.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tetb00003_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE tetb00003.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tetb00003_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.tetb00003_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "tetb00003.us_mod" column
-#+
-#+ @param p_us_mod - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tetb00003_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE tetb00003.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tetb00003_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.tetb00003_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "tetb00003.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_tetb00003_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE tetb00003.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.tetb00003_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.sysdiagrams_checkTableConstraints">}
-#+ Check constraints on the "sysdiagrams" table
-#+
-#+ @param p_data - a row data LIKE sysdiagrams.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_sysdiagrams_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE sysdiagrams.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_sysdiagrams_name_checkColumnConstraints(p_data.name) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_sysdiagrams_principal_id_checkColumnConstraints(p_data.principal_id) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_sysdiagrams_diagram_id_checkColumnConstraints(p_data.diagram_id) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_sysdiagrams_version_checkColumnConstraints(p_data.version) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_sysdiagrams_definition_checkColumnConstraints(p_data.definition) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- CALL smarmotech_dbxconstraints_sysdiagrams_pk__sysdiagr__c2b05b6156e8e7ab_checkUniqueConstraint(p_forUpdate, p_data.diagram_id) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_sysdiagrams_uk_principal_name_checkUniqueConstraint(p_forUpdate, p_data.principal_id, p_data.name, p_data.diagram_id) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.sysdiagrams_checkTableConstraints
-
-{<BLOCK Name="fct.sysdiagrams_pk__sysdiagr__c2b05b6156e8e7ab_checkUniqueConstraint">}
-#+ Check the primary key uniqueness constraint on the "sysdiagrams"
-#+
-#+ @param p_key - Primary Key
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_sysdiagrams_pk__sysdiagr__c2b05b6156e8e7ab_checkUniqueConstraint(p_forUpdate, p_key)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_key
- RECORD
- sysdiagrams_diagram_id LIKE sysdiagrams.diagram_id
- END RECORD
- DEFINE l_key
- RECORD
- sysdiagrams_diagram_id LIKE sysdiagrams.diagram_id
- END RECORD
- DEFINE l_where STRING
- DEFINE l_sqlQuery STRING
- DEFINE l_count INTEGER
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- LET l_where = "WHERE sysdiagrams.diagram_id = ? "
-
- let l_sqlQuery = "SELECT COUNT(*), diagram_id FROM sysdiagrams ", l_where, " GROUP BY diagram_id"
-
- PREPARE cur_sysdiagrams_pk__sysdiagr__c2b05b6156e8e7ab_checkUniqueConstraint FROM l_sqlQuery
- EXECUTE cur_sysdiagrams_pk__sysdiagr__c2b05b6156e8e7ab_checkUniqueConstraint INTO l_count, l_key.* USING p_key.*
- FREE cur_sysdiagrams_pk__sysdiagr__c2b05b6156e8e7ab_checkUniqueConstraint
- IF (NOT p_forUpdate AND l_count > 0) OR (p_forUpdate AND l_count > 0 AND p_key.* != l_key.*) THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- diagram_id: " || ERROR_BAM_00002) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.sysdiagrams_pk__sysdiagr__c2b05b6156e8e7ab_checkUniqueConstraint
-
-{<BLOCK Name="fct.sysdiagrams_uk_principal_name_checkUniqueConstraint">}
-#+ Check the index uniqueness constraint on the "sysdiagrams"
-#+
-#+ @param p_data - Unique Index
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_sysdiagrams_uk_principal_name_checkUniqueConstraint(p_forUpdate, p_data, p_key)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data
- RECORD
- sysdiagrams_principal_id LIKE sysdiagrams.principal_id,
- sysdiagrams_name LIKE sysdiagrams.name
- END RECORD
- DEFINE l_key
- RECORD
- sysdiagrams_diagram_id LIKE sysdiagrams.diagram_id
- END RECORD
- DEFINE p_key
- RECORD
- sysdiagrams_diagram_id LIKE sysdiagrams.diagram_id
- END RECORD
- DEFINE l_where STRING
- DEFINE l_sqlQuery STRING
- DEFINE l_count INTEGER
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- LET l_where = "WHERE sysdiagrams.principal_id = ?
- AND sysdiagrams.name = ? "
-
- let l_sqlQuery = "SELECT COUNT(*), diagram_id FROM sysdiagrams ", l_where, " GROUP BY diagram_id"
-
- PREPARE cur_sysdiagrams_uk_principal_name_checkUniqueConstraint FROM l_sqlQuery
- EXECUTE cur_sysdiagrams_uk_principal_name_checkUniqueConstraint INTO l_count, l_key.* USING p_data.*
- FREE cur_sysdiagrams_uk_principal_name_checkUniqueConstraint
- IF (NOT p_forUpdate AND l_count > 0) OR (p_forUpdate AND l_count > 0 AND p_key.* != l_key.*) THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- principal_id + name: " || ERROR_BAM_00003) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.sysdiagrams_uk_principal_name_checkUniqueConstraint
-
-{<BLOCK Name="fct.sysdiagrams_name_checkColumnConstraints">}
-#+ Check constraints on the "sysdiagrams.name" column
-#+
-#+ @param p_name - VARCHAR2(128) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_sysdiagrams_name_checkColumnConstraints(p_name)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_name LIKE sysdiagrams.name
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_name IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- name: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.sysdiagrams_name_checkColumnConstraints
-
-{<BLOCK Name="fct.sysdiagrams_principal_id_checkColumnConstraints">}
-#+ Check constraints on the "sysdiagrams.principal_id" column
-#+
-#+ @param p_principal_id - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_sysdiagrams_principal_id_checkColumnConstraints(p_principal_id)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_principal_id LIKE sysdiagrams.principal_id
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_principal_id IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- principal_id: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.sysdiagrams_principal_id_checkColumnConstraints
-
-{<BLOCK Name="fct.sysdiagrams_diagram_id_checkColumnConstraints">}
-#+ Check constraints on the "sysdiagrams.diagram_id" column
-#+
-#+ @param p_diagram_id - SERIAL -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_sysdiagrams_diagram_id_checkColumnConstraints(p_diagram_id)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_diagram_id LIKE sysdiagrams.diagram_id
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_diagram_id IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- diagram_id: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.sysdiagrams_diagram_id_checkColumnConstraints
-
-{<BLOCK Name="fct.sysdiagrams_version_checkColumnConstraints">}
-#+ Check constraints on the "sysdiagrams.version" column
-#+
-#+ @param p_version - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_sysdiagrams_version_checkColumnConstraints(p_version)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_version LIKE sysdiagrams.version
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.sysdiagrams_version_checkColumnConstraints
-
-{<BLOCK Name="fct.sysdiagrams_definition_checkColumnConstraints">}
-#+ Check constraints on the "sysdiagrams.definition" column
-#+
-#+ @param p_definition - BYTE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_sysdiagrams_definition_checkColumnConstraints(p_definition)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_definition LIKE sysdiagrams.definition
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.sysdiagrams_definition_checkColumnConstraints
-
-{<BLOCK Name="fct.supplier_checkTableConstraints">}
-#+ Check constraints on the "supplier" table
-#+
-#+ @param p_data - a row data LIKE supplier.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_supplier_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE supplier.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_supplier_suppid_checkColumnConstraints(p_data.suppid) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_supplier_name_checkColumnConstraints(p_data.name) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_supplier_status_checkColumnConstraints(p_data.status) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_supplier_addr1_checkColumnConstraints(p_data.addr1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_supplier_addr2_checkColumnConstraints(p_data.addr2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_supplier_city_checkColumnConstraints(p_data.city) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_supplier_state_checkColumnConstraints(p_data.state) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_supplier_zip_checkColumnConstraints(p_data.zip) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_supplier_phone_checkColumnConstraints(p_data.phone) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.supplier_checkTableConstraints
-
-{<BLOCK Name="fct.supplier_suppid_checkColumnConstraints">}
-#+ Check constraints on the "supplier.suppid" column
-#+
-#+ @param p_suppid - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_supplier_suppid_checkColumnConstraints(p_suppid)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_suppid LIKE supplier.suppid
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_suppid IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- suppid: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.supplier_suppid_checkColumnConstraints
-
-{<BLOCK Name="fct.supplier_name_checkColumnConstraints">}
-#+ Check constraints on the "supplier.name" column
-#+
-#+ @param p_name - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_supplier_name_checkColumnConstraints(p_name)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_name LIKE supplier.name
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.supplier_name_checkColumnConstraints
-
-{<BLOCK Name="fct.supplier_status_checkColumnConstraints">}
-#+ Check constraints on the "supplier.status" column
-#+
-#+ @param p_status - CHAR(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_supplier_status_checkColumnConstraints(p_status)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status LIKE supplier.status
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_status IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- status: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.supplier_status_checkColumnConstraints
-
-{<BLOCK Name="fct.supplier_addr1_checkColumnConstraints">}
-#+ Check constraints on the "supplier.addr1" column
-#+
-#+ @param p_addr1 - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_supplier_addr1_checkColumnConstraints(p_addr1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_addr1 LIKE supplier.addr1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.supplier_addr1_checkColumnConstraints
-
-{<BLOCK Name="fct.supplier_addr2_checkColumnConstraints">}
-#+ Check constraints on the "supplier.addr2" column
-#+
-#+ @param p_addr2 - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_supplier_addr2_checkColumnConstraints(p_addr2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_addr2 LIKE supplier.addr2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.supplier_addr2_checkColumnConstraints
-
-{<BLOCK Name="fct.supplier_city_checkColumnConstraints">}
-#+ Check constraints on the "supplier.city" column
-#+
-#+ @param p_city - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_supplier_city_checkColumnConstraints(p_city)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_city LIKE supplier.city
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.supplier_city_checkColumnConstraints
-
-{<BLOCK Name="fct.supplier_state_checkColumnConstraints">}
-#+ Check constraints on the "supplier.state" column
-#+
-#+ @param p_state - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_supplier_state_checkColumnConstraints(p_state)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_state LIKE supplier.state
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.supplier_state_checkColumnConstraints
-
-{<BLOCK Name="fct.supplier_zip_checkColumnConstraints">}
-#+ Check constraints on the "supplier.zip" column
-#+
-#+ @param p_zip - CHAR(5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_supplier_zip_checkColumnConstraints(p_zip)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_zip LIKE supplier.zip
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.supplier_zip_checkColumnConstraints
-
-{<BLOCK Name="fct.supplier_phone_checkColumnConstraints">}
-#+ Check constraints on the "supplier.phone" column
-#+
-#+ @param p_phone - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_supplier_phone_checkColumnConstraints(p_phone)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_phone LIKE supplier.phone
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.supplier_phone_checkColumnConstraints
-
-{<BLOCK Name="fct.sucursales_checkTableConstraints">}
-#+ Check constraints on the "sucursales" table
-#+
-#+ @param p_data - a row data LIKE sucursales.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_sucursales_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE sucursales.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_sucursales_sucid_checkColumnConstraints(p_data.sucid) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_sucursales_sucnombre_checkColumnConstraints(p_data.sucnombre) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_sucursales_localidad_checkColumnConstraints(p_data.localidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_sucursales_pais_checkColumnConstraints(p_data.pais) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_sucursales_zona_checkColumnConstraints(p_data.zona) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_sucursales_direccion_checkColumnConstraints(p_data.direccion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_sucursales_telefono_checkColumnConstraints(p_data.telefono) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_sucursales_url_checkColumnConstraints(p_data.url) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_sucursales_email_checkColumnConstraints(p_data.email) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.sucursales_checkTableConstraints
-
-{<BLOCK Name="fct.sucursales_sucid_checkColumnConstraints">}
-#+ Check constraints on the "sucursales.sucid" column
-#+
-#+ @param p_sucid - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_sucursales_sucid_checkColumnConstraints(p_sucid)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sucid LIKE sucursales.sucid
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_sucid IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- sucid: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.sucursales_sucid_checkColumnConstraints
-
-{<BLOCK Name="fct.sucursales_sucnombre_checkColumnConstraints">}
-#+ Check constraints on the "sucursales.sucnombre" column
-#+
-#+ @param p_sucnombre - VARCHAR2(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_sucursales_sucnombre_checkColumnConstraints(p_sucnombre)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sucnombre LIKE sucursales.sucnombre
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_sucnombre IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- sucnombre: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.sucursales_sucnombre_checkColumnConstraints
-
-{<BLOCK Name="fct.sucursales_localidad_checkColumnConstraints">}
-#+ Check constraints on the "sucursales.localidad" column
-#+
-#+ @param p_localidad - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_sucursales_localidad_checkColumnConstraints(p_localidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_localidad LIKE sucursales.localidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.sucursales_localidad_checkColumnConstraints
-
-{<BLOCK Name="fct.sucursales_pais_checkColumnConstraints">}
-#+ Check constraints on the "sucursales.pais" column
-#+
-#+ @param p_pais - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_sucursales_pais_checkColumnConstraints(p_pais)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_pais LIKE sucursales.pais
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.sucursales_pais_checkColumnConstraints
-
-{<BLOCK Name="fct.sucursales_zona_checkColumnConstraints">}
-#+ Check constraints on the "sucursales.zona" column
-#+
-#+ @param p_zona - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_sucursales_zona_checkColumnConstraints(p_zona)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_zona LIKE sucursales.zona
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.sucursales_zona_checkColumnConstraints
-
-{<BLOCK Name="fct.sucursales_direccion_checkColumnConstraints">}
-#+ Check constraints on the "sucursales.direccion" column
-#+
-#+ @param p_direccion - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_sucursales_direccion_checkColumnConstraints(p_direccion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_direccion LIKE sucursales.direccion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.sucursales_direccion_checkColumnConstraints
-
-{<BLOCK Name="fct.sucursales_telefono_checkColumnConstraints">}
-#+ Check constraints on the "sucursales.telefono" column
-#+
-#+ @param p_telefono - CHAR(15) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_sucursales_telefono_checkColumnConstraints(p_telefono)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_telefono LIKE sucursales.telefono
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.sucursales_telefono_checkColumnConstraints
-
-{<BLOCK Name="fct.sucursales_url_checkColumnConstraints">}
-#+ Check constraints on the "sucursales.url" column
-#+
-#+ @param p_url - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_sucursales_url_checkColumnConstraints(p_url)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_url LIKE sucursales.url
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.sucursales_url_checkColumnConstraints
-
-{<BLOCK Name="fct.sucursales_email_checkColumnConstraints">}
-#+ Check constraints on the "sucursales.email" column
-#+
-#+ @param p_email - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_sucursales_email_checkColumnConstraints(p_email)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_email LIKE sucursales.email
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.sucursales_email_checkColumnConstraints
-
-{<BLOCK Name="fct.signon_checkTableConstraints">}
-#+ Check constraints on the "signon" table
-#+
-#+ @param p_data - a row data LIKE signon.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_signon_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE signon.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_signon_userid_checkColumnConstraints(p_data.userid) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_signon_password_checkColumnConstraints(p_data.password) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.signon_checkTableConstraints
-
-{<BLOCK Name="fct.signon_userid_checkColumnConstraints">}
-#+ Check constraints on the "signon.userid" column
-#+
-#+ @param p_userid - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_signon_userid_checkColumnConstraints(p_userid)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_userid LIKE signon.userid
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_userid IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- userid: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.signon_userid_checkColumnConstraints
-
-{<BLOCK Name="fct.signon_password_checkColumnConstraints">}
-#+ Check constraints on the "signon.password" column
-#+
-#+ @param p_password - CHAR(25) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_signon_password_checkColumnConstraints(p_password)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_password LIKE signon.password
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_password IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- password: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.signon_password_checkColumnConstraints
-
-{<BLOCK Name="fct.sheet1_checkTableConstraints">}
-#+ Check constraints on the "sheet1" table
-#+
-#+ @param p_data - a row data LIKE sheet1.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_sheet1_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE sheet1.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_sheet1_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_sheet1_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.sheet1_checkTableConstraints
-
-{<BLOCK Name="fct.sheet1_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "sheet1.cod_sec" column
-#+
-#+ @param p_cod_sec - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_sheet1_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE sheet1.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.sheet1_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.sheet1_descripcion_checkColumnConstraints">}
-#+ Check constraints on the "sheet1.descripcion" column
-#+
-#+ @param p_descripcion - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_sheet1_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE sheet1.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.sheet1_descripcion_checkColumnConstraints
-
-{<BLOCK Name="fct.seqreg_checkTableConstraints">}
-#+ Check constraints on the "seqreg" table
-#+
-#+ @param p_data - a row data LIKE seqreg.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_seqreg_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE seqreg.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_seqreg_sr_name_checkColumnConstraints(p_data.sr_name) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_seqreg_sr_last_checkColumnConstraints(p_data.sr_last) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.seqreg_checkTableConstraints
-
-{<BLOCK Name="fct.seqreg_sr_name_checkColumnConstraints">}
-#+ Check constraints on the "seqreg.sr_name" column
-#+
-#+ @param p_sr_name - VARCHAR2(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_seqreg_sr_name_checkColumnConstraints(p_sr_name)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sr_name LIKE seqreg.sr_name
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_sr_name IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- sr_name: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.seqreg_sr_name_checkColumnConstraints
-
-{<BLOCK Name="fct.seqreg_sr_last_checkColumnConstraints">}
-#+ Check constraints on the "seqreg.sr_last" column
-#+
-#+ @param p_sr_last - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_seqreg_sr_last_checkColumnConstraints(p_sr_last)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sr_last LIKE seqreg.sr_last
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_sr_last IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- sr_last: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.seqreg_sr_last_checkColumnConstraints
-
-{<BLOCK Name="fct.seg0007_checkTableConstraints">}
-#+ Check constraints on the "seg0007" table
-#+
-#+ @param p_data - a row data LIKE seg0007.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_seg0007_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE seg0007.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_seg0007_usuario_checkColumnConstraints(p_data.usuario) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_seg0007_nombre_checkColumnConstraints(p_data.nombre) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_seg0007_sec_vend_checkColumnConstraints(p_data.sec_vend) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_seg0007_tipo_usuario_checkColumnConstraints(p_data.tipo_usuario) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- CALL smarmotech_dbxconstraints_seg0007_pk_seg0007_checkUniqueConstraint(p_forUpdate, p_data.usuario, p_data.sec_vend) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.seg0007_checkTableConstraints
-
-{<BLOCK Name="fct.seg0007_pk_seg0007_checkUniqueConstraint">}
-#+ Check the primary key uniqueness constraint on the "seg0007"
-#+
-#+ @param p_key - Primary Key
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_seg0007_pk_seg0007_checkUniqueConstraint(p_forUpdate, p_key)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_key
- RECORD
- seg0007_usuario LIKE seg0007.usuario,
- seg0007_sec_vend LIKE seg0007.sec_vend
- END RECORD
- DEFINE l_key
- RECORD
- seg0007_usuario LIKE seg0007.usuario,
- seg0007_sec_vend LIKE seg0007.sec_vend
- END RECORD
- DEFINE l_where STRING
- DEFINE l_sqlQuery STRING
- DEFINE l_count INTEGER
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- LET l_where = "WHERE seg0007.usuario = ?
- AND seg0007.sec_vend = ? "
-
- let l_sqlQuery = "SELECT COUNT(*), usuario, sec_vend FROM seg0007 ", l_where, " GROUP BY usuario, sec_vend"
-
- PREPARE cur_seg0007_pk_seg0007_checkUniqueConstraint FROM l_sqlQuery
- EXECUTE cur_seg0007_pk_seg0007_checkUniqueConstraint INTO l_count, l_key.* USING p_key.*
- FREE cur_seg0007_pk_seg0007_checkUniqueConstraint
- IF (NOT p_forUpdate AND l_count > 0) OR (p_forUpdate AND l_count > 0 AND p_key.* != l_key.*) THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- usuario + sec_vend: " || ERROR_BAM_00002) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.seg0007_pk_seg0007_checkUniqueConstraint
-
-{<BLOCK Name="fct.seg0007_usuario_checkColumnConstraints">}
-#+ Check constraints on the "seg0007.usuario" column
-#+
-#+ @param p_usuario - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_seg0007_usuario_checkColumnConstraints(p_usuario)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_usuario LIKE seg0007.usuario
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_usuario IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- usuario: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.seg0007_usuario_checkColumnConstraints
-
-{<BLOCK Name="fct.seg0007_nombre_checkColumnConstraints">}
-#+ Check constraints on the "seg0007.nombre" column
-#+
-#+ @param p_nombre - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_seg0007_nombre_checkColumnConstraints(p_nombre)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombre LIKE seg0007.nombre
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.seg0007_nombre_checkColumnConstraints
-
-{<BLOCK Name="fct.seg0007_sec_vend_checkColumnConstraints">}
-#+ Check constraints on the "seg0007.sec_vend" column
-#+
-#+ @param p_sec_vend - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_seg0007_sec_vend_checkColumnConstraints(p_sec_vend)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_vend LIKE seg0007.sec_vend
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_sec_vend IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- sec_vend: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.seg0007_sec_vend_checkColumnConstraints
-
-{<BLOCK Name="fct.seg0007_tipo_usuario_checkColumnConstraints">}
-#+ Check constraints on the "seg0007.tipo_usuario" column
-#+
-#+ @param p_tipo_usuario - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_seg0007_tipo_usuario_checkColumnConstraints(p_tipo_usuario)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_usuario LIKE seg0007.tipo_usuario
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_tipo_usuario IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- tipo_usuario: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.seg0007_tipo_usuario_checkColumnConstraints
-
-{<BLOCK Name="fct.seg0006_checkTableConstraints">}
-#+ Check constraints on the "seg0006" table
-#+
-#+ @param p_data - a row data LIKE seg0006.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_seg0006_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE seg0006.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_seg0006_usuario_checkColumnConstraints(p_data.usuario) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_seg0006_session_checkColumnConstraints(p_data.session) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_seg0006_fecha_session_checkColumnConstraints(p_data.fecha_session) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.seg0006_checkTableConstraints
-
-{<BLOCK Name="fct.seg0006_usuario_checkColumnConstraints">}
-#+ Check constraints on the "seg0006.usuario" column
-#+
-#+ @param p_usuario - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_seg0006_usuario_checkColumnConstraints(p_usuario)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_usuario LIKE seg0006.usuario
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.seg0006_usuario_checkColumnConstraints
-
-{<BLOCK Name="fct.seg0006_session_checkColumnConstraints">}
-#+ Check constraints on the "seg0006.session" column
-#+
-#+ @param p_session - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_seg0006_session_checkColumnConstraints(p_session)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_session LIKE seg0006.session
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.seg0006_session_checkColumnConstraints
-
-{<BLOCK Name="fct.seg0006_fecha_session_checkColumnConstraints">}
-#+ Check constraints on the "seg0006.fecha_session" column
-#+
-#+ @param p_fecha_session - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_seg0006_fecha_session_checkColumnConstraints(p_fecha_session)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_session LIKE seg0006.fecha_session
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.seg0006_fecha_session_checkColumnConstraints
-
-{<BLOCK Name="fct.seg0005_checkTableConstraints">}
-#+ Check constraints on the "seg0005" table
-#+
-#+ @param p_data - a row data LIKE seg0005.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_seg0005_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE seg0005.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_seg0005_cod_perfil_checkColumnConstraints(p_data.cod_perfil) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_seg0005_programa_checkColumnConstraints(p_data.programa) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_seg0005_sistema_checkColumnConstraints(p_data.sistema) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_seg0005_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.seg0005_checkTableConstraints
-
-{<BLOCK Name="fct.seg0005_cod_perfil_checkColumnConstraints">}
-#+ Check constraints on the "seg0005.cod_perfil" column
-#+
-#+ @param p_cod_perfil - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_seg0005_cod_perfil_checkColumnConstraints(p_cod_perfil)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_perfil LIKE seg0005.cod_perfil
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.seg0005_cod_perfil_checkColumnConstraints
-
-{<BLOCK Name="fct.seg0005_programa_checkColumnConstraints">}
-#+ Check constraints on the "seg0005.programa" column
-#+
-#+ @param p_programa - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_seg0005_programa_checkColumnConstraints(p_programa)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_programa LIKE seg0005.programa
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.seg0005_programa_checkColumnConstraints
-
-{<BLOCK Name="fct.seg0005_sistema_checkColumnConstraints">}
-#+ Check constraints on the "seg0005.sistema" column
-#+
-#+ @param p_sistema - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_seg0005_sistema_checkColumnConstraints(p_sistema)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sistema LIKE seg0005.sistema
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.seg0005_sistema_checkColumnConstraints
-
-{<BLOCK Name="fct.seg0005_descripcion_checkColumnConstraints">}
-#+ Check constraints on the "seg0005.descripcion" column
-#+
-#+ @param p_descripcion - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_seg0005_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE seg0005.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.seg0005_descripcion_checkColumnConstraints
-
-{<BLOCK Name="fct.seg0004_checkTableConstraints">}
-#+ Check constraints on the "seg0004" table
-#+
-#+ @param p_data - a row data LIKE seg0004.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_seg0004_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE seg0004.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_seg0004_programa_checkColumnConstraints(p_data.programa) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_seg0004_sistema_checkColumnConstraints(p_data.sistema) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_seg0004_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.seg0004_checkTableConstraints
-
-{<BLOCK Name="fct.seg0004_programa_checkColumnConstraints">}
-#+ Check constraints on the "seg0004.programa" column
-#+
-#+ @param p_programa - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_seg0004_programa_checkColumnConstraints(p_programa)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_programa LIKE seg0004.programa
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.seg0004_programa_checkColumnConstraints
-
-{<BLOCK Name="fct.seg0004_sistema_checkColumnConstraints">}
-#+ Check constraints on the "seg0004.sistema" column
-#+
-#+ @param p_sistema - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_seg0004_sistema_checkColumnConstraints(p_sistema)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sistema LIKE seg0004.sistema
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.seg0004_sistema_checkColumnConstraints
-
-{<BLOCK Name="fct.seg0004_descripcion_checkColumnConstraints">}
-#+ Check constraints on the "seg0004.descripcion" column
-#+
-#+ @param p_descripcion - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_seg0004_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE seg0004.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.seg0004_descripcion_checkColumnConstraints
-
-{<BLOCK Name="fct.seg0003_checkTableConstraints">}
-#+ Check constraints on the "seg0003" table
-#+
-#+ @param p_data - a row data LIKE seg0003.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_seg0003_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE seg0003.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_seg0003_usuario_checkColumnConstraints(p_data.usuario) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_seg0003_nom_puesto_checkColumnConstraints(p_data.nom_puesto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_seg0003_autorizaciondespacho_checkColumnConstraints(p_data.autorizaciondespacho) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_seg0003_controldespacho_checkColumnConstraints(p_data.controldespacho) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_seg0003_controldespiece_checkColumnConstraints(p_data.controldespiece) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_seg0003_controldibujo_checkColumnConstraints(p_data.controldibujo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_seg0003_controldescuento_checkColumnConstraints(p_data.controldescuento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_seg0003_correo_checkColumnConstraints(p_data.correo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.seg0003_checkTableConstraints
-
-{<BLOCK Name="fct.seg0003_usuario_checkColumnConstraints">}
-#+ Check constraints on the "seg0003.usuario" column
-#+
-#+ @param p_usuario - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_seg0003_usuario_checkColumnConstraints(p_usuario)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_usuario LIKE seg0003.usuario
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.seg0003_usuario_checkColumnConstraints
-
-{<BLOCK Name="fct.seg0003_nom_puesto_checkColumnConstraints">}
-#+ Check constraints on the "seg0003.nom_puesto" column
-#+
-#+ @param p_nom_puesto - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_seg0003_nom_puesto_checkColumnConstraints(p_nom_puesto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nom_puesto LIKE seg0003.nom_puesto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.seg0003_nom_puesto_checkColumnConstraints
-
-{<BLOCK Name="fct.seg0003_autorizaciondespacho_checkColumnConstraints">}
-#+ Check constraints on the "seg0003.autorizaciondespacho" column
-#+
-#+ @param p_autorizaciondespacho - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_seg0003_autorizaciondespacho_checkColumnConstraints(p_autorizaciondespacho)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_autorizaciondespacho LIKE seg0003.autorizaciondespacho
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.seg0003_autorizaciondespacho_checkColumnConstraints
-
-{<BLOCK Name="fct.seg0003_controldespacho_checkColumnConstraints">}
-#+ Check constraints on the "seg0003.controldespacho" column
-#+
-#+ @param p_controldespacho - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_seg0003_controldespacho_checkColumnConstraints(p_controldespacho)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_controldespacho LIKE seg0003.controldespacho
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.seg0003_controldespacho_checkColumnConstraints
-
-{<BLOCK Name="fct.seg0003_controldespiece_checkColumnConstraints">}
-#+ Check constraints on the "seg0003.controldespiece" column
-#+
-#+ @param p_controldespiece - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_seg0003_controldespiece_checkColumnConstraints(p_controldespiece)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_controldespiece LIKE seg0003.controldespiece
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.seg0003_controldespiece_checkColumnConstraints
-
-{<BLOCK Name="fct.seg0003_controldibujo_checkColumnConstraints">}
-#+ Check constraints on the "seg0003.controldibujo" column
-#+
-#+ @param p_controldibujo - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_seg0003_controldibujo_checkColumnConstraints(p_controldibujo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_controldibujo LIKE seg0003.controldibujo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.seg0003_controldibujo_checkColumnConstraints
-
-{<BLOCK Name="fct.seg0003_controldescuento_checkColumnConstraints">}
-#+ Check constraints on the "seg0003.controldescuento" column
-#+
-#+ @param p_controldescuento - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_seg0003_controldescuento_checkColumnConstraints(p_controldescuento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_controldescuento LIKE seg0003.controldescuento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.seg0003_controldescuento_checkColumnConstraints
-
-{<BLOCK Name="fct.seg0003_correo_checkColumnConstraints">}
-#+ Check constraints on the "seg0003.correo" column
-#+
-#+ @param p_correo - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_seg0003_correo_checkColumnConstraints(p_correo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_correo LIKE seg0003.correo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.seg0003_correo_checkColumnConstraints
-
-{<BLOCK Name="fct.seg0001_checkTableConstraints">}
-#+ Check constraints on the "seg0001" table
-#+
-#+ @param p_data - a row data LIKE seg0001.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_seg0001_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE seg0001.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_seg0001_usuario_checkColumnConstraints(p_data.usuario) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_seg0001_cod_perfil_checkColumnConstraints(p_data.cod_perfil) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_seg0001_observacion_checkColumnConstraints(p_data.observacion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_seg0001_printerdefecto_checkColumnConstraints(p_data.printerdefecto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_seg0001_otro_printer_checkColumnConstraints(p_data.otro_printer) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_seg0001_printer_cheque_checkColumnConstraints(p_data.printer_cheque) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_seg0001_cambia_clave_checkColumnConstraints(p_data.cambia_clave) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_seg0001_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_seg0001_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_seg0001_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_seg0001_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_seg0001_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_seg0001_sucid_checkColumnConstraints(p_data.sucid) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_seg0001_bodega_checkColumnConstraints(p_data.bodega) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.seg0001_checkTableConstraints
-
-{<BLOCK Name="fct.seg0001_usuario_checkColumnConstraints">}
-#+ Check constraints on the "seg0001.usuario" column
-#+
-#+ @param p_usuario - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_seg0001_usuario_checkColumnConstraints(p_usuario)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_usuario LIKE seg0001.usuario
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.seg0001_usuario_checkColumnConstraints
-
-{<BLOCK Name="fct.seg0001_cod_perfil_checkColumnConstraints">}
-#+ Check constraints on the "seg0001.cod_perfil" column
-#+
-#+ @param p_cod_perfil - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_seg0001_cod_perfil_checkColumnConstraints(p_cod_perfil)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_perfil LIKE seg0001.cod_perfil
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.seg0001_cod_perfil_checkColumnConstraints
-
-{<BLOCK Name="fct.seg0001_observacion_checkColumnConstraints">}
-#+ Check constraints on the "seg0001.observacion" column
-#+
-#+ @param p_observacion - CHAR(70) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_seg0001_observacion_checkColumnConstraints(p_observacion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_observacion LIKE seg0001.observacion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.seg0001_observacion_checkColumnConstraints
-
-{<BLOCK Name="fct.seg0001_printerdefecto_checkColumnConstraints">}
-#+ Check constraints on the "seg0001.printerdefecto" column
-#+
-#+ @param p_printerdefecto - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_seg0001_printerdefecto_checkColumnConstraints(p_printerdefecto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_printerdefecto LIKE seg0001.printerdefecto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.seg0001_printerdefecto_checkColumnConstraints
-
-{<BLOCK Name="fct.seg0001_otro_printer_checkColumnConstraints">}
-#+ Check constraints on the "seg0001.otro_printer" column
-#+
-#+ @param p_otro_printer - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_seg0001_otro_printer_checkColumnConstraints(p_otro_printer)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_otro_printer LIKE seg0001.otro_printer
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.seg0001_otro_printer_checkColumnConstraints
-
-{<BLOCK Name="fct.seg0001_printer_cheque_checkColumnConstraints">}
-#+ Check constraints on the "seg0001.printer_cheque" column
-#+
-#+ @param p_printer_cheque - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_seg0001_printer_cheque_checkColumnConstraints(p_printer_cheque)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_printer_cheque LIKE seg0001.printer_cheque
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.seg0001_printer_cheque_checkColumnConstraints
-
-{<BLOCK Name="fct.seg0001_cambia_clave_checkColumnConstraints">}
-#+ Check constraints on the "seg0001.cambia_clave" column
-#+
-#+ @param p_cambia_clave - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_seg0001_cambia_clave_checkColumnConstraints(p_cambia_clave)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cambia_clave LIKE seg0001.cambia_clave
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.seg0001_cambia_clave_checkColumnConstraints
-
-{<BLOCK Name="fct.seg0001_status_t_checkColumnConstraints">}
-#+ Check constraints on the "seg0001.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_seg0001_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE seg0001.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.seg0001_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.seg0001_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "seg0001.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_seg0001_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE seg0001.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.seg0001_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.seg0001_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "seg0001.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_seg0001_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE seg0001.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.seg0001_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.seg0001_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "seg0001.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_seg0001_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE seg0001.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.seg0001_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.seg0001_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "seg0001.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_seg0001_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE seg0001.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.seg0001_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.seg0001_sucid_checkColumnConstraints">}
-#+ Check constraints on the "seg0001.sucid" column
-#+
-#+ @param p_sucid - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_seg0001_sucid_checkColumnConstraints(p_sucid)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sucid LIKE seg0001.sucid
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.seg0001_sucid_checkColumnConstraints
-
-{<BLOCK Name="fct.seg0001_bodega_checkColumnConstraints">}
-#+ Check constraints on the "seg0001.bodega" column
-#+
-#+ @param p_bodega - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_seg0001_bodega_checkColumnConstraints(p_bodega)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_bodega LIKE seg0001.bodega
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.seg0001_bodega_checkColumnConstraints
-
-{<BLOCK Name="fct.seg0000_checkTableConstraints">}
-#+ Check constraints on the "seg0000" table
-#+
-#+ @param p_data - a row data LIKE seg0000.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_seg0000_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE seg0000.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_seg0000_id_number_checkColumnConstraints(p_data.id_number) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_seg0000_usuario_checkColumnConstraints(p_data.usuario) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_seg0000_nombre_checkColumnConstraints(p_data.nombre) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_seg0000_sec_vend_checkColumnConstraints(p_data.sec_vend) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_seg0000_password_checkColumnConstraints(p_data.password) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_seg0000_ocupacion_checkColumnConstraints(p_data.ocupacion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_seg0000_email_checkColumnConstraints(p_data.email) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_seg0000_celular_checkColumnConstraints(p_data.celular) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_seg0000_celular2_checkColumnConstraints(p_data.celular2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_seg0000_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_seg0000_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_seg0000_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_seg0000_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_seg0000_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.seg0000_checkTableConstraints
-
-{<BLOCK Name="fct.seg0000_id_number_checkColumnConstraints">}
-#+ Check constraints on the "seg0000.id_number" column
-#+
-#+ @param p_id_number - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_seg0000_id_number_checkColumnConstraints(p_id_number)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_id_number LIKE seg0000.id_number
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.seg0000_id_number_checkColumnConstraints
-
-{<BLOCK Name="fct.seg0000_usuario_checkColumnConstraints">}
-#+ Check constraints on the "seg0000.usuario" column
-#+
-#+ @param p_usuario - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_seg0000_usuario_checkColumnConstraints(p_usuario)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_usuario LIKE seg0000.usuario
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.seg0000_usuario_checkColumnConstraints
-
-{<BLOCK Name="fct.seg0000_nombre_checkColumnConstraints">}
-#+ Check constraints on the "seg0000.nombre" column
-#+
-#+ @param p_nombre - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_seg0000_nombre_checkColumnConstraints(p_nombre)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombre LIKE seg0000.nombre
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.seg0000_nombre_checkColumnConstraints
-
-{<BLOCK Name="fct.seg0000_sec_vend_checkColumnConstraints">}
-#+ Check constraints on the "seg0000.sec_vend" column
-#+
-#+ @param p_sec_vend - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_seg0000_sec_vend_checkColumnConstraints(p_sec_vend)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_vend LIKE seg0000.sec_vend
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.seg0000_sec_vend_checkColumnConstraints
-
-{<BLOCK Name="fct.seg0000_password_checkColumnConstraints">}
-#+ Check constraints on the "seg0000.password" column
-#+
-#+ @param p_password - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_seg0000_password_checkColumnConstraints(p_password)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_password LIKE seg0000.password
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.seg0000_password_checkColumnConstraints
-
-{<BLOCK Name="fct.seg0000_ocupacion_checkColumnConstraints">}
-#+ Check constraints on the "seg0000.ocupacion" column
-#+
-#+ @param p_ocupacion - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_seg0000_ocupacion_checkColumnConstraints(p_ocupacion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ocupacion LIKE seg0000.ocupacion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.seg0000_ocupacion_checkColumnConstraints
-
-{<BLOCK Name="fct.seg0000_email_checkColumnConstraints">}
-#+ Check constraints on the "seg0000.email" column
-#+
-#+ @param p_email - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_seg0000_email_checkColumnConstraints(p_email)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_email LIKE seg0000.email
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.seg0000_email_checkColumnConstraints
-
-{<BLOCK Name="fct.seg0000_celular_checkColumnConstraints">}
-#+ Check constraints on the "seg0000.celular" column
-#+
-#+ @param p_celular - CHAR(15) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_seg0000_celular_checkColumnConstraints(p_celular)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_celular LIKE seg0000.celular
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.seg0000_celular_checkColumnConstraints
-
-{<BLOCK Name="fct.seg0000_celular2_checkColumnConstraints">}
-#+ Check constraints on the "seg0000.celular2" column
-#+
-#+ @param p_celular2 - CHAR(15) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_seg0000_celular2_checkColumnConstraints(p_celular2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_celular2 LIKE seg0000.celular2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.seg0000_celular2_checkColumnConstraints
-
-{<BLOCK Name="fct.seg0000_status_t_checkColumnConstraints">}
-#+ Check constraints on the "seg0000.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_seg0000_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE seg0000.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.seg0000_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.seg0000_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "seg0000.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_seg0000_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE seg0000.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.seg0000_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.seg0000_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "seg0000.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_seg0000_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE seg0000.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.seg0000_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.seg0000_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "seg0000.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_seg0000_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE seg0000.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.seg0000_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.seg0000_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "seg0000.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_seg0000_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE seg0000.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.seg0000_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.repitecodigotmp_checkTableConstraints">}
-#+ Check constraints on the "repitecodigotmp" table
-#+
-#+ @param p_data - a row data LIKE repitecodigotmp.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_repitecodigotmp_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE repitecodigotmp.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_repitecodigotmp_documento_checkColumnConstraints(p_data.documento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_repitecodigotmp_tipo_doc_checkColumnConstraints(p_data.tipo_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.repitecodigotmp_checkTableConstraints
-
-{<BLOCK Name="fct.repitecodigotmp_documento_checkColumnConstraints">}
-#+ Check constraints on the "repitecodigotmp.documento" column
-#+
-#+ @param p_documento - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_repitecodigotmp_documento_checkColumnConstraints(p_documento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_documento LIKE repitecodigotmp.documento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.repitecodigotmp_documento_checkColumnConstraints
-
-{<BLOCK Name="fct.repitecodigotmp_tipo_doc_checkColumnConstraints">}
-#+ Check constraints on the "repitecodigotmp.tipo_doc" column
-#+
-#+ @param p_tipo_doc - CHAR(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_repitecodigotmp_tipo_doc_checkColumnConstraints(p_tipo_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_doc LIKE repitecodigotmp.tipo_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.repitecodigotmp_tipo_doc_checkColumnConstraints
-
-{<BLOCK Name="fct.repitecodigo_checkTableConstraints">}
-#+ Check constraints on the "repitecodigo" table
-#+
-#+ @param p_data - a row data LIKE repitecodigo.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_repitecodigo_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE repitecodigo.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_repitecodigo_documento_checkColumnConstraints(p_data.documento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_repitecodigo_tipo_doc_checkColumnConstraints(p_data.tipo_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_repitecodigo_codigo_checkColumnConstraints(p_data.codigo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_repitecodigo_codid_checkColumnConstraints(p_data.codid) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_repitecodigo_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_repitecodigo_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- CALL smarmotech_dbxconstraints_repitecodigo_pk_repitecodigo_checkUniqueConstraint(p_forUpdate, p_data.documento, p_data.tipo_doc, p_data.codigo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.repitecodigo_checkTableConstraints
-
-{<BLOCK Name="fct.repitecodigo_pk_repitecodigo_checkUniqueConstraint">}
-#+ Check the primary key uniqueness constraint on the "repitecodigo"
-#+
-#+ @param p_key - Primary Key
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_repitecodigo_pk_repitecodigo_checkUniqueConstraint(p_forUpdate, p_key)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_key
- RECORD
- repitecodigo_documento LIKE repitecodigo.documento,
- repitecodigo_tipo_doc LIKE repitecodigo.tipo_doc,
- repitecodigo_codigo LIKE repitecodigo.codigo
- END RECORD
- DEFINE l_key
- RECORD
- repitecodigo_documento LIKE repitecodigo.documento,
- repitecodigo_tipo_doc LIKE repitecodigo.tipo_doc,
- repitecodigo_codigo LIKE repitecodigo.codigo
- END RECORD
- DEFINE l_where STRING
- DEFINE l_sqlQuery STRING
- DEFINE l_count INTEGER
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- LET l_where = "WHERE repitecodigo.documento = ?
- AND repitecodigo.tipo_doc = ?
- AND repitecodigo.codigo = ? "
-
- let l_sqlQuery = "SELECT COUNT(*), documento, tipo_doc, codigo FROM repitecodigo ", l_where, " GROUP BY documento, tipo_doc, codigo"
-
- PREPARE cur_repitecodigo_pk_repitecodigo_checkUniqueConstraint FROM l_sqlQuery
- EXECUTE cur_repitecodigo_pk_repitecodigo_checkUniqueConstraint INTO l_count, l_key.* USING p_key.*
- FREE cur_repitecodigo_pk_repitecodigo_checkUniqueConstraint
- IF (NOT p_forUpdate AND l_count > 0) OR (p_forUpdate AND l_count > 0 AND p_key.* != l_key.*) THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- documento + tipo_doc + codigo: " || ERROR_BAM_00002) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.repitecodigo_pk_repitecodigo_checkUniqueConstraint
-
-{<BLOCK Name="fct.repitecodigo_documento_checkColumnConstraints">}
-#+ Check constraints on the "repitecodigo.documento" column
-#+
-#+ @param p_documento - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_repitecodigo_documento_checkColumnConstraints(p_documento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_documento LIKE repitecodigo.documento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_documento IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- documento: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.repitecodigo_documento_checkColumnConstraints
-
-{<BLOCK Name="fct.repitecodigo_tipo_doc_checkColumnConstraints">}
-#+ Check constraints on the "repitecodigo.tipo_doc" column
-#+
-#+ @param p_tipo_doc - CHAR(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_repitecodigo_tipo_doc_checkColumnConstraints(p_tipo_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_doc LIKE repitecodigo.tipo_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_tipo_doc IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- tipo_doc: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.repitecodigo_tipo_doc_checkColumnConstraints
-
-{<BLOCK Name="fct.repitecodigo_codigo_checkColumnConstraints">}
-#+ Check constraints on the "repitecodigo.codigo" column
-#+
-#+ @param p_codigo - CHAR(25) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_repitecodigo_codigo_checkColumnConstraints(p_codigo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codigo LIKE repitecodigo.codigo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_codigo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- codigo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.repitecodigo_codigo_checkColumnConstraints
-
-{<BLOCK Name="fct.repitecodigo_codid_checkColumnConstraints">}
-#+ Check constraints on the "repitecodigo.codid" column
-#+
-#+ @param p_codid - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_repitecodigo_codid_checkColumnConstraints(p_codid)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codid LIKE repitecodigo.codid
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.repitecodigo_codid_checkColumnConstraints
-
-{<BLOCK Name="fct.repitecodigo_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "repitecodigo.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_repitecodigo_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE repitecodigo.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.repitecodigo_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.repitecodigo_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "repitecodigo.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_repitecodigo_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE repitecodigo.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.repitecodigo_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.ranking_checkTableConstraints">}
-#+ Check constraints on the "ranking" table
-#+
-#+ @param p_data - a row data LIKE ranking.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_ranking_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE ranking.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_ranking_rankingact_checkColumnConstraints(p_data.rankingact) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ranking_rankingant_checkColumnConstraints(p_data.rankingant) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ranking_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ranking_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ranking_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ranking_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ranking_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ranking_unidad_med_checkColumnConstraints(p_data.unidad_med) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ranking_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ranking_valor_checkColumnConstraints(p_data.valor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ranking_cantidad_ant_checkColumnConstraints(p_data.cantidad_ant) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ranking_valor_ant_checkColumnConstraints(p_data.valor_ant) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ranking_checkTableConstraints
-
-{<BLOCK Name="fct.ranking_rankingact_checkColumnConstraints">}
-#+ Check constraints on the "ranking.rankingact" column
-#+
-#+ @param p_rankingact - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ranking_rankingact_checkColumnConstraints(p_rankingact)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_rankingact LIKE ranking.rankingact
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ranking_rankingact_checkColumnConstraints
-
-{<BLOCK Name="fct.ranking_rankingant_checkColumnConstraints">}
-#+ Check constraints on the "ranking.rankingant" column
-#+
-#+ @param p_rankingant - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ranking_rankingant_checkColumnConstraints(p_rankingant)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_rankingant LIKE ranking.rankingant
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ranking_rankingant_checkColumnConstraints
-
-{<BLOCK Name="fct.ranking_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "ranking.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ranking_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE ranking.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ranking_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.ranking_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "ranking.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ranking_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE ranking.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ranking_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.ranking_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "ranking.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ranking_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE ranking.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ranking_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.ranking_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "ranking.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ranking_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE ranking.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ranking_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.ranking_descripcion_checkColumnConstraints">}
-#+ Check constraints on the "ranking.descripcion" column
-#+
-#+ @param p_descripcion - CHAR(100) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ranking_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE ranking.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ranking_descripcion_checkColumnConstraints
-
-{<BLOCK Name="fct.ranking_unidad_med_checkColumnConstraints">}
-#+ Check constraints on the "ranking.unidad_med" column
-#+
-#+ @param p_unidad_med - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ranking_unidad_med_checkColumnConstraints(p_unidad_med)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_unidad_med LIKE ranking.unidad_med
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ranking_unidad_med_checkColumnConstraints
-
-{<BLOCK Name="fct.ranking_cantidad_checkColumnConstraints">}
-#+ Check constraints on the "ranking.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(15,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ranking_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE ranking.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ranking_cantidad_checkColumnConstraints
-
-{<BLOCK Name="fct.ranking_valor_checkColumnConstraints">}
-#+ Check constraints on the "ranking.valor" column
-#+
-#+ @param p_valor - DECIMAL(15,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ranking_valor_checkColumnConstraints(p_valor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valor LIKE ranking.valor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ranking_valor_checkColumnConstraints
-
-{<BLOCK Name="fct.ranking_cantidad_ant_checkColumnConstraints">}
-#+ Check constraints on the "ranking.cantidad_ant" column
-#+
-#+ @param p_cantidad_ant - DECIMAL(15,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ranking_cantidad_ant_checkColumnConstraints(p_cantidad_ant)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad_ant LIKE ranking.cantidad_ant
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ranking_cantidad_ant_checkColumnConstraints
-
-{<BLOCK Name="fct.ranking_valor_ant_checkColumnConstraints">}
-#+ Check constraints on the "ranking.valor_ant" column
-#+
-#+ @param p_valor_ant - DECIMAL(15,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ranking_valor_ant_checkColumnConstraints(p_valor_ant)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valor_ant LIKE ranking.valor_ant
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ranking_valor_ant_checkColumnConstraints
-
-{<BLOCK Name="fct.ptventasgralh_checkTableConstraints">}
-#+ Check constraints on the "ptventasgralh" table
-#+
-#+ @param p_data - a row data LIKE ptventasgralh.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgralh_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE ptventasgralh.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_ptventasgralh_compania_checkColumnConstraints(p_data.compania) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgralh_localidad_checkColumnConstraints(p_data.localidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgralh_tipotransaccion_checkColumnConstraints(p_data.tipotransaccion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgralh_tipo_ventas_checkColumnConstraints(p_data.tipo_ventas) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgralh_origen_producto_checkColumnConstraints(p_data.origen_producto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgralh_producto_checkColumnConstraints(p_data.producto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgralh_tipoproducto_checkColumnConstraints(p_data.tipoproducto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgralh_valor_bruto_checkColumnConstraints(p_data.valor_bruto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgralh_porc_itbi_checkColumnConstraints(p_data.porc_itbi) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgralh_descuento_checkColumnConstraints(p_data.descuento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgralh_itbis_checkColumnConstraints(p_data.itbis) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgralh_factura_checkColumnConstraints(p_data.factura) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgralh_conduce_checkColumnConstraints(p_data.conduce) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgralh_documentodev_checkColumnConstraints(p_data.documentodev) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgralh_documentocxc_checkColumnConstraints(p_data.documentocxc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgralh_observaciones_checkColumnConstraints(p_data.observaciones) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgralh_cod_mov_checkColumnConstraints(p_data.cod_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgralh_cond_pago_checkColumnConstraints(p_data.cond_pago) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgralh_descrip_p_checkColumnConstraints(p_data.descrip_p) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgralh_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgralh_numero_mes_checkColumnConstraints(p_data.numero_mes) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgralh_ano_checkColumnConstraints(p_data.ano) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgralh_mes_checkColumnConstraints(p_data.mes) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgralh_tipo_cliente_checkColumnConstraints(p_data.tipo_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgralh_sec_cliente_checkColumnConstraints(p_data.sec_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgralh_nombre_cliente_checkColumnConstraints(p_data.nombre_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgralh_rnc_checkColumnConstraints(p_data.rnc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgralh_orden_checkColumnConstraints(p_data.orden) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgralh_sec_vend_checkColumnConstraints(p_data.sec_vend) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgralh_nombrev_checkColumnConstraints(p_data.nombrev) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgralh_apellidov_checkColumnConstraints(p_data.apellidov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgralh_area_checkColumnConstraints(p_data.area) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgralh_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgralh_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgralh_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgralh_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgralh_descripcionp_checkColumnConstraints(p_data.descripcionp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgralh_unidadmed_checkColumnConstraints(p_data.unidadmed) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgralh_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgralh_precio_checkColumnConstraints(p_data.precio) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgralh_material_checkColumnConstraints(p_data.material) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgralh_labor_checkColumnConstraints(p_data.labor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgralh_gasto_checkColumnConstraints(p_data.gasto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgralh_valormaterial_checkColumnConstraints(p_data.valormaterial) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgralh_valorlabor_checkColumnConstraints(p_data.valorlabor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgralh_valorgasto_checkColumnConstraints(p_data.valorgasto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgralh_tasa_checkColumnConstraints(p_data.tasa) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgralh_valorrd_checkColumnConstraints(p_data.valorrd) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgralh_descuentord_checkColumnConstraints(p_data.descuentord) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgralh_itbisrd_checkColumnConstraints(p_data.itbisrd) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgralh_netord_checkColumnConstraints(p_data.netord) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgralh_neto_checkColumnConstraints(p_data.neto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgralh_margen_checkColumnConstraints(p_data.margen) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgralh_transportista_checkColumnConstraints(p_data.transportista) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgralh_pventas_checkColumnConstraints(p_data.pventas) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgralh_grupo_checkColumnConstraints(p_data.grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptventasgralh_checkTableConstraints
-
-{<BLOCK Name="fct.ptventasgralh_compania_checkColumnConstraints">}
-#+ Check constraints on the "ptventasgralh.compania" column
-#+
-#+ @param p_compania - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgralh_compania_checkColumnConstraints(p_compania)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_compania LIKE ptventasgralh.compania
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptventasgralh_compania_checkColumnConstraints
-
-{<BLOCK Name="fct.ptventasgralh_localidad_checkColumnConstraints">}
-#+ Check constraints on the "ptventasgralh.localidad" column
-#+
-#+ @param p_localidad - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgralh_localidad_checkColumnConstraints(p_localidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_localidad LIKE ptventasgralh.localidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptventasgralh_localidad_checkColumnConstraints
-
-{<BLOCK Name="fct.ptventasgralh_tipotransaccion_checkColumnConstraints">}
-#+ Check constraints on the "ptventasgralh.tipotransaccion" column
-#+
-#+ @param p_tipotransaccion - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgralh_tipotransaccion_checkColumnConstraints(p_tipotransaccion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipotransaccion LIKE ptventasgralh.tipotransaccion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptventasgralh_tipotransaccion_checkColumnConstraints
-
-{<BLOCK Name="fct.ptventasgralh_tipo_ventas_checkColumnConstraints">}
-#+ Check constraints on the "ptventasgralh.tipo_ventas" column
-#+
-#+ @param p_tipo_ventas - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgralh_tipo_ventas_checkColumnConstraints(p_tipo_ventas)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_ventas LIKE ptventasgralh.tipo_ventas
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptventasgralh_tipo_ventas_checkColumnConstraints
-
-{<BLOCK Name="fct.ptventasgralh_origen_producto_checkColumnConstraints">}
-#+ Check constraints on the "ptventasgralh.origen_producto" column
-#+
-#+ @param p_origen_producto - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgralh_origen_producto_checkColumnConstraints(p_origen_producto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_origen_producto LIKE ptventasgralh.origen_producto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptventasgralh_origen_producto_checkColumnConstraints
-
-{<BLOCK Name="fct.ptventasgralh_producto_checkColumnConstraints">}
-#+ Check constraints on the "ptventasgralh.producto" column
-#+
-#+ @param p_producto - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgralh_producto_checkColumnConstraints(p_producto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_producto LIKE ptventasgralh.producto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptventasgralh_producto_checkColumnConstraints
-
-{<BLOCK Name="fct.ptventasgralh_tipoproducto_checkColumnConstraints">}
-#+ Check constraints on the "ptventasgralh.tipoproducto" column
-#+
-#+ @param p_tipoproducto - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgralh_tipoproducto_checkColumnConstraints(p_tipoproducto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipoproducto LIKE ptventasgralh.tipoproducto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptventasgralh_tipoproducto_checkColumnConstraints
-
-{<BLOCK Name="fct.ptventasgralh_valor_bruto_checkColumnConstraints">}
-#+ Check constraints on the "ptventasgralh.valor_bruto" column
-#+
-#+ @param p_valor_bruto - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgralh_valor_bruto_checkColumnConstraints(p_valor_bruto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valor_bruto LIKE ptventasgralh.valor_bruto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptventasgralh_valor_bruto_checkColumnConstraints
-
-{<BLOCK Name="fct.ptventasgralh_porc_itbi_checkColumnConstraints">}
-#+ Check constraints on the "ptventasgralh.porc_itbi" column
-#+
-#+ @param p_porc_itbi - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgralh_porc_itbi_checkColumnConstraints(p_porc_itbi)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_porc_itbi LIKE ptventasgralh.porc_itbi
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptventasgralh_porc_itbi_checkColumnConstraints
-
-{<BLOCK Name="fct.ptventasgralh_descuento_checkColumnConstraints">}
-#+ Check constraints on the "ptventasgralh.descuento" column
-#+
-#+ @param p_descuento - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgralh_descuento_checkColumnConstraints(p_descuento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descuento LIKE ptventasgralh.descuento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptventasgralh_descuento_checkColumnConstraints
-
-{<BLOCK Name="fct.ptventasgralh_itbis_checkColumnConstraints">}
-#+ Check constraints on the "ptventasgralh.itbis" column
-#+
-#+ @param p_itbis - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgralh_itbis_checkColumnConstraints(p_itbis)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_itbis LIKE ptventasgralh.itbis
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptventasgralh_itbis_checkColumnConstraints
-
-{<BLOCK Name="fct.ptventasgralh_factura_checkColumnConstraints">}
-#+ Check constraints on the "ptventasgralh.factura" column
-#+
-#+ @param p_factura - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgralh_factura_checkColumnConstraints(p_factura)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_factura LIKE ptventasgralh.factura
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptventasgralh_factura_checkColumnConstraints
-
-{<BLOCK Name="fct.ptventasgralh_conduce_checkColumnConstraints">}
-#+ Check constraints on the "ptventasgralh.conduce" column
-#+
-#+ @param p_conduce - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgralh_conduce_checkColumnConstraints(p_conduce)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_conduce LIKE ptventasgralh.conduce
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptventasgralh_conduce_checkColumnConstraints
-
-{<BLOCK Name="fct.ptventasgralh_documentodev_checkColumnConstraints">}
-#+ Check constraints on the "ptventasgralh.documentodev" column
-#+
-#+ @param p_documentodev - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgralh_documentodev_checkColumnConstraints(p_documentodev)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_documentodev LIKE ptventasgralh.documentodev
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptventasgralh_documentodev_checkColumnConstraints
-
-{<BLOCK Name="fct.ptventasgralh_documentocxc_checkColumnConstraints">}
-#+ Check constraints on the "ptventasgralh.documentocxc" column
-#+
-#+ @param p_documentocxc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgralh_documentocxc_checkColumnConstraints(p_documentocxc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_documentocxc LIKE ptventasgralh.documentocxc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptventasgralh_documentocxc_checkColumnConstraints
-
-{<BLOCK Name="fct.ptventasgralh_observaciones_checkColumnConstraints">}
-#+ Check constraints on the "ptventasgralh.observaciones" column
-#+
-#+ @param p_observaciones - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgralh_observaciones_checkColumnConstraints(p_observaciones)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_observaciones LIKE ptventasgralh.observaciones
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptventasgralh_observaciones_checkColumnConstraints
-
-{<BLOCK Name="fct.ptventasgralh_cod_mov_checkColumnConstraints">}
-#+ Check constraints on the "ptventasgralh.cod_mov" column
-#+
-#+ @param p_cod_mov - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgralh_cod_mov_checkColumnConstraints(p_cod_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mov LIKE ptventasgralh.cod_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptventasgralh_cod_mov_checkColumnConstraints
-
-{<BLOCK Name="fct.ptventasgralh_cond_pago_checkColumnConstraints">}
-#+ Check constraints on the "ptventasgralh.cond_pago" column
-#+
-#+ @param p_cond_pago - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgralh_cond_pago_checkColumnConstraints(p_cond_pago)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cond_pago LIKE ptventasgralh.cond_pago
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptventasgralh_cond_pago_checkColumnConstraints
-
-{<BLOCK Name="fct.ptventasgralh_descrip_p_checkColumnConstraints">}
-#+ Check constraints on the "ptventasgralh.descrip_p" column
-#+
-#+ @param p_descrip_p - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgralh_descrip_p_checkColumnConstraints(p_descrip_p)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descrip_p LIKE ptventasgralh.descrip_p
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptventasgralh_descrip_p_checkColumnConstraints
-
-{<BLOCK Name="fct.ptventasgralh_fecha_checkColumnConstraints">}
-#+ Check constraints on the "ptventasgralh.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgralh_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE ptventasgralh.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptventasgralh_fecha_checkColumnConstraints
-
-{<BLOCK Name="fct.ptventasgralh_numero_mes_checkColumnConstraints">}
-#+ Check constraints on the "ptventasgralh.numero_mes" column
-#+
-#+ @param p_numero_mes - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgralh_numero_mes_checkColumnConstraints(p_numero_mes)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_numero_mes LIKE ptventasgralh.numero_mes
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptventasgralh_numero_mes_checkColumnConstraints
-
-{<BLOCK Name="fct.ptventasgralh_ano_checkColumnConstraints">}
-#+ Check constraints on the "ptventasgralh.ano" column
-#+
-#+ @param p_ano - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgralh_ano_checkColumnConstraints(p_ano)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ano LIKE ptventasgralh.ano
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptventasgralh_ano_checkColumnConstraints
-
-{<BLOCK Name="fct.ptventasgralh_mes_checkColumnConstraints">}
-#+ Check constraints on the "ptventasgralh.mes" column
-#+
-#+ @param p_mes - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgralh_mes_checkColumnConstraints(p_mes)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mes LIKE ptventasgralh.mes
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptventasgralh_mes_checkColumnConstraints
-
-{<BLOCK Name="fct.ptventasgralh_tipo_cliente_checkColumnConstraints">}
-#+ Check constraints on the "ptventasgralh.tipo_cliente" column
-#+
-#+ @param p_tipo_cliente - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgralh_tipo_cliente_checkColumnConstraints(p_tipo_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_cliente LIKE ptventasgralh.tipo_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptventasgralh_tipo_cliente_checkColumnConstraints
-
-{<BLOCK Name="fct.ptventasgralh_sec_cliente_checkColumnConstraints">}
-#+ Check constraints on the "ptventasgralh.sec_cliente" column
-#+
-#+ @param p_sec_cliente - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgralh_sec_cliente_checkColumnConstraints(p_sec_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_cliente LIKE ptventasgralh.sec_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptventasgralh_sec_cliente_checkColumnConstraints
-
-{<BLOCK Name="fct.ptventasgralh_nombre_cliente_checkColumnConstraints">}
-#+ Check constraints on the "ptventasgralh.nombre_cliente" column
-#+
-#+ @param p_nombre_cliente - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgralh_nombre_cliente_checkColumnConstraints(p_nombre_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombre_cliente LIKE ptventasgralh.nombre_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptventasgralh_nombre_cliente_checkColumnConstraints
-
-{<BLOCK Name="fct.ptventasgralh_rnc_checkColumnConstraints">}
-#+ Check constraints on the "ptventasgralh.rnc" column
-#+
-#+ @param p_rnc - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgralh_rnc_checkColumnConstraints(p_rnc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_rnc LIKE ptventasgralh.rnc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptventasgralh_rnc_checkColumnConstraints
-
-{<BLOCK Name="fct.ptventasgralh_orden_checkColumnConstraints">}
-#+ Check constraints on the "ptventasgralh.orden" column
-#+
-#+ @param p_orden - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgralh_orden_checkColumnConstraints(p_orden)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_orden LIKE ptventasgralh.orden
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptventasgralh_orden_checkColumnConstraints
-
-{<BLOCK Name="fct.ptventasgralh_sec_vend_checkColumnConstraints">}
-#+ Check constraints on the "ptventasgralh.sec_vend" column
-#+
-#+ @param p_sec_vend - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgralh_sec_vend_checkColumnConstraints(p_sec_vend)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_vend LIKE ptventasgralh.sec_vend
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptventasgralh_sec_vend_checkColumnConstraints
-
-{<BLOCK Name="fct.ptventasgralh_nombrev_checkColumnConstraints">}
-#+ Check constraints on the "ptventasgralh.nombrev" column
-#+
-#+ @param p_nombrev - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgralh_nombrev_checkColumnConstraints(p_nombrev)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombrev LIKE ptventasgralh.nombrev
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptventasgralh_nombrev_checkColumnConstraints
-
-{<BLOCK Name="fct.ptventasgralh_apellidov_checkColumnConstraints">}
-#+ Check constraints on the "ptventasgralh.apellidov" column
-#+
-#+ @param p_apellidov - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgralh_apellidov_checkColumnConstraints(p_apellidov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_apellidov LIKE ptventasgralh.apellidov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptventasgralh_apellidov_checkColumnConstraints
-
-{<BLOCK Name="fct.ptventasgralh_area_checkColumnConstraints">}
-#+ Check constraints on the "ptventasgralh.area" column
-#+
-#+ @param p_area - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgralh_area_checkColumnConstraints(p_area)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_area LIKE ptventasgralh.area
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptventasgralh_area_checkColumnConstraints
-
-{<BLOCK Name="fct.ptventasgralh_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "ptventasgralh.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgralh_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE ptventasgralh.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptventasgralh_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.ptventasgralh_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "ptventasgralh.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgralh_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE ptventasgralh.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptventasgralh_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.ptventasgralh_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "ptventasgralh.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgralh_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE ptventasgralh.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptventasgralh_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.ptventasgralh_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "ptventasgralh.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgralh_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE ptventasgralh.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptventasgralh_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.ptventasgralh_descripcionp_checkColumnConstraints">}
-#+ Check constraints on the "ptventasgralh.descripcionp" column
-#+
-#+ @param p_descripcionp - CHAR(100) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgralh_descripcionp_checkColumnConstraints(p_descripcionp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcionp LIKE ptventasgralh.descripcionp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptventasgralh_descripcionp_checkColumnConstraints
-
-{<BLOCK Name="fct.ptventasgralh_unidadmed_checkColumnConstraints">}
-#+ Check constraints on the "ptventasgralh.unidadmed" column
-#+
-#+ @param p_unidadmed - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgralh_unidadmed_checkColumnConstraints(p_unidadmed)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_unidadmed LIKE ptventasgralh.unidadmed
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptventasgralh_unidadmed_checkColumnConstraints
-
-{<BLOCK Name="fct.ptventasgralh_cantidad_checkColumnConstraints">}
-#+ Check constraints on the "ptventasgralh.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgralh_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE ptventasgralh.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptventasgralh_cantidad_checkColumnConstraints
-
-{<BLOCK Name="fct.ptventasgralh_precio_checkColumnConstraints">}
-#+ Check constraints on the "ptventasgralh.precio" column
-#+
-#+ @param p_precio - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgralh_precio_checkColumnConstraints(p_precio)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_precio LIKE ptventasgralh.precio
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptventasgralh_precio_checkColumnConstraints
-
-{<BLOCK Name="fct.ptventasgralh_material_checkColumnConstraints">}
-#+ Check constraints on the "ptventasgralh.material" column
-#+
-#+ @param p_material - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgralh_material_checkColumnConstraints(p_material)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_material LIKE ptventasgralh.material
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptventasgralh_material_checkColumnConstraints
-
-{<BLOCK Name="fct.ptventasgralh_labor_checkColumnConstraints">}
-#+ Check constraints on the "ptventasgralh.labor" column
-#+
-#+ @param p_labor - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgralh_labor_checkColumnConstraints(p_labor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_labor LIKE ptventasgralh.labor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptventasgralh_labor_checkColumnConstraints
-
-{<BLOCK Name="fct.ptventasgralh_gasto_checkColumnConstraints">}
-#+ Check constraints on the "ptventasgralh.gasto" column
-#+
-#+ @param p_gasto - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgralh_gasto_checkColumnConstraints(p_gasto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_gasto LIKE ptventasgralh.gasto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptventasgralh_gasto_checkColumnConstraints
-
-{<BLOCK Name="fct.ptventasgralh_valormaterial_checkColumnConstraints">}
-#+ Check constraints on the "ptventasgralh.valormaterial" column
-#+
-#+ @param p_valormaterial - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgralh_valormaterial_checkColumnConstraints(p_valormaterial)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valormaterial LIKE ptventasgralh.valormaterial
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptventasgralh_valormaterial_checkColumnConstraints
-
-{<BLOCK Name="fct.ptventasgralh_valorlabor_checkColumnConstraints">}
-#+ Check constraints on the "ptventasgralh.valorlabor" column
-#+
-#+ @param p_valorlabor - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgralh_valorlabor_checkColumnConstraints(p_valorlabor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valorlabor LIKE ptventasgralh.valorlabor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptventasgralh_valorlabor_checkColumnConstraints
-
-{<BLOCK Name="fct.ptventasgralh_valorgasto_checkColumnConstraints">}
-#+ Check constraints on the "ptventasgralh.valorgasto" column
-#+
-#+ @param p_valorgasto - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgralh_valorgasto_checkColumnConstraints(p_valorgasto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valorgasto LIKE ptventasgralh.valorgasto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptventasgralh_valorgasto_checkColumnConstraints
-
-{<BLOCK Name="fct.ptventasgralh_tasa_checkColumnConstraints">}
-#+ Check constraints on the "ptventasgralh.tasa" column
-#+
-#+ @param p_tasa - DECIMAL(8,3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgralh_tasa_checkColumnConstraints(p_tasa)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tasa LIKE ptventasgralh.tasa
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptventasgralh_tasa_checkColumnConstraints
-
-{<BLOCK Name="fct.ptventasgralh_valorrd_checkColumnConstraints">}
-#+ Check constraints on the "ptventasgralh.valorrd" column
-#+
-#+ @param p_valorrd - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgralh_valorrd_checkColumnConstraints(p_valorrd)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valorrd LIKE ptventasgralh.valorrd
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptventasgralh_valorrd_checkColumnConstraints
-
-{<BLOCK Name="fct.ptventasgralh_descuentord_checkColumnConstraints">}
-#+ Check constraints on the "ptventasgralh.descuentord" column
-#+
-#+ @param p_descuentord - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgralh_descuentord_checkColumnConstraints(p_descuentord)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descuentord LIKE ptventasgralh.descuentord
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptventasgralh_descuentord_checkColumnConstraints
-
-{<BLOCK Name="fct.ptventasgralh_itbisrd_checkColumnConstraints">}
-#+ Check constraints on the "ptventasgralh.itbisrd" column
-#+
-#+ @param p_itbisrd - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgralh_itbisrd_checkColumnConstraints(p_itbisrd)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_itbisrd LIKE ptventasgralh.itbisrd
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptventasgralh_itbisrd_checkColumnConstraints
-
-{<BLOCK Name="fct.ptventasgralh_netord_checkColumnConstraints">}
-#+ Check constraints on the "ptventasgralh.netord" column
-#+
-#+ @param p_netord - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgralh_netord_checkColumnConstraints(p_netord)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_netord LIKE ptventasgralh.netord
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptventasgralh_netord_checkColumnConstraints
-
-{<BLOCK Name="fct.ptventasgralh_neto_checkColumnConstraints">}
-#+ Check constraints on the "ptventasgralh.neto" column
-#+
-#+ @param p_neto - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgralh_neto_checkColumnConstraints(p_neto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_neto LIKE ptventasgralh.neto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptventasgralh_neto_checkColumnConstraints
-
-{<BLOCK Name="fct.ptventasgralh_margen_checkColumnConstraints">}
-#+ Check constraints on the "ptventasgralh.margen" column
-#+
-#+ @param p_margen - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgralh_margen_checkColumnConstraints(p_margen)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_margen LIKE ptventasgralh.margen
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptventasgralh_margen_checkColumnConstraints
-
-{<BLOCK Name="fct.ptventasgralh_transportista_checkColumnConstraints">}
-#+ Check constraints on the "ptventasgralh.transportista" column
-#+
-#+ @param p_transportista - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgralh_transportista_checkColumnConstraints(p_transportista)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_transportista LIKE ptventasgralh.transportista
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptventasgralh_transportista_checkColumnConstraints
-
-{<BLOCK Name="fct.ptventasgralh_pventas_checkColumnConstraints">}
-#+ Check constraints on the "ptventasgralh.pventas" column
-#+
-#+ @param p_pventas - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgralh_pventas_checkColumnConstraints(p_pventas)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_pventas LIKE ptventasgralh.pventas
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptventasgralh_pventas_checkColumnConstraints
-
-{<BLOCK Name="fct.ptventasgralh_grupo_checkColumnConstraints">}
-#+ Check constraints on the "ptventasgralh.grupo" column
-#+
-#+ @param p_grupo - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgralh_grupo_checkColumnConstraints(p_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_grupo LIKE ptventasgralh.grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptventasgralh_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.ptventasgral_checkTableConstraints">}
-#+ Check constraints on the "ptventasgral" table
-#+
-#+ @param p_data - a row data LIKE ptventasgral.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgral_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE ptventasgral.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_ptventasgral_compania_checkColumnConstraints(p_data.compania) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgral_localidad_checkColumnConstraints(p_data.localidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgral_tipotransaccion_checkColumnConstraints(p_data.tipotransaccion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgral_tipo_ventas_checkColumnConstraints(p_data.tipo_ventas) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgral_origen_producto_checkColumnConstraints(p_data.origen_producto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgral_producto_checkColumnConstraints(p_data.producto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgral_tipoproducto_checkColumnConstraints(p_data.tipoproducto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgral_valor_bruto_checkColumnConstraints(p_data.valor_bruto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgral_porc_itbi_checkColumnConstraints(p_data.porc_itbi) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgral_descuento_checkColumnConstraints(p_data.descuento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgral_itbis_checkColumnConstraints(p_data.itbis) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgral_factura_checkColumnConstraints(p_data.factura) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgral_conduce_checkColumnConstraints(p_data.conduce) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgral_documentodev_checkColumnConstraints(p_data.documentodev) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgral_documentocxc_checkColumnConstraints(p_data.documentocxc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgral_observaciones_checkColumnConstraints(p_data.observaciones) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgral_cod_mov_checkColumnConstraints(p_data.cod_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgral_cond_pago_checkColumnConstraints(p_data.cond_pago) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgral_descrip_p_checkColumnConstraints(p_data.descrip_p) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgral_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgral_numero_mes_checkColumnConstraints(p_data.numero_mes) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgral_ano_checkColumnConstraints(p_data.ano) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgral_mes_checkColumnConstraints(p_data.mes) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgral_tipo_cliente_checkColumnConstraints(p_data.tipo_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgral_sec_cliente_checkColumnConstraints(p_data.sec_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgral_nombre_cliente_checkColumnConstraints(p_data.nombre_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgral_rnc_checkColumnConstraints(p_data.rnc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgral_orden_checkColumnConstraints(p_data.orden) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgral_sec_vend_checkColumnConstraints(p_data.sec_vend) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgral_nombrev_checkColumnConstraints(p_data.nombrev) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgral_apellidov_checkColumnConstraints(p_data.apellidov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgral_area_checkColumnConstraints(p_data.area) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgral_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgral_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgral_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgral_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgral_descripcionp_checkColumnConstraints(p_data.descripcionp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgral_unidadmed_checkColumnConstraints(p_data.unidadmed) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgral_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgral_precio_checkColumnConstraints(p_data.precio) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgral_material_checkColumnConstraints(p_data.material) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgral_labor_checkColumnConstraints(p_data.labor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgral_gasto_checkColumnConstraints(p_data.gasto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgral_valormaterial_checkColumnConstraints(p_data.valormaterial) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgral_valorlabor_checkColumnConstraints(p_data.valorlabor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgral_valorgasto_checkColumnConstraints(p_data.valorgasto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgral_tasa_checkColumnConstraints(p_data.tasa) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgral_valorrd_checkColumnConstraints(p_data.valorrd) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgral_descuentord_checkColumnConstraints(p_data.descuentord) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgral_itbisrd_checkColumnConstraints(p_data.itbisrd) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgral_netord_checkColumnConstraints(p_data.netord) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgral_neto_checkColumnConstraints(p_data.neto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgral_margen_checkColumnConstraints(p_data.margen) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgral_transportista_checkColumnConstraints(p_data.transportista) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgral_pventas_checkColumnConstraints(p_data.pventas) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptventasgral_grupo_checkColumnConstraints(p_data.grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptventasgral_checkTableConstraints
-
-{<BLOCK Name="fct.ptventasgral_compania_checkColumnConstraints">}
-#+ Check constraints on the "ptventasgral.compania" column
-#+
-#+ @param p_compania - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgral_compania_checkColumnConstraints(p_compania)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_compania LIKE ptventasgral.compania
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptventasgral_compania_checkColumnConstraints
-
-{<BLOCK Name="fct.ptventasgral_localidad_checkColumnConstraints">}
-#+ Check constraints on the "ptventasgral.localidad" column
-#+
-#+ @param p_localidad - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgral_localidad_checkColumnConstraints(p_localidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_localidad LIKE ptventasgral.localidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptventasgral_localidad_checkColumnConstraints
-
-{<BLOCK Name="fct.ptventasgral_tipotransaccion_checkColumnConstraints">}
-#+ Check constraints on the "ptventasgral.tipotransaccion" column
-#+
-#+ @param p_tipotransaccion - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgral_tipotransaccion_checkColumnConstraints(p_tipotransaccion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipotransaccion LIKE ptventasgral.tipotransaccion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptventasgral_tipotransaccion_checkColumnConstraints
-
-{<BLOCK Name="fct.ptventasgral_tipo_ventas_checkColumnConstraints">}
-#+ Check constraints on the "ptventasgral.tipo_ventas" column
-#+
-#+ @param p_tipo_ventas - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgral_tipo_ventas_checkColumnConstraints(p_tipo_ventas)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_ventas LIKE ptventasgral.tipo_ventas
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptventasgral_tipo_ventas_checkColumnConstraints
-
-{<BLOCK Name="fct.ptventasgral_origen_producto_checkColumnConstraints">}
-#+ Check constraints on the "ptventasgral.origen_producto" column
-#+
-#+ @param p_origen_producto - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgral_origen_producto_checkColumnConstraints(p_origen_producto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_origen_producto LIKE ptventasgral.origen_producto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptventasgral_origen_producto_checkColumnConstraints
-
-{<BLOCK Name="fct.ptventasgral_producto_checkColumnConstraints">}
-#+ Check constraints on the "ptventasgral.producto" column
-#+
-#+ @param p_producto - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgral_producto_checkColumnConstraints(p_producto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_producto LIKE ptventasgral.producto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptventasgral_producto_checkColumnConstraints
-
-{<BLOCK Name="fct.ptventasgral_tipoproducto_checkColumnConstraints">}
-#+ Check constraints on the "ptventasgral.tipoproducto" column
-#+
-#+ @param p_tipoproducto - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgral_tipoproducto_checkColumnConstraints(p_tipoproducto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipoproducto LIKE ptventasgral.tipoproducto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptventasgral_tipoproducto_checkColumnConstraints
-
-{<BLOCK Name="fct.ptventasgral_valor_bruto_checkColumnConstraints">}
-#+ Check constraints on the "ptventasgral.valor_bruto" column
-#+
-#+ @param p_valor_bruto - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgral_valor_bruto_checkColumnConstraints(p_valor_bruto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valor_bruto LIKE ptventasgral.valor_bruto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptventasgral_valor_bruto_checkColumnConstraints
-
-{<BLOCK Name="fct.ptventasgral_porc_itbi_checkColumnConstraints">}
-#+ Check constraints on the "ptventasgral.porc_itbi" column
-#+
-#+ @param p_porc_itbi - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgral_porc_itbi_checkColumnConstraints(p_porc_itbi)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_porc_itbi LIKE ptventasgral.porc_itbi
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptventasgral_porc_itbi_checkColumnConstraints
-
-{<BLOCK Name="fct.ptventasgral_descuento_checkColumnConstraints">}
-#+ Check constraints on the "ptventasgral.descuento" column
-#+
-#+ @param p_descuento - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgral_descuento_checkColumnConstraints(p_descuento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descuento LIKE ptventasgral.descuento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptventasgral_descuento_checkColumnConstraints
-
-{<BLOCK Name="fct.ptventasgral_itbis_checkColumnConstraints">}
-#+ Check constraints on the "ptventasgral.itbis" column
-#+
-#+ @param p_itbis - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgral_itbis_checkColumnConstraints(p_itbis)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_itbis LIKE ptventasgral.itbis
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptventasgral_itbis_checkColumnConstraints
-
-{<BLOCK Name="fct.ptventasgral_factura_checkColumnConstraints">}
-#+ Check constraints on the "ptventasgral.factura" column
-#+
-#+ @param p_factura - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgral_factura_checkColumnConstraints(p_factura)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_factura LIKE ptventasgral.factura
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptventasgral_factura_checkColumnConstraints
-
-{<BLOCK Name="fct.ptventasgral_conduce_checkColumnConstraints">}
-#+ Check constraints on the "ptventasgral.conduce" column
-#+
-#+ @param p_conduce - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgral_conduce_checkColumnConstraints(p_conduce)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_conduce LIKE ptventasgral.conduce
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptventasgral_conduce_checkColumnConstraints
-
-{<BLOCK Name="fct.ptventasgral_documentodev_checkColumnConstraints">}
-#+ Check constraints on the "ptventasgral.documentodev" column
-#+
-#+ @param p_documentodev - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgral_documentodev_checkColumnConstraints(p_documentodev)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_documentodev LIKE ptventasgral.documentodev
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptventasgral_documentodev_checkColumnConstraints
-
-{<BLOCK Name="fct.ptventasgral_documentocxc_checkColumnConstraints">}
-#+ Check constraints on the "ptventasgral.documentocxc" column
-#+
-#+ @param p_documentocxc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgral_documentocxc_checkColumnConstraints(p_documentocxc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_documentocxc LIKE ptventasgral.documentocxc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptventasgral_documentocxc_checkColumnConstraints
-
-{<BLOCK Name="fct.ptventasgral_observaciones_checkColumnConstraints">}
-#+ Check constraints on the "ptventasgral.observaciones" column
-#+
-#+ @param p_observaciones - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgral_observaciones_checkColumnConstraints(p_observaciones)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_observaciones LIKE ptventasgral.observaciones
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptventasgral_observaciones_checkColumnConstraints
-
-{<BLOCK Name="fct.ptventasgral_cod_mov_checkColumnConstraints">}
-#+ Check constraints on the "ptventasgral.cod_mov" column
-#+
-#+ @param p_cod_mov - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgral_cod_mov_checkColumnConstraints(p_cod_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mov LIKE ptventasgral.cod_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptventasgral_cod_mov_checkColumnConstraints
-
-{<BLOCK Name="fct.ptventasgral_cond_pago_checkColumnConstraints">}
-#+ Check constraints on the "ptventasgral.cond_pago" column
-#+
-#+ @param p_cond_pago - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgral_cond_pago_checkColumnConstraints(p_cond_pago)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cond_pago LIKE ptventasgral.cond_pago
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptventasgral_cond_pago_checkColumnConstraints
-
-{<BLOCK Name="fct.ptventasgral_descrip_p_checkColumnConstraints">}
-#+ Check constraints on the "ptventasgral.descrip_p" column
-#+
-#+ @param p_descrip_p - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgral_descrip_p_checkColumnConstraints(p_descrip_p)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descrip_p LIKE ptventasgral.descrip_p
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptventasgral_descrip_p_checkColumnConstraints
-
-{<BLOCK Name="fct.ptventasgral_fecha_checkColumnConstraints">}
-#+ Check constraints on the "ptventasgral.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgral_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE ptventasgral.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptventasgral_fecha_checkColumnConstraints
-
-{<BLOCK Name="fct.ptventasgral_numero_mes_checkColumnConstraints">}
-#+ Check constraints on the "ptventasgral.numero_mes" column
-#+
-#+ @param p_numero_mes - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgral_numero_mes_checkColumnConstraints(p_numero_mes)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_numero_mes LIKE ptventasgral.numero_mes
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptventasgral_numero_mes_checkColumnConstraints
-
-{<BLOCK Name="fct.ptventasgral_ano_checkColumnConstraints">}
-#+ Check constraints on the "ptventasgral.ano" column
-#+
-#+ @param p_ano - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgral_ano_checkColumnConstraints(p_ano)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ano LIKE ptventasgral.ano
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptventasgral_ano_checkColumnConstraints
-
-{<BLOCK Name="fct.ptventasgral_mes_checkColumnConstraints">}
-#+ Check constraints on the "ptventasgral.mes" column
-#+
-#+ @param p_mes - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgral_mes_checkColumnConstraints(p_mes)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mes LIKE ptventasgral.mes
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptventasgral_mes_checkColumnConstraints
-
-{<BLOCK Name="fct.ptventasgral_tipo_cliente_checkColumnConstraints">}
-#+ Check constraints on the "ptventasgral.tipo_cliente" column
-#+
-#+ @param p_tipo_cliente - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgral_tipo_cliente_checkColumnConstraints(p_tipo_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_cliente LIKE ptventasgral.tipo_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptventasgral_tipo_cliente_checkColumnConstraints
-
-{<BLOCK Name="fct.ptventasgral_sec_cliente_checkColumnConstraints">}
-#+ Check constraints on the "ptventasgral.sec_cliente" column
-#+
-#+ @param p_sec_cliente - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgral_sec_cliente_checkColumnConstraints(p_sec_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_cliente LIKE ptventasgral.sec_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptventasgral_sec_cliente_checkColumnConstraints
-
-{<BLOCK Name="fct.ptventasgral_nombre_cliente_checkColumnConstraints">}
-#+ Check constraints on the "ptventasgral.nombre_cliente" column
-#+
-#+ @param p_nombre_cliente - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgral_nombre_cliente_checkColumnConstraints(p_nombre_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombre_cliente LIKE ptventasgral.nombre_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptventasgral_nombre_cliente_checkColumnConstraints
-
-{<BLOCK Name="fct.ptventasgral_rnc_checkColumnConstraints">}
-#+ Check constraints on the "ptventasgral.rnc" column
-#+
-#+ @param p_rnc - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgral_rnc_checkColumnConstraints(p_rnc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_rnc LIKE ptventasgral.rnc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptventasgral_rnc_checkColumnConstraints
-
-{<BLOCK Name="fct.ptventasgral_orden_checkColumnConstraints">}
-#+ Check constraints on the "ptventasgral.orden" column
-#+
-#+ @param p_orden - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgral_orden_checkColumnConstraints(p_orden)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_orden LIKE ptventasgral.orden
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptventasgral_orden_checkColumnConstraints
-
-{<BLOCK Name="fct.ptventasgral_sec_vend_checkColumnConstraints">}
-#+ Check constraints on the "ptventasgral.sec_vend" column
-#+
-#+ @param p_sec_vend - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgral_sec_vend_checkColumnConstraints(p_sec_vend)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_vend LIKE ptventasgral.sec_vend
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptventasgral_sec_vend_checkColumnConstraints
-
-{<BLOCK Name="fct.ptventasgral_nombrev_checkColumnConstraints">}
-#+ Check constraints on the "ptventasgral.nombrev" column
-#+
-#+ @param p_nombrev - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgral_nombrev_checkColumnConstraints(p_nombrev)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombrev LIKE ptventasgral.nombrev
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptventasgral_nombrev_checkColumnConstraints
-
-{<BLOCK Name="fct.ptventasgral_apellidov_checkColumnConstraints">}
-#+ Check constraints on the "ptventasgral.apellidov" column
-#+
-#+ @param p_apellidov - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgral_apellidov_checkColumnConstraints(p_apellidov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_apellidov LIKE ptventasgral.apellidov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptventasgral_apellidov_checkColumnConstraints
-
-{<BLOCK Name="fct.ptventasgral_area_checkColumnConstraints">}
-#+ Check constraints on the "ptventasgral.area" column
-#+
-#+ @param p_area - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgral_area_checkColumnConstraints(p_area)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_area LIKE ptventasgral.area
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptventasgral_area_checkColumnConstraints
-
-{<BLOCK Name="fct.ptventasgral_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "ptventasgral.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgral_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE ptventasgral.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptventasgral_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.ptventasgral_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "ptventasgral.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgral_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE ptventasgral.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptventasgral_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.ptventasgral_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "ptventasgral.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgral_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE ptventasgral.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptventasgral_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.ptventasgral_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "ptventasgral.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgral_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE ptventasgral.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptventasgral_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.ptventasgral_descripcionp_checkColumnConstraints">}
-#+ Check constraints on the "ptventasgral.descripcionp" column
-#+
-#+ @param p_descripcionp - CHAR(100) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgral_descripcionp_checkColumnConstraints(p_descripcionp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcionp LIKE ptventasgral.descripcionp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptventasgral_descripcionp_checkColumnConstraints
-
-{<BLOCK Name="fct.ptventasgral_unidadmed_checkColumnConstraints">}
-#+ Check constraints on the "ptventasgral.unidadmed" column
-#+
-#+ @param p_unidadmed - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgral_unidadmed_checkColumnConstraints(p_unidadmed)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_unidadmed LIKE ptventasgral.unidadmed
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptventasgral_unidadmed_checkColumnConstraints
-
-{<BLOCK Name="fct.ptventasgral_cantidad_checkColumnConstraints">}
-#+ Check constraints on the "ptventasgral.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgral_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE ptventasgral.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptventasgral_cantidad_checkColumnConstraints
-
-{<BLOCK Name="fct.ptventasgral_precio_checkColumnConstraints">}
-#+ Check constraints on the "ptventasgral.precio" column
-#+
-#+ @param p_precio - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgral_precio_checkColumnConstraints(p_precio)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_precio LIKE ptventasgral.precio
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptventasgral_precio_checkColumnConstraints
-
-{<BLOCK Name="fct.ptventasgral_material_checkColumnConstraints">}
-#+ Check constraints on the "ptventasgral.material" column
-#+
-#+ @param p_material - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgral_material_checkColumnConstraints(p_material)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_material LIKE ptventasgral.material
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptventasgral_material_checkColumnConstraints
-
-{<BLOCK Name="fct.ptventasgral_labor_checkColumnConstraints">}
-#+ Check constraints on the "ptventasgral.labor" column
-#+
-#+ @param p_labor - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgral_labor_checkColumnConstraints(p_labor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_labor LIKE ptventasgral.labor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptventasgral_labor_checkColumnConstraints
-
-{<BLOCK Name="fct.ptventasgral_gasto_checkColumnConstraints">}
-#+ Check constraints on the "ptventasgral.gasto" column
-#+
-#+ @param p_gasto - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgral_gasto_checkColumnConstraints(p_gasto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_gasto LIKE ptventasgral.gasto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptventasgral_gasto_checkColumnConstraints
-
-{<BLOCK Name="fct.ptventasgral_valormaterial_checkColumnConstraints">}
-#+ Check constraints on the "ptventasgral.valormaterial" column
-#+
-#+ @param p_valormaterial - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgral_valormaterial_checkColumnConstraints(p_valormaterial)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valormaterial LIKE ptventasgral.valormaterial
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptventasgral_valormaterial_checkColumnConstraints
-
-{<BLOCK Name="fct.ptventasgral_valorlabor_checkColumnConstraints">}
-#+ Check constraints on the "ptventasgral.valorlabor" column
-#+
-#+ @param p_valorlabor - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgral_valorlabor_checkColumnConstraints(p_valorlabor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valorlabor LIKE ptventasgral.valorlabor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptventasgral_valorlabor_checkColumnConstraints
-
-{<BLOCK Name="fct.ptventasgral_valorgasto_checkColumnConstraints">}
-#+ Check constraints on the "ptventasgral.valorgasto" column
-#+
-#+ @param p_valorgasto - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgral_valorgasto_checkColumnConstraints(p_valorgasto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valorgasto LIKE ptventasgral.valorgasto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptventasgral_valorgasto_checkColumnConstraints
-
-{<BLOCK Name="fct.ptventasgral_tasa_checkColumnConstraints">}
-#+ Check constraints on the "ptventasgral.tasa" column
-#+
-#+ @param p_tasa - DECIMAL(8,3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgral_tasa_checkColumnConstraints(p_tasa)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tasa LIKE ptventasgral.tasa
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptventasgral_tasa_checkColumnConstraints
-
-{<BLOCK Name="fct.ptventasgral_valorrd_checkColumnConstraints">}
-#+ Check constraints on the "ptventasgral.valorrd" column
-#+
-#+ @param p_valorrd - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgral_valorrd_checkColumnConstraints(p_valorrd)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valorrd LIKE ptventasgral.valorrd
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptventasgral_valorrd_checkColumnConstraints
-
-{<BLOCK Name="fct.ptventasgral_descuentord_checkColumnConstraints">}
-#+ Check constraints on the "ptventasgral.descuentord" column
-#+
-#+ @param p_descuentord - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgral_descuentord_checkColumnConstraints(p_descuentord)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descuentord LIKE ptventasgral.descuentord
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptventasgral_descuentord_checkColumnConstraints
-
-{<BLOCK Name="fct.ptventasgral_itbisrd_checkColumnConstraints">}
-#+ Check constraints on the "ptventasgral.itbisrd" column
-#+
-#+ @param p_itbisrd - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgral_itbisrd_checkColumnConstraints(p_itbisrd)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_itbisrd LIKE ptventasgral.itbisrd
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptventasgral_itbisrd_checkColumnConstraints
-
-{<BLOCK Name="fct.ptventasgral_netord_checkColumnConstraints">}
-#+ Check constraints on the "ptventasgral.netord" column
-#+
-#+ @param p_netord - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgral_netord_checkColumnConstraints(p_netord)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_netord LIKE ptventasgral.netord
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptventasgral_netord_checkColumnConstraints
-
-{<BLOCK Name="fct.ptventasgral_neto_checkColumnConstraints">}
-#+ Check constraints on the "ptventasgral.neto" column
-#+
-#+ @param p_neto - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgral_neto_checkColumnConstraints(p_neto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_neto LIKE ptventasgral.neto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptventasgral_neto_checkColumnConstraints
-
-{<BLOCK Name="fct.ptventasgral_margen_checkColumnConstraints">}
-#+ Check constraints on the "ptventasgral.margen" column
-#+
-#+ @param p_margen - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgral_margen_checkColumnConstraints(p_margen)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_margen LIKE ptventasgral.margen
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptventasgral_margen_checkColumnConstraints
-
-{<BLOCK Name="fct.ptventasgral_transportista_checkColumnConstraints">}
-#+ Check constraints on the "ptventasgral.transportista" column
-#+
-#+ @param p_transportista - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgral_transportista_checkColumnConstraints(p_transportista)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_transportista LIKE ptventasgral.transportista
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptventasgral_transportista_checkColumnConstraints
-
-{<BLOCK Name="fct.ptventasgral_pventas_checkColumnConstraints">}
-#+ Check constraints on the "ptventasgral.pventas" column
-#+
-#+ @param p_pventas - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgral_pventas_checkColumnConstraints(p_pventas)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_pventas LIKE ptventasgral.pventas
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptventasgral_pventas_checkColumnConstraints
-
-{<BLOCK Name="fct.ptventasgral_grupo_checkColumnConstraints">}
-#+ Check constraints on the "ptventasgral.grupo" column
-#+
-#+ @param p_grupo - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptventasgral_grupo_checkColumnConstraints(p_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_grupo LIKE ptventasgral.grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptventasgral_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.ptordenesgral_checkTableConstraints">}
-#+ Check constraints on the "ptordenesgral" table
-#+
-#+ @param p_data - a row data LIKE ptordenesgral.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptordenesgral_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE ptordenesgral.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_ptordenesgral_ano_checkColumnConstraints(p_data.ano) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptordenesgral_mes_checkColumnConstraints(p_data.mes) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptordenesgral_fechaorden_checkColumnConstraints(p_data.fechaorden) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptordenesgral_fechaentrega_checkColumnConstraints(p_data.fechaentrega) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptordenesgral_documento_checkColumnConstraints(p_data.documento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptordenesgral_orden_checkColumnConstraints(p_data.orden) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptordenesgral_fechaavance_checkColumnConstraints(p_data.fechaavance) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptordenesgral_monto_avance_checkColumnConstraints(p_data.monto_avance) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptordenesgral_fechafactura_checkColumnConstraints(p_data.fechafactura) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptordenesgral_clasificacion_checkColumnConstraints(p_data.clasificacion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptordenesgral_origen_checkColumnConstraints(p_data.origen) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptordenesgral_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptordenesgral_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptordenesgral_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptordenesgral_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptordenesgral_descripcionp_checkColumnConstraints(p_data.descripcionp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptordenesgral_unidadmedida_checkColumnConstraints(p_data.unidadmedida) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptordenesgral_existencia_checkColumnConstraints(p_data.existencia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptordenesgral_cantidadorden_checkColumnConstraints(p_data.cantidadorden) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptordenesgral_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptordenesgral_unidades_checkColumnConstraints(p_data.unidades) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptordenesgral_precio_checkColumnConstraints(p_data.precio) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptordenesgral_descuento_checkColumnConstraints(p_data.descuento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptordenesgral_valor_checkColumnConstraints(p_data.valor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptordenesgral_costo_std_checkColumnConstraints(p_data.costo_std) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptordenesgral_costo_lq_checkColumnConstraints(p_data.costo_lq) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptordenesgral_valorcostostd_checkColumnConstraints(p_data.valorcostostd) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptordenesgral_tipo_cliente_checkColumnConstraints(p_data.tipo_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptordenesgral_sec_cliente_checkColumnConstraints(p_data.sec_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptordenesgral_nombrecliente_checkColumnConstraints(p_data.nombrecliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptordenesgral_sec_vend_checkColumnConstraints(p_data.sec_vend) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptordenesgral_nombrevendedor_checkColumnConstraints(p_data.nombrevendedor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptordenesgral_apellidovend_checkColumnConstraints(p_data.apellidovend) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptordenesgral_fechatransac_checkColumnConstraints(p_data.fechatransac) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptordenesgral_tipotrransaccion_checkColumnConstraints(p_data.tipotrransaccion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptordenesgral_estado_checkColumnConstraints(p_data.estado) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptordenesgral_observacion_checkColumnConstraints(p_data.observacion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptordenesgral_detalle_checkColumnConstraints(p_data.detalle) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ptordenesgral_fechaactualizacion_checkColumnConstraints(p_data.fechaactualizacion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptordenesgral_checkTableConstraints
-
-{<BLOCK Name="fct.ptordenesgral_ano_checkColumnConstraints">}
-#+ Check constraints on the "ptordenesgral.ano" column
-#+
-#+ @param p_ano - CHAR(4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptordenesgral_ano_checkColumnConstraints(p_ano)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ano LIKE ptordenesgral.ano
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptordenesgral_ano_checkColumnConstraints
-
-{<BLOCK Name="fct.ptordenesgral_mes_checkColumnConstraints">}
-#+ Check constraints on the "ptordenesgral.mes" column
-#+
-#+ @param p_mes - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptordenesgral_mes_checkColumnConstraints(p_mes)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mes LIKE ptordenesgral.mes
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptordenesgral_mes_checkColumnConstraints
-
-{<BLOCK Name="fct.ptordenesgral_fechaorden_checkColumnConstraints">}
-#+ Check constraints on the "ptordenesgral.fechaorden" column
-#+
-#+ @param p_fechaorden - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptordenesgral_fechaorden_checkColumnConstraints(p_fechaorden)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fechaorden LIKE ptordenesgral.fechaorden
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptordenesgral_fechaorden_checkColumnConstraints
-
-{<BLOCK Name="fct.ptordenesgral_fechaentrega_checkColumnConstraints">}
-#+ Check constraints on the "ptordenesgral.fechaentrega" column
-#+
-#+ @param p_fechaentrega - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptordenesgral_fechaentrega_checkColumnConstraints(p_fechaentrega)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fechaentrega LIKE ptordenesgral.fechaentrega
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptordenesgral_fechaentrega_checkColumnConstraints
-
-{<BLOCK Name="fct.ptordenesgral_documento_checkColumnConstraints">}
-#+ Check constraints on the "ptordenesgral.documento" column
-#+
-#+ @param p_documento - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptordenesgral_documento_checkColumnConstraints(p_documento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_documento LIKE ptordenesgral.documento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptordenesgral_documento_checkColumnConstraints
-
-{<BLOCK Name="fct.ptordenesgral_orden_checkColumnConstraints">}
-#+ Check constraints on the "ptordenesgral.orden" column
-#+
-#+ @param p_orden - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptordenesgral_orden_checkColumnConstraints(p_orden)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_orden LIKE ptordenesgral.orden
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptordenesgral_orden_checkColumnConstraints
-
-{<BLOCK Name="fct.ptordenesgral_fechaavance_checkColumnConstraints">}
-#+ Check constraints on the "ptordenesgral.fechaavance" column
-#+
-#+ @param p_fechaavance - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptordenesgral_fechaavance_checkColumnConstraints(p_fechaavance)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fechaavance LIKE ptordenesgral.fechaavance
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptordenesgral_fechaavance_checkColumnConstraints
-
-{<BLOCK Name="fct.ptordenesgral_monto_avance_checkColumnConstraints">}
-#+ Check constraints on the "ptordenesgral.monto_avance" column
-#+
-#+ @param p_monto_avance - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptordenesgral_monto_avance_checkColumnConstraints(p_monto_avance)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_monto_avance LIKE ptordenesgral.monto_avance
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptordenesgral_monto_avance_checkColumnConstraints
-
-{<BLOCK Name="fct.ptordenesgral_fechafactura_checkColumnConstraints">}
-#+ Check constraints on the "ptordenesgral.fechafactura" column
-#+
-#+ @param p_fechafactura - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptordenesgral_fechafactura_checkColumnConstraints(p_fechafactura)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fechafactura LIKE ptordenesgral.fechafactura
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptordenesgral_fechafactura_checkColumnConstraints
-
-{<BLOCK Name="fct.ptordenesgral_clasificacion_checkColumnConstraints">}
-#+ Check constraints on the "ptordenesgral.clasificacion" column
-#+
-#+ @param p_clasificacion - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptordenesgral_clasificacion_checkColumnConstraints(p_clasificacion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_clasificacion LIKE ptordenesgral.clasificacion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptordenesgral_clasificacion_checkColumnConstraints
-
-{<BLOCK Name="fct.ptordenesgral_origen_checkColumnConstraints">}
-#+ Check constraints on the "ptordenesgral.origen" column
-#+
-#+ @param p_origen - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptordenesgral_origen_checkColumnConstraints(p_origen)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_origen LIKE ptordenesgral.origen
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptordenesgral_origen_checkColumnConstraints
-
-{<BLOCK Name="fct.ptordenesgral_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "ptordenesgral.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptordenesgral_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE ptordenesgral.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptordenesgral_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.ptordenesgral_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "ptordenesgral.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptordenesgral_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE ptordenesgral.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptordenesgral_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.ptordenesgral_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "ptordenesgral.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptordenesgral_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE ptordenesgral.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptordenesgral_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.ptordenesgral_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "ptordenesgral.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptordenesgral_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE ptordenesgral.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptordenesgral_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.ptordenesgral_descripcionp_checkColumnConstraints">}
-#+ Check constraints on the "ptordenesgral.descripcionp" column
-#+
-#+ @param p_descripcionp - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptordenesgral_descripcionp_checkColumnConstraints(p_descripcionp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcionp LIKE ptordenesgral.descripcionp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptordenesgral_descripcionp_checkColumnConstraints
-
-{<BLOCK Name="fct.ptordenesgral_unidadmedida_checkColumnConstraints">}
-#+ Check constraints on the "ptordenesgral.unidadmedida" column
-#+
-#+ @param p_unidadmedida - CHAR(4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptordenesgral_unidadmedida_checkColumnConstraints(p_unidadmedida)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_unidadmedida LIKE ptordenesgral.unidadmedida
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptordenesgral_unidadmedida_checkColumnConstraints
-
-{<BLOCK Name="fct.ptordenesgral_existencia_checkColumnConstraints">}
-#+ Check constraints on the "ptordenesgral.existencia" column
-#+
-#+ @param p_existencia - DECIMAL(12,3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptordenesgral_existencia_checkColumnConstraints(p_existencia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_existencia LIKE ptordenesgral.existencia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptordenesgral_existencia_checkColumnConstraints
-
-{<BLOCK Name="fct.ptordenesgral_cantidadorden_checkColumnConstraints">}
-#+ Check constraints on the "ptordenesgral.cantidadorden" column
-#+
-#+ @param p_cantidadorden - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptordenesgral_cantidadorden_checkColumnConstraints(p_cantidadorden)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidadorden LIKE ptordenesgral.cantidadorden
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptordenesgral_cantidadorden_checkColumnConstraints
-
-{<BLOCK Name="fct.ptordenesgral_cantidad_checkColumnConstraints">}
-#+ Check constraints on the "ptordenesgral.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptordenesgral_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE ptordenesgral.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptordenesgral_cantidad_checkColumnConstraints
-
-{<BLOCK Name="fct.ptordenesgral_unidades_checkColumnConstraints">}
-#+ Check constraints on the "ptordenesgral.unidades" column
-#+
-#+ @param p_unidades - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptordenesgral_unidades_checkColumnConstraints(p_unidades)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_unidades LIKE ptordenesgral.unidades
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptordenesgral_unidades_checkColumnConstraints
-
-{<BLOCK Name="fct.ptordenesgral_precio_checkColumnConstraints">}
-#+ Check constraints on the "ptordenesgral.precio" column
-#+
-#+ @param p_precio - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptordenesgral_precio_checkColumnConstraints(p_precio)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_precio LIKE ptordenesgral.precio
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptordenesgral_precio_checkColumnConstraints
-
-{<BLOCK Name="fct.ptordenesgral_descuento_checkColumnConstraints">}
-#+ Check constraints on the "ptordenesgral.descuento" column
-#+
-#+ @param p_descuento - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptordenesgral_descuento_checkColumnConstraints(p_descuento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descuento LIKE ptordenesgral.descuento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptordenesgral_descuento_checkColumnConstraints
-
-{<BLOCK Name="fct.ptordenesgral_valor_checkColumnConstraints">}
-#+ Check constraints on the "ptordenesgral.valor" column
-#+
-#+ @param p_valor - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptordenesgral_valor_checkColumnConstraints(p_valor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valor LIKE ptordenesgral.valor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptordenesgral_valor_checkColumnConstraints
-
-{<BLOCK Name="fct.ptordenesgral_costo_std_checkColumnConstraints">}
-#+ Check constraints on the "ptordenesgral.costo_std" column
-#+
-#+ @param p_costo_std - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptordenesgral_costo_std_checkColumnConstraints(p_costo_std)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_costo_std LIKE ptordenesgral.costo_std
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptordenesgral_costo_std_checkColumnConstraints
-
-{<BLOCK Name="fct.ptordenesgral_costo_lq_checkColumnConstraints">}
-#+ Check constraints on the "ptordenesgral.costo_lq" column
-#+
-#+ @param p_costo_lq - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptordenesgral_costo_lq_checkColumnConstraints(p_costo_lq)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_costo_lq LIKE ptordenesgral.costo_lq
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptordenesgral_costo_lq_checkColumnConstraints
-
-{<BLOCK Name="fct.ptordenesgral_valorcostostd_checkColumnConstraints">}
-#+ Check constraints on the "ptordenesgral.valorcostostd" column
-#+
-#+ @param p_valorcostostd - DECIMAL(16,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptordenesgral_valorcostostd_checkColumnConstraints(p_valorcostostd)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valorcostostd LIKE ptordenesgral.valorcostostd
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptordenesgral_valorcostostd_checkColumnConstraints
-
-{<BLOCK Name="fct.ptordenesgral_tipo_cliente_checkColumnConstraints">}
-#+ Check constraints on the "ptordenesgral.tipo_cliente" column
-#+
-#+ @param p_tipo_cliente - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptordenesgral_tipo_cliente_checkColumnConstraints(p_tipo_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_cliente LIKE ptordenesgral.tipo_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptordenesgral_tipo_cliente_checkColumnConstraints
-
-{<BLOCK Name="fct.ptordenesgral_sec_cliente_checkColumnConstraints">}
-#+ Check constraints on the "ptordenesgral.sec_cliente" column
-#+
-#+ @param p_sec_cliente - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptordenesgral_sec_cliente_checkColumnConstraints(p_sec_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_cliente LIKE ptordenesgral.sec_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptordenesgral_sec_cliente_checkColumnConstraints
-
-{<BLOCK Name="fct.ptordenesgral_nombrecliente_checkColumnConstraints">}
-#+ Check constraints on the "ptordenesgral.nombrecliente" column
-#+
-#+ @param p_nombrecliente - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptordenesgral_nombrecliente_checkColumnConstraints(p_nombrecliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombrecliente LIKE ptordenesgral.nombrecliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptordenesgral_nombrecliente_checkColumnConstraints
-
-{<BLOCK Name="fct.ptordenesgral_sec_vend_checkColumnConstraints">}
-#+ Check constraints on the "ptordenesgral.sec_vend" column
-#+
-#+ @param p_sec_vend - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptordenesgral_sec_vend_checkColumnConstraints(p_sec_vend)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_vend LIKE ptordenesgral.sec_vend
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptordenesgral_sec_vend_checkColumnConstraints
-
-{<BLOCK Name="fct.ptordenesgral_nombrevendedor_checkColumnConstraints">}
-#+ Check constraints on the "ptordenesgral.nombrevendedor" column
-#+
-#+ @param p_nombrevendedor - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptordenesgral_nombrevendedor_checkColumnConstraints(p_nombrevendedor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombrevendedor LIKE ptordenesgral.nombrevendedor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptordenesgral_nombrevendedor_checkColumnConstraints
-
-{<BLOCK Name="fct.ptordenesgral_apellidovend_checkColumnConstraints">}
-#+ Check constraints on the "ptordenesgral.apellidovend" column
-#+
-#+ @param p_apellidovend - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptordenesgral_apellidovend_checkColumnConstraints(p_apellidovend)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_apellidovend LIKE ptordenesgral.apellidovend
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptordenesgral_apellidovend_checkColumnConstraints
-
-{<BLOCK Name="fct.ptordenesgral_fechatransac_checkColumnConstraints">}
-#+ Check constraints on the "ptordenesgral.fechatransac" column
-#+
-#+ @param p_fechatransac - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptordenesgral_fechatransac_checkColumnConstraints(p_fechatransac)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fechatransac LIKE ptordenesgral.fechatransac
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptordenesgral_fechatransac_checkColumnConstraints
-
-{<BLOCK Name="fct.ptordenesgral_tipotrransaccion_checkColumnConstraints">}
-#+ Check constraints on the "ptordenesgral.tipotrransaccion" column
-#+
-#+ @param p_tipotrransaccion - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptordenesgral_tipotrransaccion_checkColumnConstraints(p_tipotrransaccion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipotrransaccion LIKE ptordenesgral.tipotrransaccion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptordenesgral_tipotrransaccion_checkColumnConstraints
-
-{<BLOCK Name="fct.ptordenesgral_estado_checkColumnConstraints">}
-#+ Check constraints on the "ptordenesgral.estado" column
-#+
-#+ @param p_estado - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptordenesgral_estado_checkColumnConstraints(p_estado)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_estado LIKE ptordenesgral.estado
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptordenesgral_estado_checkColumnConstraints
-
-{<BLOCK Name="fct.ptordenesgral_observacion_checkColumnConstraints">}
-#+ Check constraints on the "ptordenesgral.observacion" column
-#+
-#+ @param p_observacion - CHAR(180) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptordenesgral_observacion_checkColumnConstraints(p_observacion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_observacion LIKE ptordenesgral.observacion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptordenesgral_observacion_checkColumnConstraints
-
-{<BLOCK Name="fct.ptordenesgral_detalle_checkColumnConstraints">}
-#+ Check constraints on the "ptordenesgral.detalle" column
-#+
-#+ @param p_detalle - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptordenesgral_detalle_checkColumnConstraints(p_detalle)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_detalle LIKE ptordenesgral.detalle
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptordenesgral_detalle_checkColumnConstraints
-
-{<BLOCK Name="fct.ptordenesgral_fechaactualizacion_checkColumnConstraints">}
-#+ Check constraints on the "ptordenesgral.fechaactualizacion" column
-#+
-#+ @param p_fechaactualizacion - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ptordenesgral_fechaactualizacion_checkColumnConstraints(p_fechaactualizacion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fechaactualizacion LIKE ptordenesgral.fechaactualizacion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ptordenesgral_fechaactualizacion_checkColumnConstraints
-
-{<BLOCK Name="fct.prttb00002_checkTableConstraints">}
-#+ Check constraints on the "prttb00002" table
-#+
-#+ @param p_data - a row data LIKE prttb00002.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_prttb00002_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE prttb00002.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_prttb00002_ult_imp_checkColumnConstraints(p_data.ult_imp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prttb00002_usuario_checkColumnConstraints(p_data.usuario) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prttb00002_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prttb00002_checkTableConstraints
-
-{<BLOCK Name="fct.prttb00002_ult_imp_checkColumnConstraints">}
-#+ Check constraints on the "prttb00002.ult_imp" column
-#+
-#+ @param p_ult_imp - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prttb00002_ult_imp_checkColumnConstraints(p_ult_imp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ult_imp LIKE prttb00002.ult_imp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prttb00002_ult_imp_checkColumnConstraints
-
-{<BLOCK Name="fct.prttb00002_usuario_checkColumnConstraints">}
-#+ Check constraints on the "prttb00002.usuario" column
-#+
-#+ @param p_usuario - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prttb00002_usuario_checkColumnConstraints(p_usuario)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_usuario LIKE prttb00002.usuario
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prttb00002_usuario_checkColumnConstraints
-
-{<BLOCK Name="fct.prttb00002_fecha_checkColumnConstraints">}
-#+ Check constraints on the "prttb00002.fecha" column
-#+
-#+ @param p_fecha - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prttb00002_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE prttb00002.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prttb00002_fecha_checkColumnConstraints
-
-{<BLOCK Name="fct.prttb00001_checkTableConstraints">}
-#+ Check constraints on the "prttb00001" table
-#+
-#+ @param p_data - a row data LIKE prttb00001.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_prttb00001_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE prttb00001.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_prttb00001_codigo_checkColumnConstraints(p_data.codigo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prttb00001_nombre_checkColumnConstraints(p_data.nombre) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prttb00001_lpprog_checkColumnConstraints(p_data.lpprog) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prttb00001_lppipe_checkColumnConstraints(p_data.lppipe) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prttb00001_puerto_checkColumnConstraints(p_data.puerto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prttb00001_prtcodigo_checkColumnConstraints(p_data.prtcodigo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prttb00001_checkTableConstraints
-
-{<BLOCK Name="fct.prttb00001_codigo_checkColumnConstraints">}
-#+ Check constraints on the "prttb00001.codigo" column
-#+
-#+ @param p_codigo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prttb00001_codigo_checkColumnConstraints(p_codigo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codigo LIKE prttb00001.codigo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prttb00001_codigo_checkColumnConstraints
-
-{<BLOCK Name="fct.prttb00001_nombre_checkColumnConstraints">}
-#+ Check constraints on the "prttb00001.nombre" column
-#+
-#+ @param p_nombre - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prttb00001_nombre_checkColumnConstraints(p_nombre)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombre LIKE prttb00001.nombre
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prttb00001_nombre_checkColumnConstraints
-
-{<BLOCK Name="fct.prttb00001_lpprog_checkColumnConstraints">}
-#+ Check constraints on the "prttb00001.lpprog" column
-#+
-#+ @param p_lpprog - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prttb00001_lpprog_checkColumnConstraints(p_lpprog)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_lpprog LIKE prttb00001.lpprog
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prttb00001_lpprog_checkColumnConstraints
-
-{<BLOCK Name="fct.prttb00001_lppipe_checkColumnConstraints">}
-#+ Check constraints on the "prttb00001.lppipe" column
-#+
-#+ @param p_lppipe - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prttb00001_lppipe_checkColumnConstraints(p_lppipe)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_lppipe LIKE prttb00001.lppipe
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prttb00001_lppipe_checkColumnConstraints
-
-{<BLOCK Name="fct.prttb00001_puerto_checkColumnConstraints">}
-#+ Check constraints on the "prttb00001.puerto" column
-#+
-#+ @param p_puerto - CHAR(100) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prttb00001_puerto_checkColumnConstraints(p_puerto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_puerto LIKE prttb00001.puerto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prttb00001_puerto_checkColumnConstraints
-
-{<BLOCK Name="fct.prttb00001_prtcodigo_checkColumnConstraints">}
-#+ Check constraints on the "prttb00001.prtcodigo" column
-#+
-#+ @param p_prtcodigo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prttb00001_prtcodigo_checkColumnConstraints(p_prtcodigo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_prtcodigo LIKE prttb00001.prtcodigo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prttb00001_prtcodigo_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00030_checkTableConstraints">}
-#+ Check constraints on the "prtb00030" table
-#+
-#+ @param p_data - a row data LIKE prtb00030.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00030_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE prtb00030.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_prtb00030_id_kit_checkColumnConstraints(p_data.id_kit) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00030_num_oc_checkColumnConstraints(p_data.num_oc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00030_area_checkColumnConstraints(p_data.area) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00030_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00030_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00030_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00030_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00030_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00030_precio_checkColumnConstraints(p_data.precio) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00030_checkTableConstraints
-
-{<BLOCK Name="fct.prtb00030_id_kit_checkColumnConstraints">}
-#+ Check constraints on the "prtb00030.id_kit" column
-#+
-#+ @param p_id_kit - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00030_id_kit_checkColumnConstraints(p_id_kit)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_id_kit LIKE prtb00030.id_kit
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00030_id_kit_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00030_num_oc_checkColumnConstraints">}
-#+ Check constraints on the "prtb00030.num_oc" column
-#+
-#+ @param p_num_oc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00030_num_oc_checkColumnConstraints(p_num_oc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_oc LIKE prtb00030.num_oc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00030_num_oc_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00030_area_checkColumnConstraints">}
-#+ Check constraints on the "prtb00030.area" column
-#+
-#+ @param p_area - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00030_area_checkColumnConstraints(p_area)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_area LIKE prtb00030.area
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00030_area_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00030_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "prtb00030.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00030_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE prtb00030.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00030_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00030_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "prtb00030.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00030_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE prtb00030.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00030_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00030_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "prtb00030.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00030_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE prtb00030.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00030_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00030_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "prtb00030.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00030_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE prtb00030.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00030_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00030_cantidad_checkColumnConstraints">}
-#+ Check constraints on the "prtb00030.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00030_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE prtb00030.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00030_cantidad_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00030_precio_checkColumnConstraints">}
-#+ Check constraints on the "prtb00030.precio" column
-#+
-#+ @param p_precio - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00030_precio_checkColumnConstraints(p_precio)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_precio LIKE prtb00030.precio
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00030_precio_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00029_checkTableConstraints">}
-#+ Check constraints on the "prtb00029" table
-#+
-#+ @param p_data - a row data LIKE prtb00029.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00029_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE prtb00029.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_prtb00029_num_oc_checkColumnConstraints(p_data.num_oc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00029_ruta_file_checkColumnConstraints(p_data.ruta_file) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00029_id_checkColumnConstraints(p_data.id) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00029_checkTableConstraints
-
-{<BLOCK Name="fct.prtb00029_num_oc_checkColumnConstraints">}
-#+ Check constraints on the "prtb00029.num_oc" column
-#+
-#+ @param p_num_oc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00029_num_oc_checkColumnConstraints(p_num_oc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_oc LIKE prtb00029.num_oc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00029_num_oc_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00029_ruta_file_checkColumnConstraints">}
-#+ Check constraints on the "prtb00029.ruta_file" column
-#+
-#+ @param p_ruta_file - CHAR(100) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00029_ruta_file_checkColumnConstraints(p_ruta_file)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ruta_file LIKE prtb00029.ruta_file
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00029_ruta_file_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00029_id_checkColumnConstraints">}
-#+ Check constraints on the "prtb00029.id" column
-#+
-#+ @param p_id - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00029_id_checkColumnConstraints(p_id)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_id LIKE prtb00029.id
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00029_id_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00028_checkTableConstraints">}
-#+ Check constraints on the "prtb00028" table
-#+
-#+ @param p_data - a row data LIKE prtb00028.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00028_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE prtb00028.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_prtb00028_num_oc_checkColumnConstraints(p_data.num_oc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00028_fecha_compromiso_checkColumnConstraints(p_data.fecha_compromiso) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00028_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00028_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00028_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00028_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00028_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00028_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00028_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- CALL smarmotech_dbxconstraints_prtb00028_pk_prtb00028_checkUniqueConstraint(p_forUpdate, p_data.num_oc, p_data.fecha_compromiso, p_data.cod_n, p_data.cod_grupo, p_data.cod_tipo, p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00028_checkTableConstraints
-
-{<BLOCK Name="fct.prtb00028_pk_prtb00028_checkUniqueConstraint">}
-#+ Check the primary key uniqueness constraint on the "prtb00028"
-#+
-#+ @param p_key - Primary Key
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00028_pk_prtb00028_checkUniqueConstraint(p_forUpdate, p_key)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_key
- RECORD
- prtb00028_num_oc LIKE prtb00028.num_oc,
- prtb00028_fecha_compromiso LIKE prtb00028.fecha_compromiso,
- prtb00028_cod_n LIKE prtb00028.cod_n,
- prtb00028_cod_grupo LIKE prtb00028.cod_grupo,
- prtb00028_cod_tipo LIKE prtb00028.cod_tipo,
- prtb00028_cod_sec LIKE prtb00028.cod_sec
- END RECORD
- DEFINE l_key
- RECORD
- prtb00028_num_oc LIKE prtb00028.num_oc,
- prtb00028_fecha_compromiso LIKE prtb00028.fecha_compromiso,
- prtb00028_cod_n LIKE prtb00028.cod_n,
- prtb00028_cod_grupo LIKE prtb00028.cod_grupo,
- prtb00028_cod_tipo LIKE prtb00028.cod_tipo,
- prtb00028_cod_sec LIKE prtb00028.cod_sec
- END RECORD
- DEFINE l_where STRING
- DEFINE l_sqlQuery STRING
- DEFINE l_count INTEGER
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- LET l_where = "WHERE prtb00028.num_oc = ?
- AND prtb00028.fecha_compromiso = ?
- AND prtb00028.cod_n = ?
- AND prtb00028.cod_grupo = ?
- AND prtb00028.cod_tipo = ?
- AND prtb00028.cod_sec = ? "
-
- let l_sqlQuery = "SELECT COUNT(*), num_oc, fecha_compromiso, cod_n, cod_grupo, cod_tipo, cod_sec FROM prtb00028 ", l_where, " GROUP BY num_oc, fecha_compromiso, cod_n, cod_grupo, cod_tipo, cod_sec"
-
- PREPARE cur_prtb00028_pk_prtb00028_checkUniqueConstraint FROM l_sqlQuery
- EXECUTE cur_prtb00028_pk_prtb00028_checkUniqueConstraint INTO l_count, l_key.* USING p_key.*
- FREE cur_prtb00028_pk_prtb00028_checkUniqueConstraint
- IF (NOT p_forUpdate AND l_count > 0) OR (p_forUpdate AND l_count > 0 AND p_key.* != l_key.*) THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- num_oc + fecha_compromiso + cod_n + cod_grupo + cod_tipo + cod_sec: " || ERROR_BAM_00002) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00028_pk_prtb00028_checkUniqueConstraint
-
-{<BLOCK Name="fct.prtb00028_num_oc_checkColumnConstraints">}
-#+ Check constraints on the "prtb00028.num_oc" column
-#+
-#+ @param p_num_oc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00028_num_oc_checkColumnConstraints(p_num_oc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_oc LIKE prtb00028.num_oc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_num_oc IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- num_oc: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00028_num_oc_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00028_fecha_compromiso_checkColumnConstraints">}
-#+ Check constraints on the "prtb00028.fecha_compromiso" column
-#+
-#+ @param p_fecha_compromiso - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00028_fecha_compromiso_checkColumnConstraints(p_fecha_compromiso)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_compromiso LIKE prtb00028.fecha_compromiso
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_fecha_compromiso IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- fecha_compromiso: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00028_fecha_compromiso_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00028_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "prtb00028.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00028_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE prtb00028.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_n IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_n: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00028_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00028_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "prtb00028.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00028_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE prtb00028.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_grupo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_grupo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00028_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00028_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "prtb00028.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00028_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE prtb00028.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_tipo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_tipo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00028_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00028_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "prtb00028.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00028_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE prtb00028.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_sec IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_sec: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00028_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00028_cantidad_checkColumnConstraints">}
-#+ Check constraints on the "prtb00028.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00028_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE prtb00028.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00028_cantidad_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00028_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "prtb00028.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00028_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE prtb00028.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00028_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00028_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "prtb00028.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00028_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE prtb00028.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00028_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00027_checkTableConstraints">}
-#+ Check constraints on the "prtb00027" table
-#+
-#+ @param p_data - a row data LIKE prtb00027.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00027_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE prtb00027.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_prtb00027_num_autoriza_checkColumnConstraints(p_data.num_autoriza) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00027_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00027_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00027_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00027_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00027_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00027_monto_checkColumnConstraints(p_data.monto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00027_checkTableConstraints
-
-{<BLOCK Name="fct.prtb00027_num_autoriza_checkColumnConstraints">}
-#+ Check constraints on the "prtb00027.num_autoriza" column
-#+
-#+ @param p_num_autoriza - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00027_num_autoriza_checkColumnConstraints(p_num_autoriza)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_autoriza LIKE prtb00027.num_autoriza
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00027_num_autoriza_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00027_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "prtb00027.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00027_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE prtb00027.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00027_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00027_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "prtb00027.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00027_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE prtb00027.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00027_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00027_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "prtb00027.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00027_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE prtb00027.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00027_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00027_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "prtb00027.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00027_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE prtb00027.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00027_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00027_cantidad_checkColumnConstraints">}
-#+ Check constraints on the "prtb00027.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(12,3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00027_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE prtb00027.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00027_cantidad_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00027_monto_checkColumnConstraints">}
-#+ Check constraints on the "prtb00027.monto" column
-#+
-#+ @param p_monto - DECIMAL(12,3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00027_monto_checkColumnConstraints(p_monto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_monto LIKE prtb00027.monto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00027_monto_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00026_checkTableConstraints">}
-#+ Check constraints on the "prtb00026" table
-#+
-#+ @param p_data - a row data LIKE prtb00026.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00026_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE prtb00026.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_prtb00026_num_autoriza_checkColumnConstraints(p_data.num_autoriza) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00026_observacion_checkColumnConstraints(p_data.observacion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00026_num_oc_checkColumnConstraints(p_data.num_oc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00026_num_doc_checkColumnConstraints(p_data.num_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00026_cod_mov_checkColumnConstraints(p_data.cod_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00026_descrip_mov_checkColumnConstraints(p_data.descrip_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00026_fecha_oc_checkColumnConstraints(p_data.fecha_oc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00026_fecha_autoriza_checkColumnConstraints(p_data.fecha_autoriza) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00026_usuario_checkColumnConstraints(p_data.usuario) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00026_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00026_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00026_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00026_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00026_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00026_checkTableConstraints
-
-{<BLOCK Name="fct.prtb00026_num_autoriza_checkColumnConstraints">}
-#+ Check constraints on the "prtb00026.num_autoriza" column
-#+
-#+ @param p_num_autoriza - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00026_num_autoriza_checkColumnConstraints(p_num_autoriza)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_autoriza LIKE prtb00026.num_autoriza
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00026_num_autoriza_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00026_observacion_checkColumnConstraints">}
-#+ Check constraints on the "prtb00026.observacion" column
-#+
-#+ @param p_observacion - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00026_observacion_checkColumnConstraints(p_observacion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_observacion LIKE prtb00026.observacion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00026_observacion_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00026_num_oc_checkColumnConstraints">}
-#+ Check constraints on the "prtb00026.num_oc" column
-#+
-#+ @param p_num_oc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00026_num_oc_checkColumnConstraints(p_num_oc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_oc LIKE prtb00026.num_oc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00026_num_oc_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00026_num_doc_checkColumnConstraints">}
-#+ Check constraints on the "prtb00026.num_doc" column
-#+
-#+ @param p_num_doc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00026_num_doc_checkColumnConstraints(p_num_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_doc LIKE prtb00026.num_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00026_num_doc_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00026_cod_mov_checkColumnConstraints">}
-#+ Check constraints on the "prtb00026.cod_mov" column
-#+
-#+ @param p_cod_mov - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00026_cod_mov_checkColumnConstraints(p_cod_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mov LIKE prtb00026.cod_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00026_cod_mov_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00026_descrip_mov_checkColumnConstraints">}
-#+ Check constraints on the "prtb00026.descrip_mov" column
-#+
-#+ @param p_descrip_mov - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00026_descrip_mov_checkColumnConstraints(p_descrip_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descrip_mov LIKE prtb00026.descrip_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00026_descrip_mov_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00026_fecha_oc_checkColumnConstraints">}
-#+ Check constraints on the "prtb00026.fecha_oc" column
-#+
-#+ @param p_fecha_oc - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00026_fecha_oc_checkColumnConstraints(p_fecha_oc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_oc LIKE prtb00026.fecha_oc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00026_fecha_oc_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00026_fecha_autoriza_checkColumnConstraints">}
-#+ Check constraints on the "prtb00026.fecha_autoriza" column
-#+
-#+ @param p_fecha_autoriza - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00026_fecha_autoriza_checkColumnConstraints(p_fecha_autoriza)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_autoriza LIKE prtb00026.fecha_autoriza
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00026_fecha_autoriza_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00026_usuario_checkColumnConstraints">}
-#+ Check constraints on the "prtb00026.usuario" column
-#+
-#+ @param p_usuario - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00026_usuario_checkColumnConstraints(p_usuario)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_usuario LIKE prtb00026.usuario
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00026_usuario_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00026_status_t_checkColumnConstraints">}
-#+ Check constraints on the "prtb00026.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00026_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE prtb00026.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00026_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00026_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "prtb00026.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00026_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE prtb00026.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00026_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00026_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "prtb00026.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00026_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE prtb00026.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00026_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00026_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "prtb00026.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00026_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE prtb00026.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00026_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00026_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "prtb00026.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00026_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE prtb00026.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00026_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00025_checkTableConstraints">}
-#+ Check constraints on the "prtb00025" table
-#+
-#+ @param p_data - a row data LIKE prtb00025.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00025_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE prtb00025.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_prtb00025_num_oc_checkColumnConstraints(p_data.num_oc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00025_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00025_tipo_cliente_checkColumnConstraints(p_data.tipo_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00025_sec_cliente_checkColumnConstraints(p_data.sec_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00025_nombre_checkColumnConstraints(p_data.nombre) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00025_valor_checkColumnConstraints(p_data.valor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00025_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00025_us_autoriza_checkColumnConstraints(p_data.us_autoriza) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00025_fecha_autorizacion_checkColumnConstraints(p_data.fecha_autorizacion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00025_estado_checkColumnConstraints(p_data.estado) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00025_checkTableConstraints
-
-{<BLOCK Name="fct.prtb00025_num_oc_checkColumnConstraints">}
-#+ Check constraints on the "prtb00025.num_oc" column
-#+
-#+ @param p_num_oc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00025_num_oc_checkColumnConstraints(p_num_oc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_oc LIKE prtb00025.num_oc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00025_num_oc_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00025_fecha_checkColumnConstraints">}
-#+ Check constraints on the "prtb00025.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00025_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE prtb00025.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00025_fecha_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00025_tipo_cliente_checkColumnConstraints">}
-#+ Check constraints on the "prtb00025.tipo_cliente" column
-#+
-#+ @param p_tipo_cliente - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00025_tipo_cliente_checkColumnConstraints(p_tipo_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_cliente LIKE prtb00025.tipo_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00025_tipo_cliente_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00025_sec_cliente_checkColumnConstraints">}
-#+ Check constraints on the "prtb00025.sec_cliente" column
-#+
-#+ @param p_sec_cliente - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00025_sec_cliente_checkColumnConstraints(p_sec_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_cliente LIKE prtb00025.sec_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00025_sec_cliente_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00025_nombre_checkColumnConstraints">}
-#+ Check constraints on the "prtb00025.nombre" column
-#+
-#+ @param p_nombre - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00025_nombre_checkColumnConstraints(p_nombre)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombre LIKE prtb00025.nombre
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00025_nombre_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00025_valor_checkColumnConstraints">}
-#+ Check constraints on the "prtb00025.valor" column
-#+
-#+ @param p_valor - DECIMAL(16,0) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00025_valor_checkColumnConstraints(p_valor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valor LIKE prtb00025.valor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00025_valor_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00025_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "prtb00025.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00025_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE prtb00025.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00025_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00025_us_autoriza_checkColumnConstraints">}
-#+ Check constraints on the "prtb00025.us_autoriza" column
-#+
-#+ @param p_us_autoriza - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00025_us_autoriza_checkColumnConstraints(p_us_autoriza)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_autoriza LIKE prtb00025.us_autoriza
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00025_us_autoriza_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00025_fecha_autorizacion_checkColumnConstraints">}
-#+ Check constraints on the "prtb00025.fecha_autorizacion" column
-#+
-#+ @param p_fecha_autorizacion - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00025_fecha_autorizacion_checkColumnConstraints(p_fecha_autorizacion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_autorizacion LIKE prtb00025.fecha_autorizacion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00025_fecha_autorizacion_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00025_estado_checkColumnConstraints">}
-#+ Check constraints on the "prtb00025.estado" column
-#+
-#+ @param p_estado - CHAR(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00025_estado_checkColumnConstraints(p_estado)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_estado LIKE prtb00025.estado
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00025_estado_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00024_checkTableConstraints">}
-#+ Check constraints on the "prtb00024" table
-#+
-#+ @param p_data - a row data LIKE prtb00024.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00024_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE prtb00024.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_prtb00024_num_oc_checkColumnConstraints(p_data.num_oc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00024_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00024_checkTableConstraints
-
-{<BLOCK Name="fct.prtb00024_num_oc_checkColumnConstraints">}
-#+ Check constraints on the "prtb00024.num_oc" column
-#+
-#+ @param p_num_oc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00024_num_oc_checkColumnConstraints(p_num_oc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_oc LIKE prtb00024.num_oc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00024_num_oc_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00024_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "prtb00024.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00024_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE prtb00024.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00024_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00023_checkTableConstraints">}
-#+ Check constraints on the "prtb00023" table
-#+
-#+ @param p_data - a row data LIKE prtb00023.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00023_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE prtb00023.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_prtb00023_num_oc_checkColumnConstraints(p_data.num_oc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00023_secuencia_checkColumnConstraints(p_data.secuencia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00023_area_checkColumnConstraints(p_data.area) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00023_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00023_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00023_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00023_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00023_cantidad_1_checkColumnConstraints(p_data.cantidad_1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00023_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00023_id_kit_checkColumnConstraints(p_data.id_kit) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00023_checkTableConstraints
-
-{<BLOCK Name="fct.prtb00023_num_oc_checkColumnConstraints">}
-#+ Check constraints on the "prtb00023.num_oc" column
-#+
-#+ @param p_num_oc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00023_num_oc_checkColumnConstraints(p_num_oc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_oc LIKE prtb00023.num_oc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00023_num_oc_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00023_secuencia_checkColumnConstraints">}
-#+ Check constraints on the "prtb00023.secuencia" column
-#+
-#+ @param p_secuencia - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00023_secuencia_checkColumnConstraints(p_secuencia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_secuencia LIKE prtb00023.secuencia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00023_secuencia_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00023_area_checkColumnConstraints">}
-#+ Check constraints on the "prtb00023.area" column
-#+
-#+ @param p_area - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00023_area_checkColumnConstraints(p_area)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_area LIKE prtb00023.area
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00023_area_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00023_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "prtb00023.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00023_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE prtb00023.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00023_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00023_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "prtb00023.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00023_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE prtb00023.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00023_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00023_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "prtb00023.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00023_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE prtb00023.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00023_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00023_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "prtb00023.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00023_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE prtb00023.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00023_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00023_cantidad_1_checkColumnConstraints">}
-#+ Check constraints on the "prtb00023.cantidad_1" column
-#+
-#+ @param p_cantidad_1 - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00023_cantidad_1_checkColumnConstraints(p_cantidad_1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad_1 LIKE prtb00023.cantidad_1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00023_cantidad_1_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00023_cantidad_checkColumnConstraints">}
-#+ Check constraints on the "prtb00023.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00023_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE prtb00023.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00023_cantidad_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00023_id_kit_checkColumnConstraints">}
-#+ Check constraints on the "prtb00023.id_kit" column
-#+
-#+ @param p_id_kit - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00023_id_kit_checkColumnConstraints(p_id_kit)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_id_kit LIKE prtb00023.id_kit
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00023_id_kit_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00022_checkTableConstraints">}
-#+ Check constraints on the "prtb00022" table
-#+
-#+ @param p_data - a row data LIKE prtb00022.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00022_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE prtb00022.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_prtb00022_etiqueta_checkColumnConstraints(p_data.etiqueta) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00022_num_oc_checkColumnConstraints(p_data.num_oc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00022_secuencia_checkColumnConstraints(p_data.secuencia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00022_area_checkColumnConstraints(p_data.area) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00022_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00022_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00022_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00022_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00022_lado_1_checkColumnConstraints(p_data.lado_1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00022_lado_2_checkColumnConstraints(p_data.lado_2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00022_lado_3_checkColumnConstraints(p_data.lado_3) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00022_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00022_medida_checkColumnConstraints(p_data.medida) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00022_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00022_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00022_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00022_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00022_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00022_checkTableConstraints
-
-{<BLOCK Name="fct.prtb00022_etiqueta_checkColumnConstraints">}
-#+ Check constraints on the "prtb00022.etiqueta" column
-#+
-#+ @param p_etiqueta - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00022_etiqueta_checkColumnConstraints(p_etiqueta)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_etiqueta LIKE prtb00022.etiqueta
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_etiqueta IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- etiqueta: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00022_etiqueta_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00022_num_oc_checkColumnConstraints">}
-#+ Check constraints on the "prtb00022.num_oc" column
-#+
-#+ @param p_num_oc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00022_num_oc_checkColumnConstraints(p_num_oc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_oc LIKE prtb00022.num_oc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00022_num_oc_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00022_secuencia_checkColumnConstraints">}
-#+ Check constraints on the "prtb00022.secuencia" column
-#+
-#+ @param p_secuencia - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00022_secuencia_checkColumnConstraints(p_secuencia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_secuencia LIKE prtb00022.secuencia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00022_secuencia_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00022_area_checkColumnConstraints">}
-#+ Check constraints on the "prtb00022.area" column
-#+
-#+ @param p_area - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00022_area_checkColumnConstraints(p_area)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_area LIKE prtb00022.area
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00022_area_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00022_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "prtb00022.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00022_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE prtb00022.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00022_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00022_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "prtb00022.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00022_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE prtb00022.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00022_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00022_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "prtb00022.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00022_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE prtb00022.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00022_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00022_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "prtb00022.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00022_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE prtb00022.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00022_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00022_lado_1_checkColumnConstraints">}
-#+ Check constraints on the "prtb00022.lado_1" column
-#+
-#+ @param p_lado_1 - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00022_lado_1_checkColumnConstraints(p_lado_1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_lado_1 LIKE prtb00022.lado_1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00022_lado_1_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00022_lado_2_checkColumnConstraints">}
-#+ Check constraints on the "prtb00022.lado_2" column
-#+
-#+ @param p_lado_2 - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00022_lado_2_checkColumnConstraints(p_lado_2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_lado_2 LIKE prtb00022.lado_2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00022_lado_2_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00022_lado_3_checkColumnConstraints">}
-#+ Check constraints on the "prtb00022.lado_3" column
-#+
-#+ @param p_lado_3 - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00022_lado_3_checkColumnConstraints(p_lado_3)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_lado_3 LIKE prtb00022.lado_3
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00022_lado_3_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00022_cantidad_checkColumnConstraints">}
-#+ Check constraints on the "prtb00022.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00022_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE prtb00022.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00022_cantidad_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00022_medida_checkColumnConstraints">}
-#+ Check constraints on the "prtb00022.medida" column
-#+
-#+ @param p_medida - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00022_medida_checkColumnConstraints(p_medida)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_medida LIKE prtb00022.medida
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00022_medida_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00022_status_t_checkColumnConstraints">}
-#+ Check constraints on the "prtb00022.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00022_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE prtb00022.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00022_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00022_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "prtb00022.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00022_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE prtb00022.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00022_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00022_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "prtb00022.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00022_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE prtb00022.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00022_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00022_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "prtb00022.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00022_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE prtb00022.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00022_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00022_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "prtb00022.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00022_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE prtb00022.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00022_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00021_checkTableConstraints">}
-#+ Check constraints on the "prtb00021" table
-#+
-#+ @param p_data - a row data LIKE prtb00021.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00021_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE prtb00021.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_prtb00021_ano_checkColumnConstraints(p_data.ano) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00021_dia_checkColumnConstraints(p_data.dia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00021_mes_checkColumnConstraints(p_data.mes) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00021_semana_checkColumnConstraints(p_data.semana) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00021_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00021_documento_checkColumnConstraints(p_data.documento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00021_codigosemi_checkColumnConstraints(p_data.codigosemi) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00021_descripcionsemi_checkColumnConstraints(p_data.descripcionsemi) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00021_uniadmed_checkColumnConstraints(p_data.uniadmed) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00021_codigodepto_checkColumnConstraints(p_data.codigodepto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00021_nombredto_checkColumnConstraints(p_data.nombredto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00021_ficha_checkColumnConstraints(p_data.ficha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00021_nombre_checkColumnConstraints(p_data.nombre) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00021_apellido_checkColumnConstraints(p_data.apellido) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00021_normalesd_checkColumnConstraints(p_data.normalesd) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00021_normalesind_checkColumnConstraints(p_data.normalesind) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00021_extrasdirecta_checkColumnConstraints(p_data.extrasdirecta) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00021_extrasind_checkColumnConstraints(p_data.extrasind) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00021_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00021_bloque_checkColumnConstraints(p_data.bloque) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00021_cantidadprep_checkColumnConstraints(p_data.cantidadprep) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00021_grupodepto_checkColumnConstraints(p_data.grupodepto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00021_costo_checkColumnConstraints(p_data.costo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00021_checkTableConstraints
-
-{<BLOCK Name="fct.prtb00021_ano_checkColumnConstraints">}
-#+ Check constraints on the "prtb00021.ano" column
-#+
-#+ @param p_ano - CHAR(4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00021_ano_checkColumnConstraints(p_ano)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ano LIKE prtb00021.ano
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00021_ano_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00021_dia_checkColumnConstraints">}
-#+ Check constraints on the "prtb00021.dia" column
-#+
-#+ @param p_dia - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00021_dia_checkColumnConstraints(p_dia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_dia LIKE prtb00021.dia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00021_dia_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00021_mes_checkColumnConstraints">}
-#+ Check constraints on the "prtb00021.mes" column
-#+
-#+ @param p_mes - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00021_mes_checkColumnConstraints(p_mes)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mes LIKE prtb00021.mes
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00021_mes_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00021_semana_checkColumnConstraints">}
-#+ Check constraints on the "prtb00021.semana" column
-#+
-#+ @param p_semana - CHAR(25) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00021_semana_checkColumnConstraints(p_semana)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_semana LIKE prtb00021.semana
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00021_semana_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00021_fecha_checkColumnConstraints">}
-#+ Check constraints on the "prtb00021.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00021_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE prtb00021.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00021_fecha_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00021_documento_checkColumnConstraints">}
-#+ Check constraints on the "prtb00021.documento" column
-#+
-#+ @param p_documento - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00021_documento_checkColumnConstraints(p_documento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_documento LIKE prtb00021.documento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00021_documento_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00021_codigosemi_checkColumnConstraints">}
-#+ Check constraints on the "prtb00021.codigosemi" column
-#+
-#+ @param p_codigosemi - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00021_codigosemi_checkColumnConstraints(p_codigosemi)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codigosemi LIKE prtb00021.codigosemi
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00021_codigosemi_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00021_descripcionsemi_checkColumnConstraints">}
-#+ Check constraints on the "prtb00021.descripcionsemi" column
-#+
-#+ @param p_descripcionsemi - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00021_descripcionsemi_checkColumnConstraints(p_descripcionsemi)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcionsemi LIKE prtb00021.descripcionsemi
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00021_descripcionsemi_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00021_uniadmed_checkColumnConstraints">}
-#+ Check constraints on the "prtb00021.uniadmed" column
-#+
-#+ @param p_uniadmed - CHAR(4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00021_uniadmed_checkColumnConstraints(p_uniadmed)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_uniadmed LIKE prtb00021.uniadmed
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00021_uniadmed_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00021_codigodepto_checkColumnConstraints">}
-#+ Check constraints on the "prtb00021.codigodepto" column
-#+
-#+ @param p_codigodepto - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00021_codigodepto_checkColumnConstraints(p_codigodepto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codigodepto LIKE prtb00021.codigodepto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00021_codigodepto_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00021_nombredto_checkColumnConstraints">}
-#+ Check constraints on the "prtb00021.nombredto" column
-#+
-#+ @param p_nombredto - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00021_nombredto_checkColumnConstraints(p_nombredto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombredto LIKE prtb00021.nombredto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00021_nombredto_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00021_ficha_checkColumnConstraints">}
-#+ Check constraints on the "prtb00021.ficha" column
-#+
-#+ @param p_ficha - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00021_ficha_checkColumnConstraints(p_ficha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ficha LIKE prtb00021.ficha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00021_ficha_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00021_nombre_checkColumnConstraints">}
-#+ Check constraints on the "prtb00021.nombre" column
-#+
-#+ @param p_nombre - CHAR(25) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00021_nombre_checkColumnConstraints(p_nombre)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombre LIKE prtb00021.nombre
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00021_nombre_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00021_apellido_checkColumnConstraints">}
-#+ Check constraints on the "prtb00021.apellido" column
-#+
-#+ @param p_apellido - CHAR(25) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00021_apellido_checkColumnConstraints(p_apellido)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_apellido LIKE prtb00021.apellido
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00021_apellido_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00021_normalesd_checkColumnConstraints">}
-#+ Check constraints on the "prtb00021.normalesd" column
-#+
-#+ @param p_normalesd - DECIMAL(8,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00021_normalesd_checkColumnConstraints(p_normalesd)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_normalesd LIKE prtb00021.normalesd
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00021_normalesd_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00021_normalesind_checkColumnConstraints">}
-#+ Check constraints on the "prtb00021.normalesind" column
-#+
-#+ @param p_normalesind - DECIMAL(8,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00021_normalesind_checkColumnConstraints(p_normalesind)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_normalesind LIKE prtb00021.normalesind
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00021_normalesind_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00021_extrasdirecta_checkColumnConstraints">}
-#+ Check constraints on the "prtb00021.extrasdirecta" column
-#+
-#+ @param p_extrasdirecta - DECIMAL(8,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00021_extrasdirecta_checkColumnConstraints(p_extrasdirecta)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_extrasdirecta LIKE prtb00021.extrasdirecta
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00021_extrasdirecta_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00021_extrasind_checkColumnConstraints">}
-#+ Check constraints on the "prtb00021.extrasind" column
-#+
-#+ @param p_extrasind - DECIMAL(8,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00021_extrasind_checkColumnConstraints(p_extrasind)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_extrasind LIKE prtb00021.extrasind
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00021_extrasind_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00021_cantidad_checkColumnConstraints">}
-#+ Check constraints on the "prtb00021.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00021_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE prtb00021.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00021_cantidad_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00021_bloque_checkColumnConstraints">}
-#+ Check constraints on the "prtb00021.bloque" column
-#+
-#+ @param p_bloque - CHAR(25) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00021_bloque_checkColumnConstraints(p_bloque)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_bloque LIKE prtb00021.bloque
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00021_bloque_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00021_cantidadprep_checkColumnConstraints">}
-#+ Check constraints on the "prtb00021.cantidadprep" column
-#+
-#+ @param p_cantidadprep - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00021_cantidadprep_checkColumnConstraints(p_cantidadprep)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidadprep LIKE prtb00021.cantidadprep
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00021_cantidadprep_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00021_grupodepto_checkColumnConstraints">}
-#+ Check constraints on the "prtb00021.grupodepto" column
-#+
-#+ @param p_grupodepto - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00021_grupodepto_checkColumnConstraints(p_grupodepto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_grupodepto LIKE prtb00021.grupodepto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00021_grupodepto_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00021_costo_checkColumnConstraints">}
-#+ Check constraints on the "prtb00021.costo" column
-#+
-#+ @param p_costo - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00021_costo_checkColumnConstraints(p_costo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_costo LIKE prtb00021.costo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00021_costo_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00020_checkTableConstraints">}
-#+ Check constraints on the "prtb00020" table
-#+
-#+ @param p_data - a row data LIKE prtb00020.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00020_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE prtb00020.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_prtb00020_num_oc_checkColumnConstraints(p_data.num_oc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00020_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00020_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00020_checkTableConstraints
-
-{<BLOCK Name="fct.prtb00020_num_oc_checkColumnConstraints">}
-#+ Check constraints on the "prtb00020.num_oc" column
-#+
-#+ @param p_num_oc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00020_num_oc_checkColumnConstraints(p_num_oc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_oc LIKE prtb00020.num_oc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00020_num_oc_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00020_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "prtb00020.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00020_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE prtb00020.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00020_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00020_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "prtb00020.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00020_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE prtb00020.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00020_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00019_checkTableConstraints">}
-#+ Check constraints on the "prtb00019" table
-#+
-#+ @param p_data - a row data LIKE prtb00019.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00019_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE prtb00019.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_prtb00019_ano_checkColumnConstraints(p_data.ano) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00019_mes_checkColumnConstraints(p_data.mes) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00019_departamento_checkColumnConstraints(p_data.departamento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00019_num_emp_checkColumnConstraints(p_data.num_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00019_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00019_checkTableConstraints
-
-{<BLOCK Name="fct.prtb00019_ano_checkColumnConstraints">}
-#+ Check constraints on the "prtb00019.ano" column
-#+
-#+ @param p_ano - CHAR(4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00019_ano_checkColumnConstraints(p_ano)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ano LIKE prtb00019.ano
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00019_ano_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00019_mes_checkColumnConstraints">}
-#+ Check constraints on the "prtb00019.mes" column
-#+
-#+ @param p_mes - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00019_mes_checkColumnConstraints(p_mes)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mes LIKE prtb00019.mes
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00019_mes_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00019_departamento_checkColumnConstraints">}
-#+ Check constraints on the "prtb00019.departamento" column
-#+
-#+ @param p_departamento - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00019_departamento_checkColumnConstraints(p_departamento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_departamento LIKE prtb00019.departamento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00019_departamento_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00019_num_emp_checkColumnConstraints">}
-#+ Check constraints on the "prtb00019.num_emp" column
-#+
-#+ @param p_num_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00019_num_emp_checkColumnConstraints(p_num_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_emp LIKE prtb00019.num_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00019_num_emp_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00019_cantidad_checkColumnConstraints">}
-#+ Check constraints on the "prtb00019.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00019_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE prtb00019.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00019_cantidad_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00018_checkTableConstraints">}
-#+ Check constraints on the "prtb00018" table
-#+
-#+ @param p_data - a row data LIKE prtb00018.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00018_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE prtb00018.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_prtb00018_num_oc_checkColumnConstraints(p_data.num_oc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00018_detalle_checkColumnConstraints(p_data.detalle) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00018_fecha_entrada_checkColumnConstraints(p_data.fecha_entrada) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00018_fecha_realizacion_checkColumnConstraints(p_data.fecha_realizacion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00018_fecha_inicial_checkColumnConstraints(p_data.fecha_inicial) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00018_fecha_final_checkColumnConstraints(p_data.fecha_final) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00018_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00018_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00018_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00018_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00018_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00018_checkTableConstraints
-
-{<BLOCK Name="fct.prtb00018_num_oc_checkColumnConstraints">}
-#+ Check constraints on the "prtb00018.num_oc" column
-#+
-#+ @param p_num_oc - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00018_num_oc_checkColumnConstraints(p_num_oc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_oc LIKE prtb00018.num_oc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00018_num_oc_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00018_detalle_checkColumnConstraints">}
-#+ Check constraints on the "prtb00018.detalle" column
-#+
-#+ @param p_detalle - CHAR(100) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00018_detalle_checkColumnConstraints(p_detalle)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_detalle LIKE prtb00018.detalle
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00018_detalle_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00018_fecha_entrada_checkColumnConstraints">}
-#+ Check constraints on the "prtb00018.fecha_entrada" column
-#+
-#+ @param p_fecha_entrada - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00018_fecha_entrada_checkColumnConstraints(p_fecha_entrada)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_entrada LIKE prtb00018.fecha_entrada
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00018_fecha_entrada_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00018_fecha_realizacion_checkColumnConstraints">}
-#+ Check constraints on the "prtb00018.fecha_realizacion" column
-#+
-#+ @param p_fecha_realizacion - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00018_fecha_realizacion_checkColumnConstraints(p_fecha_realizacion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_realizacion LIKE prtb00018.fecha_realizacion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00018_fecha_realizacion_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00018_fecha_inicial_checkColumnConstraints">}
-#+ Check constraints on the "prtb00018.fecha_inicial" column
-#+
-#+ @param p_fecha_inicial - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00018_fecha_inicial_checkColumnConstraints(p_fecha_inicial)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_inicial LIKE prtb00018.fecha_inicial
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00018_fecha_inicial_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00018_fecha_final_checkColumnConstraints">}
-#+ Check constraints on the "prtb00018.fecha_final" column
-#+
-#+ @param p_fecha_final - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00018_fecha_final_checkColumnConstraints(p_fecha_final)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_final LIKE prtb00018.fecha_final
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00018_fecha_final_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00018_status_t_checkColumnConstraints">}
-#+ Check constraints on the "prtb00018.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00018_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE prtb00018.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00018_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00018_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "prtb00018.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00018_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE prtb00018.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00018_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00018_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "prtb00018.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00018_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE prtb00018.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00018_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00018_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "prtb00018.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00018_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE prtb00018.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00018_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00018_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "prtb00018.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00018_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE prtb00018.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00018_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00017_checkTableConstraints">}
-#+ Check constraints on the "prtb00017" table
-#+
-#+ @param p_data - a row data LIKE prtb00017.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00017_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE prtb00017.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_prtb00017_num_oc_checkColumnConstraints(p_data.num_oc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00017_fecha_mensaje_checkColumnConstraints(p_data.fecha_mensaje) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00017_usuario_checkColumnConstraints(p_data.usuario) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00017_usuario_lee_checkColumnConstraints(p_data.usuario_lee) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00017_fecha_leido_checkColumnConstraints(p_data.fecha_leido) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00017_tema_checkColumnConstraints(p_data.tema) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00017_mensaje_checkColumnConstraints(p_data.mensaje) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00017_leido_checkColumnConstraints(p_data.leido) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00017_checkTableConstraints
-
-{<BLOCK Name="fct.prtb00017_num_oc_checkColumnConstraints">}
-#+ Check constraints on the "prtb00017.num_oc" column
-#+
-#+ @param p_num_oc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00017_num_oc_checkColumnConstraints(p_num_oc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_oc LIKE prtb00017.num_oc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_num_oc IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- num_oc: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00017_num_oc_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00017_fecha_mensaje_checkColumnConstraints">}
-#+ Check constraints on the "prtb00017.fecha_mensaje" column
-#+
-#+ @param p_fecha_mensaje - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00017_fecha_mensaje_checkColumnConstraints(p_fecha_mensaje)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_mensaje LIKE prtb00017.fecha_mensaje
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_fecha_mensaje IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- fecha_mensaje: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00017_fecha_mensaje_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00017_usuario_checkColumnConstraints">}
-#+ Check constraints on the "prtb00017.usuario" column
-#+
-#+ @param p_usuario - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00017_usuario_checkColumnConstraints(p_usuario)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_usuario LIKE prtb00017.usuario
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00017_usuario_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00017_usuario_lee_checkColumnConstraints">}
-#+ Check constraints on the "prtb00017.usuario_lee" column
-#+
-#+ @param p_usuario_lee - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00017_usuario_lee_checkColumnConstraints(p_usuario_lee)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_usuario_lee LIKE prtb00017.usuario_lee
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00017_usuario_lee_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00017_fecha_leido_checkColumnConstraints">}
-#+ Check constraints on the "prtb00017.fecha_leido" column
-#+
-#+ @param p_fecha_leido - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00017_fecha_leido_checkColumnConstraints(p_fecha_leido)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_leido LIKE prtb00017.fecha_leido
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00017_fecha_leido_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00017_tema_checkColumnConstraints">}
-#+ Check constraints on the "prtb00017.tema" column
-#+
-#+ @param p_tema - CHAR(255) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00017_tema_checkColumnConstraints(p_tema)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tema LIKE prtb00017.tema
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_tema IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- tema: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00017_tema_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00017_mensaje_checkColumnConstraints">}
-#+ Check constraints on the "prtb00017.mensaje" column
-#+
-#+ @param p_mensaje - CHAR(255) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00017_mensaje_checkColumnConstraints(p_mensaje)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mensaje LIKE prtb00017.mensaje
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_mensaje IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- mensaje: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00017_mensaje_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00017_leido_checkColumnConstraints">}
-#+ Check constraints on the "prtb00017.leido" column
-#+
-#+ @param p_leido - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00017_leido_checkColumnConstraints(p_leido)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_leido LIKE prtb00017.leido
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00017_leido_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00016_checkTableConstraints">}
-#+ Check constraints on the "prtb00016" table
-#+
-#+ @param p_data - a row data LIKE prtb00016.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00016_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE prtb00016.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_prtb00016_area_num_checkColumnConstraints(p_data.area_num) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00016_nombre_area_checkColumnConstraints(p_data.nombre_area) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00016_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00016_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00016_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00016_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00016_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00016_checkTableConstraints
-
-{<BLOCK Name="fct.prtb00016_area_num_checkColumnConstraints">}
-#+ Check constraints on the "prtb00016.area_num" column
-#+
-#+ @param p_area_num - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00016_area_num_checkColumnConstraints(p_area_num)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_area_num LIKE prtb00016.area_num
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_area_num IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- area_num: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00016_area_num_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00016_nombre_area_checkColumnConstraints">}
-#+ Check constraints on the "prtb00016.nombre_area" column
-#+
-#+ @param p_nombre_area - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00016_nombre_area_checkColumnConstraints(p_nombre_area)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombre_area LIKE prtb00016.nombre_area
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00016_nombre_area_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00016_status_t_checkColumnConstraints">}
-#+ Check constraints on the "prtb00016.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00016_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE prtb00016.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00016_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00016_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "prtb00016.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00016_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE prtb00016.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00016_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00016_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "prtb00016.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00016_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE prtb00016.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00016_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00016_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "prtb00016.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00016_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE prtb00016.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00016_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00016_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "prtb00016.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00016_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE prtb00016.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00016_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00015_checkTableConstraints">}
-#+ Check constraints on the "prtb00015" table
-#+
-#+ @param p_data - a row data LIKE prtb00015.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00015_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE prtb00015.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_prtb00015_num_oc_checkColumnConstraints(p_data.num_oc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00015_area_checkColumnConstraints(p_data.area) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00015_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00015_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00015_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00015_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00015_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00015_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00015_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00015_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00015_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00015_checkTableConstraints
-
-{<BLOCK Name="fct.prtb00015_num_oc_checkColumnConstraints">}
-#+ Check constraints on the "prtb00015.num_oc" column
-#+
-#+ @param p_num_oc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00015_num_oc_checkColumnConstraints(p_num_oc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_oc LIKE prtb00015.num_oc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00015_num_oc_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00015_area_checkColumnConstraints">}
-#+ Check constraints on the "prtb00015.area" column
-#+
-#+ @param p_area - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00015_area_checkColumnConstraints(p_area)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_area LIKE prtb00015.area
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00015_area_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00015_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "prtb00015.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00015_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE prtb00015.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00015_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00015_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "prtb00015.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00015_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE prtb00015.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00015_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00015_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "prtb00015.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00015_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE prtb00015.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00015_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00015_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "prtb00015.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00015_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE prtb00015.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00015_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00015_cantidad_checkColumnConstraints">}
-#+ Check constraints on the "prtb00015.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00015_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE prtb00015.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00015_cantidad_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00015_fecha_checkColumnConstraints">}
-#+ Check constraints on the "prtb00015.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00015_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE prtb00015.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00015_fecha_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00015_status_t_checkColumnConstraints">}
-#+ Check constraints on the "prtb00015.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00015_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE prtb00015.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00015_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00015_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "prtb00015.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00015_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE prtb00015.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00015_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00015_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "prtb00015.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00015_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE prtb00015.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00015_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00014_checkTableConstraints">}
-#+ Check constraints on the "prtb00014" table
-#+
-#+ @param p_data - a row data LIKE prtb00014.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00014_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE prtb00014.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_prtb00014_num_oc_checkColumnConstraints(p_data.num_oc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00014_observacion_checkColumnConstraints(p_data.observacion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00014_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00014_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00014_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00014_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00014_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00014_checkTableConstraints
-
-{<BLOCK Name="fct.prtb00014_num_oc_checkColumnConstraints">}
-#+ Check constraints on the "prtb00014.num_oc" column
-#+
-#+ @param p_num_oc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00014_num_oc_checkColumnConstraints(p_num_oc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_oc LIKE prtb00014.num_oc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00014_num_oc_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00014_observacion_checkColumnConstraints">}
-#+ Check constraints on the "prtb00014.observacion" column
-#+
-#+ @param p_observacion - CHAR(180) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00014_observacion_checkColumnConstraints(p_observacion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_observacion LIKE prtb00014.observacion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00014_observacion_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00014_status_t_checkColumnConstraints">}
-#+ Check constraints on the "prtb00014.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00014_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE prtb00014.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00014_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00014_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "prtb00014.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00014_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE prtb00014.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00014_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00014_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "prtb00014.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00014_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE prtb00014.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00014_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00014_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "prtb00014.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00014_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE prtb00014.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00014_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00014_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "prtb00014.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00014_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE prtb00014.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00014_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00013_checkTableConstraints">}
-#+ Check constraints on the "prtb00013" table
-#+
-#+ @param p_data - a row data LIKE prtb00013.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00013_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE prtb00013.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_prtb00013_num_oc_checkColumnConstraints(p_data.num_oc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00013_secuencia_checkColumnConstraints(p_data.secuencia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00013_area_checkColumnConstraints(p_data.area) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00013_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00013_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00013_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00013_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00013_altura_zocalo_checkColumnConstraints(p_data.altura_zocalo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00013_terminacion_checkColumnConstraints(p_data.terminacion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00013_bisel_checkColumnConstraints(p_data.bisel) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00013_precio_checkColumnConstraints(p_data.precio) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00013_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00013_descuento_checkColumnConstraints(p_data.descuento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00013_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00013_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00013_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00013_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00013_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00013_fecha_compromiso_checkColumnConstraints(p_data.fecha_compromiso) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00013_estado_produccion_checkColumnConstraints(p_data.estado_produccion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00013_observacion_checkColumnConstraints(p_data.observacion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00013_id_kit_checkColumnConstraints(p_data.id_kit) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00013_checkTableConstraints
-
-{<BLOCK Name="fct.prtb00013_num_oc_checkColumnConstraints">}
-#+ Check constraints on the "prtb00013.num_oc" column
-#+
-#+ @param p_num_oc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00013_num_oc_checkColumnConstraints(p_num_oc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_oc LIKE prtb00013.num_oc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00013_num_oc_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00013_secuencia_checkColumnConstraints">}
-#+ Check constraints on the "prtb00013.secuencia" column
-#+
-#+ @param p_secuencia - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00013_secuencia_checkColumnConstraints(p_secuencia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_secuencia LIKE prtb00013.secuencia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00013_secuencia_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00013_area_checkColumnConstraints">}
-#+ Check constraints on the "prtb00013.area" column
-#+
-#+ @param p_area - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00013_area_checkColumnConstraints(p_area)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_area LIKE prtb00013.area
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00013_area_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00013_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "prtb00013.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00013_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE prtb00013.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00013_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00013_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "prtb00013.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00013_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE prtb00013.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00013_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00013_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "prtb00013.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00013_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE prtb00013.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00013_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00013_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "prtb00013.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00013_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE prtb00013.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00013_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00013_altura_zocalo_checkColumnConstraints">}
-#+ Check constraints on the "prtb00013.altura_zocalo" column
-#+
-#+ @param p_altura_zocalo - DECIMAL(8,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00013_altura_zocalo_checkColumnConstraints(p_altura_zocalo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_altura_zocalo LIKE prtb00013.altura_zocalo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00013_altura_zocalo_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00013_terminacion_checkColumnConstraints">}
-#+ Check constraints on the "prtb00013.terminacion" column
-#+
-#+ @param p_terminacion - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00013_terminacion_checkColumnConstraints(p_terminacion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_terminacion LIKE prtb00013.terminacion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00013_terminacion_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00013_bisel_checkColumnConstraints">}
-#+ Check constraints on the "prtb00013.bisel" column
-#+
-#+ @param p_bisel - CHAR(4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00013_bisel_checkColumnConstraints(p_bisel)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_bisel LIKE prtb00013.bisel
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00013_bisel_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00013_precio_checkColumnConstraints">}
-#+ Check constraints on the "prtb00013.precio" column
-#+
-#+ @param p_precio - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00013_precio_checkColumnConstraints(p_precio)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_precio LIKE prtb00013.precio
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00013_precio_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00013_cantidad_checkColumnConstraints">}
-#+ Check constraints on the "prtb00013.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00013_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE prtb00013.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00013_cantidad_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00013_descuento_checkColumnConstraints">}
-#+ Check constraints on the "prtb00013.descuento" column
-#+
-#+ @param p_descuento - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00013_descuento_checkColumnConstraints(p_descuento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descuento LIKE prtb00013.descuento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00013_descuento_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00013_status_t_checkColumnConstraints">}
-#+ Check constraints on the "prtb00013.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00013_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE prtb00013.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00013_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00013_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "prtb00013.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00013_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE prtb00013.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00013_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00013_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "prtb00013.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00013_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE prtb00013.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00013_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00013_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "prtb00013.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00013_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE prtb00013.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00013_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00013_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "prtb00013.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00013_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE prtb00013.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00013_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00013_fecha_compromiso_checkColumnConstraints">}
-#+ Check constraints on the "prtb00013.fecha_compromiso" column
-#+
-#+ @param p_fecha_compromiso - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00013_fecha_compromiso_checkColumnConstraints(p_fecha_compromiso)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_compromiso LIKE prtb00013.fecha_compromiso
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00013_fecha_compromiso_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00013_estado_produccion_checkColumnConstraints">}
-#+ Check constraints on the "prtb00013.estado_produccion" column
-#+
-#+ @param p_estado_produccion - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00013_estado_produccion_checkColumnConstraints(p_estado_produccion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_estado_produccion LIKE prtb00013.estado_produccion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00013_estado_produccion_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00013_observacion_checkColumnConstraints">}
-#+ Check constraints on the "prtb00013.observacion" column
-#+
-#+ @param p_observacion - CHAR(100) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00013_observacion_checkColumnConstraints(p_observacion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_observacion LIKE prtb00013.observacion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00013_observacion_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00013_id_kit_checkColumnConstraints">}
-#+ Check constraints on the "prtb00013.id_kit" column
-#+
-#+ @param p_id_kit - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00013_id_kit_checkColumnConstraints(p_id_kit)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_id_kit LIKE prtb00013.id_kit
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00013_id_kit_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00012_checkTableConstraints">}
-#+ Check constraints on the "prtb00012" table
-#+
-#+ @param p_data - a row data LIKE prtb00012.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00012_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE prtb00012.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_prtb00012_ventas_checkColumnConstraints(p_data.ventas) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00012_cotizacion_no_checkColumnConstraints(p_data.cotizacion_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00012_num_oc_checkColumnConstraints(p_data.num_oc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00012_fecha_oc_checkColumnConstraints(p_data.fecha_oc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00012_nombre_file_checkColumnConstraints(p_data.nombre_file) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00012_sec_vend_checkColumnConstraints(p_data.sec_vend) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00012_tipo_cliente_checkColumnConstraints(p_data.tipo_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00012_sec_cliente_checkColumnConstraints(p_data.sec_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00012_direccion_checkColumnConstraints(p_data.direccion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00012_telefono_checkColumnConstraints(p_data.telefono) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00012_fax_checkColumnConstraints(p_data.fax) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00012_fecha_entrega_checkColumnConstraints(p_data.fecha_entrega) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00012_cond_pago_checkColumnConstraints(p_data.cond_pago) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00012_cantidad_i_checkColumnConstraints(p_data.cantidad_i) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00012_precio_i_checkColumnConstraints(p_data.precio_i) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00012_cantidad_mo_checkColumnConstraints(p_data.cantidad_mo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00012_precio_mo_checkColumnConstraints(p_data.precio_mo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00012_transporte_checkColumnConstraints(p_data.transporte) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00012_itbis_checkColumnConstraints(p_data.itbis) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00012_ubicacion_checkColumnConstraints(p_data.ubicacion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00012_cerrada_checkColumnConstraints(p_data.cerrada) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00012_fecha_cierre_checkColumnConstraints(p_data.fecha_cierre) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00012_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00012_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00012_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00012_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00012_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00012_observacion_checkColumnConstraints(p_data.observacion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00012_nombre_file2_checkColumnConstraints(p_data.nombre_file2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- CALL smarmotech_dbxconstraints_prtb00012_pk_prtb00012_checkUniqueConstraint(p_forUpdate, p_data.num_oc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00012_checkTableConstraints
-
-{<BLOCK Name="fct.prtb00012_pk_prtb00012_checkUniqueConstraint">}
-#+ Check the primary key uniqueness constraint on the "prtb00012"
-#+
-#+ @param p_key - Primary Key
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00012_pk_prtb00012_checkUniqueConstraint(p_forUpdate, p_key)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_key
- RECORD
- prtb00012_num_oc LIKE prtb00012.num_oc
- END RECORD
- DEFINE l_key
- RECORD
- prtb00012_num_oc LIKE prtb00012.num_oc
- END RECORD
- DEFINE l_where STRING
- DEFINE l_sqlQuery STRING
- DEFINE l_count INTEGER
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- LET l_where = "WHERE prtb00012.num_oc = ? "
-
- let l_sqlQuery = "SELECT COUNT(*), num_oc FROM prtb00012 ", l_where, " GROUP BY num_oc"
-
- PREPARE cur_prtb00012_pk_prtb00012_checkUniqueConstraint FROM l_sqlQuery
- EXECUTE cur_prtb00012_pk_prtb00012_checkUniqueConstraint INTO l_count, l_key.* USING p_key.*
- FREE cur_prtb00012_pk_prtb00012_checkUniqueConstraint
- IF (NOT p_forUpdate AND l_count > 0) OR (p_forUpdate AND l_count > 0 AND p_key.* != l_key.*) THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- num_oc: " || ERROR_BAM_00002) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00012_pk_prtb00012_checkUniqueConstraint
-
-{<BLOCK Name="fct.prtb00012_ventas_checkColumnConstraints">}
-#+ Check constraints on the "prtb00012.ventas" column
-#+
-#+ @param p_ventas - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00012_ventas_checkColumnConstraints(p_ventas)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ventas LIKE prtb00012.ventas
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00012_ventas_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00012_cotizacion_no_checkColumnConstraints">}
-#+ Check constraints on the "prtb00012.cotizacion_no" column
-#+
-#+ @param p_cotizacion_no - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00012_cotizacion_no_checkColumnConstraints(p_cotizacion_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cotizacion_no LIKE prtb00012.cotizacion_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00012_cotizacion_no_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00012_num_oc_checkColumnConstraints">}
-#+ Check constraints on the "prtb00012.num_oc" column
-#+
-#+ @param p_num_oc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00012_num_oc_checkColumnConstraints(p_num_oc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_oc LIKE prtb00012.num_oc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_num_oc IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- num_oc: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00012_num_oc_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00012_fecha_oc_checkColumnConstraints">}
-#+ Check constraints on the "prtb00012.fecha_oc" column
-#+
-#+ @param p_fecha_oc - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00012_fecha_oc_checkColumnConstraints(p_fecha_oc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_oc LIKE prtb00012.fecha_oc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_fecha_oc IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- fecha_oc: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00012_fecha_oc_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00012_nombre_file_checkColumnConstraints">}
-#+ Check constraints on the "prtb00012.nombre_file" column
-#+
-#+ @param p_nombre_file - CHAR(15) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00012_nombre_file_checkColumnConstraints(p_nombre_file)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombre_file LIKE prtb00012.nombre_file
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_nombre_file IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- nombre_file: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00012_nombre_file_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00012_sec_vend_checkColumnConstraints">}
-#+ Check constraints on the "prtb00012.sec_vend" column
-#+
-#+ @param p_sec_vend - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00012_sec_vend_checkColumnConstraints(p_sec_vend)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_vend LIKE prtb00012.sec_vend
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00012_sec_vend_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00012_tipo_cliente_checkColumnConstraints">}
-#+ Check constraints on the "prtb00012.tipo_cliente" column
-#+
-#+ @param p_tipo_cliente - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00012_tipo_cliente_checkColumnConstraints(p_tipo_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_cliente LIKE prtb00012.tipo_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_tipo_cliente IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- tipo_cliente: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00012_tipo_cliente_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00012_sec_cliente_checkColumnConstraints">}
-#+ Check constraints on the "prtb00012.sec_cliente" column
-#+
-#+ @param p_sec_cliente - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00012_sec_cliente_checkColumnConstraints(p_sec_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_cliente LIKE prtb00012.sec_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_sec_cliente IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- sec_cliente: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00012_sec_cliente_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00012_direccion_checkColumnConstraints">}
-#+ Check constraints on the "prtb00012.direccion" column
-#+
-#+ @param p_direccion - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00012_direccion_checkColumnConstraints(p_direccion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_direccion LIKE prtb00012.direccion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00012_direccion_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00012_telefono_checkColumnConstraints">}
-#+ Check constraints on the "prtb00012.telefono" column
-#+
-#+ @param p_telefono - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00012_telefono_checkColumnConstraints(p_telefono)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_telefono LIKE prtb00012.telefono
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00012_telefono_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00012_fax_checkColumnConstraints">}
-#+ Check constraints on the "prtb00012.fax" column
-#+
-#+ @param p_fax - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00012_fax_checkColumnConstraints(p_fax)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fax LIKE prtb00012.fax
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00012_fax_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00012_fecha_entrega_checkColumnConstraints">}
-#+ Check constraints on the "prtb00012.fecha_entrega" column
-#+
-#+ @param p_fecha_entrega - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00012_fecha_entrega_checkColumnConstraints(p_fecha_entrega)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_entrega LIKE prtb00012.fecha_entrega
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00012_fecha_entrega_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00012_cond_pago_checkColumnConstraints">}
-#+ Check constraints on the "prtb00012.cond_pago" column
-#+
-#+ @param p_cond_pago - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00012_cond_pago_checkColumnConstraints(p_cond_pago)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cond_pago LIKE prtb00012.cond_pago
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00012_cond_pago_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00012_cantidad_i_checkColumnConstraints">}
-#+ Check constraints on the "prtb00012.cantidad_i" column
-#+
-#+ @param p_cantidad_i - DECIMAL(8,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00012_cantidad_i_checkColumnConstraints(p_cantidad_i)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad_i LIKE prtb00012.cantidad_i
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00012_cantidad_i_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00012_precio_i_checkColumnConstraints">}
-#+ Check constraints on the "prtb00012.precio_i" column
-#+
-#+ @param p_precio_i - DECIMAL(8,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00012_precio_i_checkColumnConstraints(p_precio_i)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_precio_i LIKE prtb00012.precio_i
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00012_precio_i_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00012_cantidad_mo_checkColumnConstraints">}
-#+ Check constraints on the "prtb00012.cantidad_mo" column
-#+
-#+ @param p_cantidad_mo - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00012_cantidad_mo_checkColumnConstraints(p_cantidad_mo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad_mo LIKE prtb00012.cantidad_mo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00012_cantidad_mo_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00012_precio_mo_checkColumnConstraints">}
-#+ Check constraints on the "prtb00012.precio_mo" column
-#+
-#+ @param p_precio_mo - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00012_precio_mo_checkColumnConstraints(p_precio_mo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_precio_mo LIKE prtb00012.precio_mo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00012_precio_mo_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00012_transporte_checkColumnConstraints">}
-#+ Check constraints on the "prtb00012.transporte" column
-#+
-#+ @param p_transporte - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00012_transporte_checkColumnConstraints(p_transporte)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_transporte LIKE prtb00012.transporte
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00012_transporte_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00012_itbis_checkColumnConstraints">}
-#+ Check constraints on the "prtb00012.itbis" column
-#+
-#+ @param p_itbis - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00012_itbis_checkColumnConstraints(p_itbis)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_itbis LIKE prtb00012.itbis
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00012_itbis_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00012_ubicacion_checkColumnConstraints">}
-#+ Check constraints on the "prtb00012.ubicacion" column
-#+
-#+ @param p_ubicacion - VARCHAR2(170) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00012_ubicacion_checkColumnConstraints(p_ubicacion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ubicacion LIKE prtb00012.ubicacion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00012_ubicacion_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00012_cerrada_checkColumnConstraints">}
-#+ Check constraints on the "prtb00012.cerrada" column
-#+
-#+ @param p_cerrada - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00012_cerrada_checkColumnConstraints(p_cerrada)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cerrada LIKE prtb00012.cerrada
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00012_cerrada_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00012_fecha_cierre_checkColumnConstraints">}
-#+ Check constraints on the "prtb00012.fecha_cierre" column
-#+
-#+ @param p_fecha_cierre - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00012_fecha_cierre_checkColumnConstraints(p_fecha_cierre)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_cierre LIKE prtb00012.fecha_cierre
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00012_fecha_cierre_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00012_status_t_checkColumnConstraints">}
-#+ Check constraints on the "prtb00012.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00012_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE prtb00012.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00012_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00012_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "prtb00012.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00012_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE prtb00012.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00012_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00012_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "prtb00012.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00012_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE prtb00012.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00012_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00012_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "prtb00012.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00012_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE prtb00012.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00012_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00012_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "prtb00012.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00012_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE prtb00012.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00012_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00012_observacion_checkColumnConstraints">}
-#+ Check constraints on the "prtb00012.observacion" column
-#+
-#+ @param p_observacion - CHAR(100) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00012_observacion_checkColumnConstraints(p_observacion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_observacion LIKE prtb00012.observacion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00012_observacion_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00012_nombre_file2_checkColumnConstraints">}
-#+ Check constraints on the "prtb00012.nombre_file2" column
-#+
-#+ @param p_nombre_file2 - CHAR(100) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00012_nombre_file2_checkColumnConstraints(p_nombre_file2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombre_file2 LIKE prtb00012.nombre_file2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00012_nombre_file2_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00011_checkTableConstraints">}
-#+ Check constraints on the "prtb00011" table
-#+
-#+ @param p_data - a row data LIKE prtb00011.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00011_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE prtb00011.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_prtb00011_cotiza_no_checkColumnConstraints(p_data.cotiza_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00011_cot_n_checkColumnConstraints(p_data.cot_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00011_cot_grupo_checkColumnConstraints(p_data.cot_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00011_cot_tipo_checkColumnConstraints(p_data.cot_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00011_cot_sec_checkColumnConstraints(p_data.cot_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00011_precio_checkColumnConstraints(p_data.precio) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00011_porc_desc_checkColumnConstraints(p_data.porc_desc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00011_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00011_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00011_us_month_checkColumnConstraints(p_data.us_month) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00011_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00011_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00011_checkTableConstraints
-
-{<BLOCK Name="fct.prtb00011_cotiza_no_checkColumnConstraints">}
-#+ Check constraints on the "prtb00011.cotiza_no" column
-#+
-#+ @param p_cotiza_no - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00011_cotiza_no_checkColumnConstraints(p_cotiza_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cotiza_no LIKE prtb00011.cotiza_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00011_cotiza_no_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00011_cot_n_checkColumnConstraints">}
-#+ Check constraints on the "prtb00011.cot_n" column
-#+
-#+ @param p_cot_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00011_cot_n_checkColumnConstraints(p_cot_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cot_n LIKE prtb00011.cot_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00011_cot_n_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00011_cot_grupo_checkColumnConstraints">}
-#+ Check constraints on the "prtb00011.cot_grupo" column
-#+
-#+ @param p_cot_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00011_cot_grupo_checkColumnConstraints(p_cot_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cot_grupo LIKE prtb00011.cot_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00011_cot_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00011_cot_tipo_checkColumnConstraints">}
-#+ Check constraints on the "prtb00011.cot_tipo" column
-#+
-#+ @param p_cot_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00011_cot_tipo_checkColumnConstraints(p_cot_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cot_tipo LIKE prtb00011.cot_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00011_cot_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00011_cot_sec_checkColumnConstraints">}
-#+ Check constraints on the "prtb00011.cot_sec" column
-#+
-#+ @param p_cot_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00011_cot_sec_checkColumnConstraints(p_cot_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cot_sec LIKE prtb00011.cot_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00011_cot_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00011_precio_checkColumnConstraints">}
-#+ Check constraints on the "prtb00011.precio" column
-#+
-#+ @param p_precio - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00011_precio_checkColumnConstraints(p_precio)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_precio LIKE prtb00011.precio
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00011_precio_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00011_porc_desc_checkColumnConstraints">}
-#+ Check constraints on the "prtb00011.porc_desc" column
-#+
-#+ @param p_porc_desc - DECIMAL(8,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00011_porc_desc_checkColumnConstraints(p_porc_desc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_porc_desc LIKE prtb00011.porc_desc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00011_porc_desc_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00011_status_t_checkColumnConstraints">}
-#+ Check constraints on the "prtb00011.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00011_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE prtb00011.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00011_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00011_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "prtb00011.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00011_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE prtb00011.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00011_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00011_us_month_checkColumnConstraints">}
-#+ Check constraints on the "prtb00011.us_month" column
-#+
-#+ @param p_us_month - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00011_us_month_checkColumnConstraints(p_us_month)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_month LIKE prtb00011.us_month
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00011_us_month_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00011_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "prtb00011.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00011_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE prtb00011.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00011_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00011_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "prtb00011.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00011_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE prtb00011.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00011_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00010_checkTableConstraints">}
-#+ Check constraints on the "prtb00010" table
-#+
-#+ @param p_data - a row data LIKE prtb00010.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00010_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE prtb00010.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_prtb00010_cotiza_no_checkColumnConstraints(p_data.cotiza_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00010_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00010_tipo_cliente_checkColumnConstraints(p_data.tipo_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00010_sec_cliente_checkColumnConstraints(p_data.sec_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00010_obra_checkColumnConstraints(p_data.obra) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00010_atencion_checkColumnConstraints(p_data.atencion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00010_cond_pago_checkColumnConstraints(p_data.cond_pago) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00010_sec_vent_checkColumnConstraints(p_data.sec_vent) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00010_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00010_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00010_us_month_checkColumnConstraints(p_data.us_month) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00010_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00010_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00010_checkTableConstraints
-
-{<BLOCK Name="fct.prtb00010_cotiza_no_checkColumnConstraints">}
-#+ Check constraints on the "prtb00010.cotiza_no" column
-#+
-#+ @param p_cotiza_no - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00010_cotiza_no_checkColumnConstraints(p_cotiza_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cotiza_no LIKE prtb00010.cotiza_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00010_cotiza_no_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00010_fecha_checkColumnConstraints">}
-#+ Check constraints on the "prtb00010.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00010_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE prtb00010.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00010_fecha_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00010_tipo_cliente_checkColumnConstraints">}
-#+ Check constraints on the "prtb00010.tipo_cliente" column
-#+
-#+ @param p_tipo_cliente - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00010_tipo_cliente_checkColumnConstraints(p_tipo_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_cliente LIKE prtb00010.tipo_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00010_tipo_cliente_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00010_sec_cliente_checkColumnConstraints">}
-#+ Check constraints on the "prtb00010.sec_cliente" column
-#+
-#+ @param p_sec_cliente - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00010_sec_cliente_checkColumnConstraints(p_sec_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_cliente LIKE prtb00010.sec_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00010_sec_cliente_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00010_obra_checkColumnConstraints">}
-#+ Check constraints on the "prtb00010.obra" column
-#+
-#+ @param p_obra - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00010_obra_checkColumnConstraints(p_obra)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_obra LIKE prtb00010.obra
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00010_obra_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00010_atencion_checkColumnConstraints">}
-#+ Check constraints on the "prtb00010.atencion" column
-#+
-#+ @param p_atencion - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00010_atencion_checkColumnConstraints(p_atencion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_atencion LIKE prtb00010.atencion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00010_atencion_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00010_cond_pago_checkColumnConstraints">}
-#+ Check constraints on the "prtb00010.cond_pago" column
-#+
-#+ @param p_cond_pago - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00010_cond_pago_checkColumnConstraints(p_cond_pago)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cond_pago LIKE prtb00010.cond_pago
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00010_cond_pago_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00010_sec_vent_checkColumnConstraints">}
-#+ Check constraints on the "prtb00010.sec_vent" column
-#+
-#+ @param p_sec_vent - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00010_sec_vent_checkColumnConstraints(p_sec_vent)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_vent LIKE prtb00010.sec_vent
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00010_sec_vent_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00010_status_t_checkColumnConstraints">}
-#+ Check constraints on the "prtb00010.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00010_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE prtb00010.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00010_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00010_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "prtb00010.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00010_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE prtb00010.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00010_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00010_us_month_checkColumnConstraints">}
-#+ Check constraints on the "prtb00010.us_month" column
-#+
-#+ @param p_us_month - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00010_us_month_checkColumnConstraints(p_us_month)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_month LIKE prtb00010.us_month
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00010_us_month_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00010_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "prtb00010.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00010_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE prtb00010.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00010_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00010_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "prtb00010.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00010_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE prtb00010.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00010_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00009_checkTableConstraints">}
-#+ Check constraints on the "prtb00009" table
-#+
-#+ @param p_data - a row data LIKE prtb00009.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00009_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE prtb00009.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_prtb00009_num_oc_checkColumnConstraints(p_data.num_oc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00009_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00009_fecha_fabricacion_checkColumnConstraints(p_data.fecha_fabricacion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00009_pendiente_checkColumnConstraints(p_data.pendiente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00009_detalle_checkColumnConstraints(p_data.detalle) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00009_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00009_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00009_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00009_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00009_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00009_checkTableConstraints
-
-{<BLOCK Name="fct.prtb00009_num_oc_checkColumnConstraints">}
-#+ Check constraints on the "prtb00009.num_oc" column
-#+
-#+ @param p_num_oc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00009_num_oc_checkColumnConstraints(p_num_oc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_oc LIKE prtb00009.num_oc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00009_num_oc_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00009_fecha_checkColumnConstraints">}
-#+ Check constraints on the "prtb00009.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00009_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE prtb00009.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00009_fecha_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00009_fecha_fabricacion_checkColumnConstraints">}
-#+ Check constraints on the "prtb00009.fecha_fabricacion" column
-#+
-#+ @param p_fecha_fabricacion - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00009_fecha_fabricacion_checkColumnConstraints(p_fecha_fabricacion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_fabricacion LIKE prtb00009.fecha_fabricacion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00009_fecha_fabricacion_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00009_pendiente_checkColumnConstraints">}
-#+ Check constraints on the "prtb00009.pendiente" column
-#+
-#+ @param p_pendiente - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00009_pendiente_checkColumnConstraints(p_pendiente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_pendiente LIKE prtb00009.pendiente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00009_pendiente_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00009_detalle_checkColumnConstraints">}
-#+ Check constraints on the "prtb00009.detalle" column
-#+
-#+ @param p_detalle - CHAR(300) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00009_detalle_checkColumnConstraints(p_detalle)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_detalle LIKE prtb00009.detalle
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00009_detalle_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00009_status_t_checkColumnConstraints">}
-#+ Check constraints on the "prtb00009.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00009_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE prtb00009.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00009_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00009_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "prtb00009.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00009_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE prtb00009.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00009_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00009_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "prtb00009.fech_crea" column
-#+
-#+ @param p_fech_crea - VARCHAR2(27) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00009_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE prtb00009.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00009_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00009_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "prtb00009.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00009_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE prtb00009.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00009_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00009_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "prtb00009.fech_mod" column
-#+
-#+ @param p_fech_mod - VARCHAR2(27) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00009_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE prtb00009.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00009_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00008_checkTableConstraints">}
-#+ Check constraints on the "prtb00008" table
-#+
-#+ @param p_data - a row data LIKE prtb00008.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00008_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE prtb00008.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_prtb00008_num_oc_checkColumnConstraints(p_data.num_oc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00008_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00008_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00008_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00008_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00008_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00008_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00008_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00008_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00008_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00008_checkTableConstraints
-
-{<BLOCK Name="fct.prtb00008_num_oc_checkColumnConstraints">}
-#+ Check constraints on the "prtb00008.num_oc" column
-#+
-#+ @param p_num_oc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00008_num_oc_checkColumnConstraints(p_num_oc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_oc LIKE prtb00008.num_oc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_num_oc IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- num_oc: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00008_num_oc_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00008_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "prtb00008.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00008_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE prtb00008.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_n IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_n: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00008_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00008_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "prtb00008.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00008_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE prtb00008.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_grupo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_grupo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00008_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00008_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "prtb00008.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00008_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE prtb00008.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_tipo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_tipo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00008_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00008_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "prtb00008.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00008_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE prtb00008.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_sec IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_sec: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00008_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00008_cantidad_checkColumnConstraints">}
-#+ Check constraints on the "prtb00008.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(12,3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00008_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE prtb00008.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00008_cantidad_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00008_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "prtb00008.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00008_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE prtb00008.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00008_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00008_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "prtb00008.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00008_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE prtb00008.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00008_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00008_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "prtb00008.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00008_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE prtb00008.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00008_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00008_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "prtb00008.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00008_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE prtb00008.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00008_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00007_checkTableConstraints">}
-#+ Check constraints on the "prtb00007" table
-#+
-#+ @param p_data - a row data LIKE prtb00007.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00007_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE prtb00007.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_prtb00007_num_oc_checkColumnConstraints(p_data.num_oc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00007_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00007_fecha_termina_checkColumnConstraints(p_data.fecha_termina) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00007_tipo_cliente_checkColumnConstraints(p_data.tipo_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00007_sec_cliente_checkColumnConstraints(p_data.sec_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00007_sec_vend_checkColumnConstraints(p_data.sec_vend) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00007_orden_pedido_checkColumnConstraints(p_data.orden_pedido) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00007_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00007_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00007_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00007_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00007_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00007_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00007_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00007_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00007_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00007_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00007_checkTableConstraints
-
-{<BLOCK Name="fct.prtb00007_num_oc_checkColumnConstraints">}
-#+ Check constraints on the "prtb00007.num_oc" column
-#+
-#+ @param p_num_oc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00007_num_oc_checkColumnConstraints(p_num_oc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_oc LIKE prtb00007.num_oc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_num_oc IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- num_oc: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00007_num_oc_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00007_fecha_checkColumnConstraints">}
-#+ Check constraints on the "prtb00007.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00007_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE prtb00007.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_fecha IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- fecha: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00007_fecha_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00007_fecha_termina_checkColumnConstraints">}
-#+ Check constraints on the "prtb00007.fecha_termina" column
-#+
-#+ @param p_fecha_termina - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00007_fecha_termina_checkColumnConstraints(p_fecha_termina)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_termina LIKE prtb00007.fecha_termina
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00007_fecha_termina_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00007_tipo_cliente_checkColumnConstraints">}
-#+ Check constraints on the "prtb00007.tipo_cliente" column
-#+
-#+ @param p_tipo_cliente - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00007_tipo_cliente_checkColumnConstraints(p_tipo_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_cliente LIKE prtb00007.tipo_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_tipo_cliente IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- tipo_cliente: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00007_tipo_cliente_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00007_sec_cliente_checkColumnConstraints">}
-#+ Check constraints on the "prtb00007.sec_cliente" column
-#+
-#+ @param p_sec_cliente - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00007_sec_cliente_checkColumnConstraints(p_sec_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_cliente LIKE prtb00007.sec_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_sec_cliente IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- sec_cliente: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00007_sec_cliente_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00007_sec_vend_checkColumnConstraints">}
-#+ Check constraints on the "prtb00007.sec_vend" column
-#+
-#+ @param p_sec_vend - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00007_sec_vend_checkColumnConstraints(p_sec_vend)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_vend LIKE prtb00007.sec_vend
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00007_sec_vend_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00007_orden_pedido_checkColumnConstraints">}
-#+ Check constraints on the "prtb00007.orden_pedido" column
-#+
-#+ @param p_orden_pedido - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00007_orden_pedido_checkColumnConstraints(p_orden_pedido)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_orden_pedido LIKE prtb00007.orden_pedido
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00007_orden_pedido_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00007_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "prtb00007.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00007_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE prtb00007.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00007_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00007_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "prtb00007.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00007_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE prtb00007.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00007_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00007_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "prtb00007.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00007_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE prtb00007.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00007_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00007_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "prtb00007.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00007_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE prtb00007.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00007_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00007_cantidad_checkColumnConstraints">}
-#+ Check constraints on the "prtb00007.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(12,3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00007_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE prtb00007.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00007_cantidad_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00007_status_t_checkColumnConstraints">}
-#+ Check constraints on the "prtb00007.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00007_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE prtb00007.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00007_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00007_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "prtb00007.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00007_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE prtb00007.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00007_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00007_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "prtb00007.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00007_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE prtb00007.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00007_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00007_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "prtb00007.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00007_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE prtb00007.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00007_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00007_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "prtb00007.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00007_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE prtb00007.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00007_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00006_checkTableConstraints">}
-#+ Check constraints on the "prtb00006" table
-#+
-#+ @param p_data - a row data LIKE prtb00006.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00006_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE prtb00006.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_prtb00006_cod_prod_checkColumnConstraints(p_data.cod_prod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00006_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00006_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00006_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00006_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00006_fact_conv_checkColumnConstraints(p_data.fact_conv) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00006_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00006_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00006_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00006_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00006_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00006_checkTableConstraints
-
-{<BLOCK Name="fct.prtb00006_cod_prod_checkColumnConstraints">}
-#+ Check constraints on the "prtb00006.cod_prod" column
-#+
-#+ @param p_cod_prod - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00006_cod_prod_checkColumnConstraints(p_cod_prod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_prod LIKE prtb00006.cod_prod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00006_cod_prod_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00006_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "prtb00006.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00006_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE prtb00006.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00006_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00006_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "prtb00006.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00006_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE prtb00006.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00006_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00006_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "prtb00006.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00006_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE prtb00006.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00006_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00006_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "prtb00006.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00006_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE prtb00006.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00006_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00006_fact_conv_checkColumnConstraints">}
-#+ Check constraints on the "prtb00006.fact_conv" column
-#+
-#+ @param p_fact_conv - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00006_fact_conv_checkColumnConstraints(p_fact_conv)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fact_conv LIKE prtb00006.fact_conv
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00006_fact_conv_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00006_status_t_checkColumnConstraints">}
-#+ Check constraints on the "prtb00006.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00006_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE prtb00006.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00006_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00006_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "prtb00006.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00006_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE prtb00006.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00006_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00006_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "prtb00006.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00006_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE prtb00006.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00006_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00006_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "prtb00006.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00006_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE prtb00006.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00006_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00006_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "prtb00006.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00006_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE prtb00006.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00006_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00005_checkTableConstraints">}
-#+ Check constraints on the "prtb00005" table
-#+
-#+ @param p_data - a row data LIKE prtb00005.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00005_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE prtb00005.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_prtb00005_codigo_checkColumnConstraints(p_data.codigo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00005_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00005_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00005_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00005_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00005_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00005_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00005_checkTableConstraints
-
-{<BLOCK Name="fct.prtb00005_codigo_checkColumnConstraints">}
-#+ Check constraints on the "prtb00005.codigo" column
-#+
-#+ @param p_codigo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00005_codigo_checkColumnConstraints(p_codigo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codigo LIKE prtb00005.codigo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00005_codigo_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00005_descripcion_checkColumnConstraints">}
-#+ Check constraints on the "prtb00005.descripcion" column
-#+
-#+ @param p_descripcion - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00005_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE prtb00005.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00005_descripcion_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00005_status_t_checkColumnConstraints">}
-#+ Check constraints on the "prtb00005.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00005_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE prtb00005.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00005_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00005_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "prtb00005.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00005_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE prtb00005.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00005_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00005_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "prtb00005.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00005_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE prtb00005.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00005_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00005_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "prtb00005.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00005_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE prtb00005.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00005_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00005_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "prtb00005.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00005_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE prtb00005.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00005_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00004_checkTableConstraints">}
-#+ Check constraints on the "prtb00004" table
-#+
-#+ @param p_data - a row data LIKE prtb00004.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00004_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE prtb00004.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_prtb00004_tipo_checkColumnConstraints(p_data.tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00004_departamento_checkColumnConstraints(p_data.departamento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00004_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00004_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00004_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00004_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00004_checkTableConstraints
-
-{<BLOCK Name="fct.prtb00004_tipo_checkColumnConstraints">}
-#+ Check constraints on the "prtb00004.tipo" column
-#+
-#+ @param p_tipo - CHAR(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00004_tipo_checkColumnConstraints(p_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo LIKE prtb00004.tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00004_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00004_departamento_checkColumnConstraints">}
-#+ Check constraints on the "prtb00004.departamento" column
-#+
-#+ @param p_departamento - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00004_departamento_checkColumnConstraints(p_departamento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_departamento LIKE prtb00004.departamento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00004_departamento_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00004_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "prtb00004.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00004_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE prtb00004.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00004_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00004_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "prtb00004.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00004_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE prtb00004.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00004_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00004_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "prtb00004.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00004_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE prtb00004.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00004_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00004_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "prtb00004.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00004_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE prtb00004.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00004_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00003_checkTableConstraints">}
-#+ Check constraints on the "prtb00003" table
-#+
-#+ @param p_data - a row data LIKE prtb00003.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00003_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE prtb00003.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_prtb00003_num_semana_checkColumnConstraints(p_data.num_semana) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00003_departamento_checkColumnConstraints(p_data.departamento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00003_num_emp_checkColumnConstraints(p_data.num_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00003_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00003_hn_ind_checkColumnConstraints(p_data.hn_ind) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00003_he_ind_checkColumnConstraints(p_data.he_ind) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00003_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00003_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00003_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00003_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00003_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00003_checkTableConstraints
-
-{<BLOCK Name="fct.prtb00003_num_semana_checkColumnConstraints">}
-#+ Check constraints on the "prtb00003.num_semana" column
-#+
-#+ @param p_num_semana - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00003_num_semana_checkColumnConstraints(p_num_semana)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_semana LIKE prtb00003.num_semana
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00003_num_semana_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00003_departamento_checkColumnConstraints">}
-#+ Check constraints on the "prtb00003.departamento" column
-#+
-#+ @param p_departamento - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00003_departamento_checkColumnConstraints(p_departamento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_departamento LIKE prtb00003.departamento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00003_departamento_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00003_num_emp_checkColumnConstraints">}
-#+ Check constraints on the "prtb00003.num_emp" column
-#+
-#+ @param p_num_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00003_num_emp_checkColumnConstraints(p_num_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_emp LIKE prtb00003.num_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00003_num_emp_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00003_fecha_checkColumnConstraints">}
-#+ Check constraints on the "prtb00003.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00003_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE prtb00003.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00003_fecha_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00003_hn_ind_checkColumnConstraints">}
-#+ Check constraints on the "prtb00003.hn_ind" column
-#+
-#+ @param p_hn_ind - DECIMAL(5,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00003_hn_ind_checkColumnConstraints(p_hn_ind)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_hn_ind LIKE prtb00003.hn_ind
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00003_hn_ind_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00003_he_ind_checkColumnConstraints">}
-#+ Check constraints on the "prtb00003.he_ind" column
-#+
-#+ @param p_he_ind - DECIMAL(5,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00003_he_ind_checkColumnConstraints(p_he_ind)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_he_ind LIKE prtb00003.he_ind
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00003_he_ind_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00003_status_t_checkColumnConstraints">}
-#+ Check constraints on the "prtb00003.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00003_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE prtb00003.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00003_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00003_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "prtb00003.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00003_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE prtb00003.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00003_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00003_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "prtb00003.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00003_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE prtb00003.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00003_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00003_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "prtb00003.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00003_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE prtb00003.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00003_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00003_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "prtb00003.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00003_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE prtb00003.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00003_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00002_checkTableConstraints">}
-#+ Check constraints on the "prtb00002" table
-#+
-#+ @param p_data - a row data LIKE prtb00002.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00002_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE prtb00002.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_prtb00002_num_semana_checkColumnConstraints(p_data.num_semana) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00002_ano_checkColumnConstraints(p_data.ano) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00002_mes_checkColumnConstraints(p_data.mes) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00002_semana_del_checkColumnConstraints(p_data.semana_del) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00002_semana_al_checkColumnConstraints(p_data.semana_al) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00002_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00002_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00002_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00002_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00002_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00002_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00002_checkTableConstraints
-
-{<BLOCK Name="fct.prtb00002_num_semana_checkColumnConstraints">}
-#+ Check constraints on the "prtb00002.num_semana" column
-#+
-#+ @param p_num_semana - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00002_num_semana_checkColumnConstraints(p_num_semana)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_semana LIKE prtb00002.num_semana
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00002_num_semana_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00002_ano_checkColumnConstraints">}
-#+ Check constraints on the "prtb00002.ano" column
-#+
-#+ @param p_ano - CHAR(4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00002_ano_checkColumnConstraints(p_ano)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ano LIKE prtb00002.ano
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00002_ano_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00002_mes_checkColumnConstraints">}
-#+ Check constraints on the "prtb00002.mes" column
-#+
-#+ @param p_mes - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00002_mes_checkColumnConstraints(p_mes)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mes LIKE prtb00002.mes
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00002_mes_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00002_semana_del_checkColumnConstraints">}
-#+ Check constraints on the "prtb00002.semana_del" column
-#+
-#+ @param p_semana_del - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00002_semana_del_checkColumnConstraints(p_semana_del)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_semana_del LIKE prtb00002.semana_del
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00002_semana_del_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00002_semana_al_checkColumnConstraints">}
-#+ Check constraints on the "prtb00002.semana_al" column
-#+
-#+ @param p_semana_al - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00002_semana_al_checkColumnConstraints(p_semana_al)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_semana_al LIKE prtb00002.semana_al
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00002_semana_al_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00002_descripcion_checkColumnConstraints">}
-#+ Check constraints on the "prtb00002.descripcion" column
-#+
-#+ @param p_descripcion - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00002_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE prtb00002.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00002_descripcion_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00002_status_t_checkColumnConstraints">}
-#+ Check constraints on the "prtb00002.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00002_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE prtb00002.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00002_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00002_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "prtb00002.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00002_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE prtb00002.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00002_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00002_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "prtb00002.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00002_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE prtb00002.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00002_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00002_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "prtb00002.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00002_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE prtb00002.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00002_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00002_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "prtb00002.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00002_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE prtb00002.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00002_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00001_checkTableConstraints">}
-#+ Check constraints on the "prtb00001" table
-#+
-#+ @param p_data - a row data LIKE prtb00001.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00001_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE prtb00001.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_prtb00001_ano_checkColumnConstraints(p_data.ano) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00001_mes_checkColumnConstraints(p_data.mes) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00001_tasa_checkColumnConstraints(p_data.tasa) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prtb00001_concepto_checkColumnConstraints(p_data.concepto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00001_checkTableConstraints
-
-{<BLOCK Name="fct.prtb00001_ano_checkColumnConstraints">}
-#+ Check constraints on the "prtb00001.ano" column
-#+
-#+ @param p_ano - CHAR(4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00001_ano_checkColumnConstraints(p_ano)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ano LIKE prtb00001.ano
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00001_ano_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00001_mes_checkColumnConstraints">}
-#+ Check constraints on the "prtb00001.mes" column
-#+
-#+ @param p_mes - CHAR(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00001_mes_checkColumnConstraints(p_mes)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mes LIKE prtb00001.mes
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00001_mes_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00001_tasa_checkColumnConstraints">}
-#+ Check constraints on the "prtb00001.tasa" column
-#+
-#+ @param p_tasa - DECIMAL(8,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00001_tasa_checkColumnConstraints(p_tasa)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tasa LIKE prtb00001.tasa
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00001_tasa_checkColumnConstraints
-
-{<BLOCK Name="fct.prtb00001_concepto_checkColumnConstraints">}
-#+ Check constraints on the "prtb00001.concepto" column
-#+
-#+ @param p_concepto - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prtb00001_concepto_checkColumnConstraints(p_concepto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_concepto LIKE prtb00001.concepto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prtb00001_concepto_checkColumnConstraints
-
-{<BLOCK Name="fct.prordenstatus_checkTableConstraints">}
-#+ Check constraints on the "prordenstatus" table
-#+
-#+ @param p_data - a row data LIKE prordenstatus.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_prordenstatus_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE prordenstatus.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_prordenstatus_fecha_trx_checkColumnConstraints(p_data.fecha_trx) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prordenstatus_num_oc_checkColumnConstraints(p_data.num_oc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prordenstatus_cerrada_checkColumnConstraints(p_data.cerrada) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prordenstatus_fecha_compromiso_checkColumnConstraints(p_data.fecha_compromiso) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prordenstatus_observacion_checkColumnConstraints(p_data.observacion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prordenstatus_usuario_checkColumnConstraints(p_data.usuario) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prordenstatus_checkTableConstraints
-
-{<BLOCK Name="fct.prordenstatus_fecha_trx_checkColumnConstraints">}
-#+ Check constraints on the "prordenstatus.fecha_trx" column
-#+
-#+ @param p_fecha_trx - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prordenstatus_fecha_trx_checkColumnConstraints(p_fecha_trx)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_trx LIKE prordenstatus.fecha_trx
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prordenstatus_fecha_trx_checkColumnConstraints
-
-{<BLOCK Name="fct.prordenstatus_num_oc_checkColumnConstraints">}
-#+ Check constraints on the "prordenstatus.num_oc" column
-#+
-#+ @param p_num_oc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prordenstatus_num_oc_checkColumnConstraints(p_num_oc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_oc LIKE prordenstatus.num_oc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prordenstatus_num_oc_checkColumnConstraints
-
-{<BLOCK Name="fct.prordenstatus_cerrada_checkColumnConstraints">}
-#+ Check constraints on the "prordenstatus.cerrada" column
-#+
-#+ @param p_cerrada - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prordenstatus_cerrada_checkColumnConstraints(p_cerrada)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cerrada LIKE prordenstatus.cerrada
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prordenstatus_cerrada_checkColumnConstraints
-
-{<BLOCK Name="fct.prordenstatus_fecha_compromiso_checkColumnConstraints">}
-#+ Check constraints on the "prordenstatus.fecha_compromiso" column
-#+
-#+ @param p_fecha_compromiso - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prordenstatus_fecha_compromiso_checkColumnConstraints(p_fecha_compromiso)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_compromiso LIKE prordenstatus.fecha_compromiso
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prordenstatus_fecha_compromiso_checkColumnConstraints
-
-{<BLOCK Name="fct.prordenstatus_observacion_checkColumnConstraints">}
-#+ Check constraints on the "prordenstatus.observacion" column
-#+
-#+ @param p_observacion - VARCHAR2(100) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prordenstatus_observacion_checkColumnConstraints(p_observacion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_observacion LIKE prordenstatus.observacion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prordenstatus_observacion_checkColumnConstraints
-
-{<BLOCK Name="fct.prordenstatus_usuario_checkColumnConstraints">}
-#+ Check constraints on the "prordenstatus.usuario" column
-#+
-#+ @param p_usuario - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prordenstatus_usuario_checkColumnConstraints(p_usuario)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_usuario LIKE prordenstatus.usuario
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prordenstatus_usuario_checkColumnConstraints
-
-{<BLOCK Name="fct.prordenlog_checkTableConstraints">}
-#+ Check constraints on the "prordenlog" table
-#+
-#+ @param p_data - a row data LIKE prordenlog.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_prordenlog_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE prordenlog.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_prordenlog_num_oc_checkColumnConstraints(p_data.num_oc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prordenlog_documento_checkColumnConstraints(p_data.documento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prordenlog_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prordenlog_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prordenlog_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prordenlog_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prordenlog_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prordenlog_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prordenlog_cod_mov_checkColumnConstraints(p_data.cod_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prordenlog_cantidad_p_checkColumnConstraints(p_data.cantidad_p) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prordenlog_diferencia_checkColumnConstraints(p_data.diferencia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prordenlog_checkTableConstraints
-
-{<BLOCK Name="fct.prordenlog_num_oc_checkColumnConstraints">}
-#+ Check constraints on the "prordenlog.num_oc" column
-#+
-#+ @param p_num_oc - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prordenlog_num_oc_checkColumnConstraints(p_num_oc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_oc LIKE prordenlog.num_oc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prordenlog_num_oc_checkColumnConstraints
-
-{<BLOCK Name="fct.prordenlog_documento_checkColumnConstraints">}
-#+ Check constraints on the "prordenlog.documento" column
-#+
-#+ @param p_documento - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prordenlog_documento_checkColumnConstraints(p_documento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_documento LIKE prordenlog.documento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prordenlog_documento_checkColumnConstraints
-
-{<BLOCK Name="fct.prordenlog_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "prordenlog.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prordenlog_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE prordenlog.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prordenlog_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.prordenlog_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "prordenlog.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prordenlog_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE prordenlog.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prordenlog_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.prordenlog_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "prordenlog.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prordenlog_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE prordenlog.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prordenlog_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.prordenlog_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "prordenlog.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prordenlog_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE prordenlog.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prordenlog_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.prordenlog_cantidad_checkColumnConstraints">}
-#+ Check constraints on the "prordenlog.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prordenlog_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE prordenlog.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prordenlog_cantidad_checkColumnConstraints
-
-{<BLOCK Name="fct.prordenlog_fecha_checkColumnConstraints">}
-#+ Check constraints on the "prordenlog.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prordenlog_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE prordenlog.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prordenlog_fecha_checkColumnConstraints
-
-{<BLOCK Name="fct.prordenlog_cod_mov_checkColumnConstraints">}
-#+ Check constraints on the "prordenlog.cod_mov" column
-#+
-#+ @param p_cod_mov - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prordenlog_cod_mov_checkColumnConstraints(p_cod_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mov LIKE prordenlog.cod_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prordenlog_cod_mov_checkColumnConstraints
-
-{<BLOCK Name="fct.prordenlog_cantidad_p_checkColumnConstraints">}
-#+ Check constraints on the "prordenlog.cantidad_p" column
-#+
-#+ @param p_cantidad_p - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prordenlog_cantidad_p_checkColumnConstraints(p_cantidad_p)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad_p LIKE prordenlog.cantidad_p
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prordenlog_cantidad_p_checkColumnConstraints
-
-{<BLOCK Name="fct.prordenlog_diferencia_checkColumnConstraints">}
-#+ Check constraints on the "prordenlog.diferencia" column
-#+
-#+ @param p_diferencia - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prordenlog_diferencia_checkColumnConstraints(p_diferencia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_diferencia LIKE prordenlog.diferencia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prordenlog_diferencia_checkColumnConstraints
-
-{<BLOCK Name="fct.product_checkTableConstraints">}
-#+ Check constraints on the "product" table
-#+
-#+ @param p_data - a row data LIKE product.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_product_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE product.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_product_productid_checkColumnConstraints(p_data.productid) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_product_catid_checkColumnConstraints(p_data.catid) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_product_prodname_checkColumnConstraints(p_data.prodname) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_product_proddesc_checkColumnConstraints(p_data.proddesc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_product_prodpic_checkColumnConstraints(p_data.prodpic) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.product_checkTableConstraints
-
-{<BLOCK Name="fct.product_productid_checkColumnConstraints">}
-#+ Check constraints on the "product.productid" column
-#+
-#+ @param p_productid - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_product_productid_checkColumnConstraints(p_productid)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_productid LIKE product.productid
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_productid IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- productid: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.product_productid_checkColumnConstraints
-
-{<BLOCK Name="fct.product_catid_checkColumnConstraints">}
-#+ Check constraints on the "product.catid" column
-#+
-#+ @param p_catid - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_product_catid_checkColumnConstraints(p_catid)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_catid LIKE product.catid
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_catid IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- catid: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.product_catid_checkColumnConstraints
-
-{<BLOCK Name="fct.product_prodname_checkColumnConstraints">}
-#+ Check constraints on the "product.prodname" column
-#+
-#+ @param p_prodname - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_product_prodname_checkColumnConstraints(p_prodname)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_prodname LIKE product.prodname
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.product_prodname_checkColumnConstraints
-
-{<BLOCK Name="fct.product_proddesc_checkColumnConstraints">}
-#+ Check constraints on the "product.proddesc" column
-#+
-#+ @param p_proddesc - CHAR(255) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_product_proddesc_checkColumnConstraints(p_proddesc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_proddesc LIKE product.proddesc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.product_proddesc_checkColumnConstraints
-
-{<BLOCK Name="fct.product_prodpic_checkColumnConstraints">}
-#+ Check constraints on the "product.prodpic" column
-#+
-#+ @param p_prodpic - CHAR(255) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_product_prodpic_checkColumnConstraints(p_prodpic)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_prodpic LIKE product.prodpic
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.product_prodpic_checkColumnConstraints
-
-{<BLOCK Name="fct.preciosc_checkTableConstraints">}
-#+ Check constraints on the "preciosc" table
-#+
-#+ @param p_data - a row data LIKE preciosc.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_preciosc_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE preciosc.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_preciosc_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_preciosc_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_preciosc_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_preciosc_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_preciosc_precio_checkColumnConstraints(p_data.precio) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.preciosc_checkTableConstraints
-
-{<BLOCK Name="fct.preciosc_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "preciosc.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_preciosc_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE preciosc.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.preciosc_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.preciosc_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "preciosc.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_preciosc_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE preciosc.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.preciosc_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.preciosc_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "preciosc.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_preciosc_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE preciosc.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.preciosc_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.preciosc_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "preciosc.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_preciosc_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE preciosc.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.preciosc_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.preciosc_precio_checkColumnConstraints">}
-#+ Check constraints on the "preciosc.precio" column
-#+
-#+ @param p_precio - DECIMAL(18,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_preciosc_precio_checkColumnConstraints(p_precio)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_precio LIKE preciosc.precio
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.preciosc_precio_checkColumnConstraints
-
-{<BLOCK Name="fct.precios_checkTableConstraints">}
-#+ Check constraints on the "precios" table
-#+
-#+ @param p_data - a row data LIKE precios.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_precios_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE precios.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_precios_ventas_checkColumnConstraints(p_data.ventas) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_precios_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_precios_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_precios_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_precios_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_precios_precios_checkColumnConstraints(p_data.precios) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_precios_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_precios_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.precios_checkTableConstraints
-
-{<BLOCK Name="fct.precios_ventas_checkColumnConstraints">}
-#+ Check constraints on the "precios.ventas" column
-#+
-#+ @param p_ventas - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_precios_ventas_checkColumnConstraints(p_ventas)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ventas LIKE precios.ventas
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.precios_ventas_checkColumnConstraints
-
-{<BLOCK Name="fct.precios_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "precios.cod_n" column
-#+
-#+ @param p_cod_n - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_precios_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE precios.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.precios_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.precios_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "precios.cod_grupo" column
-#+
-#+ @param p_cod_grupo - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_precios_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE precios.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.precios_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.precios_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "precios.cod_tipo" column
-#+
-#+ @param p_cod_tipo - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_precios_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE precios.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.precios_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.precios_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "precios.cod_sec" column
-#+
-#+ @param p_cod_sec - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_precios_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE precios.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.precios_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.precios_precios_checkColumnConstraints">}
-#+ Check constraints on the "precios.precios" column
-#+
-#+ @param p_precios - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_precios_precios_checkColumnConstraints(p_precios)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_precios LIKE precios.precios
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.precios_precios_checkColumnConstraints
-
-{<BLOCK Name="fct.precios_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "precios.us_crea" column
-#+
-#+ @param p_us_crea - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_precios_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE precios.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.precios_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.precios_descripcion_checkColumnConstraints">}
-#+ Check constraints on the "precios.descripcion" column
-#+
-#+ @param p_descripcion - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_precios_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE precios.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.precios_descripcion_checkColumnConstraints
-
-{<BLOCK Name="fct.prdtable_checkTableConstraints">}
-#+ Check constraints on the "prdtable" table
-#+
-#+ @param p_data - a row data LIKE prdtable.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_prdtable_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE prdtable.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_prdtable_ano_checkColumnConstraints(p_data.ano) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prdtable_mes_checkColumnConstraints(p_data.mes) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prdtable_fecha_inicio_checkColumnConstraints(p_data.fecha_inicio) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prdtable_fecha_corte_checkColumnConstraints(p_data.fecha_corte) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prdtable_dias_habiles_checkColumnConstraints(p_data.dias_habiles) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prdtable_dias_gracia_checkColumnConstraints(p_data.dias_gracia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prdtable_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prdtable_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prdtable_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_prdtable_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prdtable_checkTableConstraints
-
-{<BLOCK Name="fct.prdtable_ano_checkColumnConstraints">}
-#+ Check constraints on the "prdtable.ano" column
-#+
-#+ @param p_ano - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prdtable_ano_checkColumnConstraints(p_ano)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ano LIKE prdtable.ano
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prdtable_ano_checkColumnConstraints
-
-{<BLOCK Name="fct.prdtable_mes_checkColumnConstraints">}
-#+ Check constraints on the "prdtable.mes" column
-#+
-#+ @param p_mes - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prdtable_mes_checkColumnConstraints(p_mes)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mes LIKE prdtable.mes
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prdtable_mes_checkColumnConstraints
-
-{<BLOCK Name="fct.prdtable_fecha_inicio_checkColumnConstraints">}
-#+ Check constraints on the "prdtable.fecha_inicio" column
-#+
-#+ @param p_fecha_inicio - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prdtable_fecha_inicio_checkColumnConstraints(p_fecha_inicio)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_inicio LIKE prdtable.fecha_inicio
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prdtable_fecha_inicio_checkColumnConstraints
-
-{<BLOCK Name="fct.prdtable_fecha_corte_checkColumnConstraints">}
-#+ Check constraints on the "prdtable.fecha_corte" column
-#+
-#+ @param p_fecha_corte - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prdtable_fecha_corte_checkColumnConstraints(p_fecha_corte)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_corte LIKE prdtable.fecha_corte
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prdtable_fecha_corte_checkColumnConstraints
-
-{<BLOCK Name="fct.prdtable_dias_habiles_checkColumnConstraints">}
-#+ Check constraints on the "prdtable.dias_habiles" column
-#+
-#+ @param p_dias_habiles - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prdtable_dias_habiles_checkColumnConstraints(p_dias_habiles)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_dias_habiles LIKE prdtable.dias_habiles
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prdtable_dias_habiles_checkColumnConstraints
-
-{<BLOCK Name="fct.prdtable_dias_gracia_checkColumnConstraints">}
-#+ Check constraints on the "prdtable.dias_gracia" column
-#+
-#+ @param p_dias_gracia - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prdtable_dias_gracia_checkColumnConstraints(p_dias_gracia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_dias_gracia LIKE prdtable.dias_gracia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prdtable_dias_gracia_checkColumnConstraints
-
-{<BLOCK Name="fct.prdtable_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "prdtable.us_crea" column
-#+
-#+ @param p_us_crea - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prdtable_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE prdtable.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prdtable_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.prdtable_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "prdtable.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prdtable_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE prdtable.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prdtable_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.prdtable_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "prdtable.us_mod" column
-#+
-#+ @param p_us_mod - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prdtable_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE prdtable.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prdtable_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.prdtable_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "prdtable.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_prdtable_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE prdtable.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.prdtable_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.permisos_checkTableConstraints">}
-#+ Check constraints on the "permisos" table
-#+
-#+ @param p_data - a row data LIKE permisos.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_permisos_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE permisos.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_permisos_cod_perfil_checkColumnConstraints(p_data.cod_perfil) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_permisos_column_1_checkColumnConstraints(p_data.column_1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_permisos_column_2_checkColumnConstraints(p_data.column_2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_permisos_column_3_checkColumnConstraints(p_data.column_3) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.permisos_checkTableConstraints
-
-{<BLOCK Name="fct.permisos_cod_perfil_checkColumnConstraints">}
-#+ Check constraints on the "permisos.cod_perfil" column
-#+
-#+ @param p_cod_perfil - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_permisos_cod_perfil_checkColumnConstraints(p_cod_perfil)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_perfil LIKE permisos.cod_perfil
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.permisos_cod_perfil_checkColumnConstraints
-
-{<BLOCK Name="fct.permisos_column_1_checkColumnConstraints">}
-#+ Check constraints on the "permisos.column_1" column
-#+
-#+ @param p_column_1 - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_permisos_column_1_checkColumnConstraints(p_column_1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_column_1 LIKE permisos.column_1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.permisos_column_1_checkColumnConstraints
-
-{<BLOCK Name="fct.permisos_column_2_checkColumnConstraints">}
-#+ Check constraints on the "permisos.column_2" column
-#+
-#+ @param p_column_2 - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_permisos_column_2_checkColumnConstraints(p_column_2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_column_2 LIKE permisos.column_2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.permisos_column_2_checkColumnConstraints
-
-{<BLOCK Name="fct.permisos_column_3_checkColumnConstraints">}
-#+ Check constraints on the "permisos.column_3" column
-#+
-#+ @param p_column_3 - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_permisos_column_3_checkColumnConstraints(p_column_3)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_column_3 LIKE permisos.column_3
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.permisos_column_3_checkColumnConstraints
-
-{<BLOCK Name="fct.pda5_checkTableConstraints">}
-#+ Check constraints on the "pda5" table
-#+
-#+ @param p_data - a row data LIKE pda5.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_pda5_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE pda5.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_pda5_idtrx_checkColumnConstraints(p_data.idtrx) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_pda5_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_pda5_bodega_checkColumnConstraints(p_data.bodega) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_pda5_cod_seccion_checkColumnConstraints(p_data.cod_seccion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_pda5_cod_tramo_checkColumnConstraints(p_data.cod_tramo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_pda5_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_pda5_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_pda5_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_pda5_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_pda5_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_pda5_balance_checkColumnConstraints(p_data.balance) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_pda5_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_pda5_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_pda5_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_pda5_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_pda5_lado_1_checkColumnConstraints(p_data.lado_1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_pda5_lado_2_checkColumnConstraints(p_data.lado_2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_pda5_lado_3_checkColumnConstraints(p_data.lado_3) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.pda5_checkTableConstraints
-
-{<BLOCK Name="fct.pda5_idtrx_checkColumnConstraints">}
-#+ Check constraints on the "pda5.idtrx" column
-#+
-#+ @param p_idtrx - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_pda5_idtrx_checkColumnConstraints(p_idtrx)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_idtrx LIKE pda5.idtrx
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.pda5_idtrx_checkColumnConstraints
-
-{<BLOCK Name="fct.pda5_fecha_checkColumnConstraints">}
-#+ Check constraints on the "pda5.fecha" column
-#+
-#+ @param p_fecha - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_pda5_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE pda5.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.pda5_fecha_checkColumnConstraints
-
-{<BLOCK Name="fct.pda5_bodega_checkColumnConstraints">}
-#+ Check constraints on the "pda5.bodega" column
-#+
-#+ @param p_bodega - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_pda5_bodega_checkColumnConstraints(p_bodega)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_bodega LIKE pda5.bodega
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.pda5_bodega_checkColumnConstraints
-
-{<BLOCK Name="fct.pda5_cod_seccion_checkColumnConstraints">}
-#+ Check constraints on the "pda5.cod_seccion" column
-#+
-#+ @param p_cod_seccion - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_pda5_cod_seccion_checkColumnConstraints(p_cod_seccion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_seccion LIKE pda5.cod_seccion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.pda5_cod_seccion_checkColumnConstraints
-
-{<BLOCK Name="fct.pda5_cod_tramo_checkColumnConstraints">}
-#+ Check constraints on the "pda5.cod_tramo" column
-#+
-#+ @param p_cod_tramo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_pda5_cod_tramo_checkColumnConstraints(p_cod_tramo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tramo LIKE pda5.cod_tramo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.pda5_cod_tramo_checkColumnConstraints
-
-{<BLOCK Name="fct.pda5_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "pda5.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_pda5_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE pda5.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.pda5_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.pda5_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "pda5.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_pda5_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE pda5.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.pda5_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.pda5_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "pda5.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_pda5_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE pda5.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.pda5_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.pda5_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "pda5.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_pda5_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE pda5.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.pda5_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.pda5_cantidad_checkColumnConstraints">}
-#+ Check constraints on the "pda5.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_pda5_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE pda5.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.pda5_cantidad_checkColumnConstraints
-
-{<BLOCK Name="fct.pda5_balance_checkColumnConstraints">}
-#+ Check constraints on the "pda5.balance" column
-#+
-#+ @param p_balance - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_pda5_balance_checkColumnConstraints(p_balance)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_balance LIKE pda5.balance
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.pda5_balance_checkColumnConstraints
-
-{<BLOCK Name="fct.pda5_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "pda5.us_crea" column
-#+
-#+ @param p_us_crea - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_pda5_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE pda5.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.pda5_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.pda5_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "pda5.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_pda5_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE pda5.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.pda5_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.pda5_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "pda5.us_mod" column
-#+
-#+ @param p_us_mod - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_pda5_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE pda5.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.pda5_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.pda5_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "pda5.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_pda5_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE pda5.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.pda5_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.pda5_lado_1_checkColumnConstraints">}
-#+ Check constraints on the "pda5.lado_1" column
-#+
-#+ @param p_lado_1 - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_pda5_lado_1_checkColumnConstraints(p_lado_1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_lado_1 LIKE pda5.lado_1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.pda5_lado_1_checkColumnConstraints
-
-{<BLOCK Name="fct.pda5_lado_2_checkColumnConstraints">}
-#+ Check constraints on the "pda5.lado_2" column
-#+
-#+ @param p_lado_2 - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_pda5_lado_2_checkColumnConstraints(p_lado_2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_lado_2 LIKE pda5.lado_2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.pda5_lado_2_checkColumnConstraints
-
-{<BLOCK Name="fct.pda5_lado_3_checkColumnConstraints">}
-#+ Check constraints on the "pda5.lado_3" column
-#+
-#+ @param p_lado_3 - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_pda5_lado_3_checkColumnConstraints(p_lado_3)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_lado_3 LIKE pda5.lado_3
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.pda5_lado_3_checkColumnConstraints
-
-{<BLOCK Name="fct.orderstatus_checkTableConstraints">}
-#+ Check constraints on the "orderstatus" table
-#+
-#+ @param p_data - a row data LIKE orderstatus.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_orderstatus_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE orderstatus.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_orderstatus_orderid_checkColumnConstraints(p_data.orderid) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_orderstatus_linenum_checkColumnConstraints(p_data.linenum) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_orderstatus_mdate_checkColumnConstraints(p_data.mdate) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_orderstatus_status_checkColumnConstraints(p_data.status) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.orderstatus_checkTableConstraints
-
-{<BLOCK Name="fct.orderstatus_orderid_checkColumnConstraints">}
-#+ Check constraints on the "orderstatus.orderid" column
-#+
-#+ @param p_orderid - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_orderstatus_orderid_checkColumnConstraints(p_orderid)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_orderid LIKE orderstatus.orderid
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_orderid IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- orderid: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.orderstatus_orderid_checkColumnConstraints
-
-{<BLOCK Name="fct.orderstatus_linenum_checkColumnConstraints">}
-#+ Check constraints on the "orderstatus.linenum" column
-#+
-#+ @param p_linenum - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_orderstatus_linenum_checkColumnConstraints(p_linenum)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_linenum LIKE orderstatus.linenum
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_linenum IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- linenum: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.orderstatus_linenum_checkColumnConstraints
-
-{<BLOCK Name="fct.orderstatus_mdate_checkColumnConstraints">}
-#+ Check constraints on the "orderstatus.mdate" column
-#+
-#+ @param p_mdate - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_orderstatus_mdate_checkColumnConstraints(p_mdate)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mdate LIKE orderstatus.mdate
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_mdate IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- mdate: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.orderstatus_mdate_checkColumnConstraints
-
-{<BLOCK Name="fct.orderstatus_status_checkColumnConstraints">}
-#+ Check constraints on the "orderstatus.status" column
-#+
-#+ @param p_status - CHAR(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_orderstatus_status_checkColumnConstraints(p_status)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status LIKE orderstatus.status
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_status IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- status: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.orderstatus_status_checkColumnConstraints
-
-{<BLOCK Name="fct.orders_checkTableConstraints">}
-#+ Check constraints on the "orders" table
-#+
-#+ @param p_data - a row data LIKE orders.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_orders_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE orders.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_orders_orderid_checkColumnConstraints(p_data.orderid) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_orders_userid_checkColumnConstraints(p_data.userid) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_orders_orderdate_checkColumnConstraints(p_data.orderdate) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_orders_shipfirstname_checkColumnConstraints(p_data.shipfirstname) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_orders_shiplastname_checkColumnConstraints(p_data.shiplastname) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_orders_shipaddr1_checkColumnConstraints(p_data.shipaddr1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_orders_shipaddr2_checkColumnConstraints(p_data.shipaddr2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_orders_shipcity_checkColumnConstraints(p_data.shipcity) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_orders_shipstate_checkColumnConstraints(p_data.shipstate) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_orders_shipzip_checkColumnConstraints(p_data.shipzip) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_orders_shipcountry_checkColumnConstraints(p_data.shipcountry) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_orders_billfirstname_checkColumnConstraints(p_data.billfirstname) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_orders_billlastname_checkColumnConstraints(p_data.billlastname) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_orders_billaddr1_checkColumnConstraints(p_data.billaddr1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_orders_billaddr2_checkColumnConstraints(p_data.billaddr2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_orders_billcity_checkColumnConstraints(p_data.billcity) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_orders_billstate_checkColumnConstraints(p_data.billstate) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_orders_billzip_checkColumnConstraints(p_data.billzip) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_orders_billcountry_checkColumnConstraints(p_data.billcountry) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_orders_totalprice_checkColumnConstraints(p_data.totalprice) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_orders_creditcard_checkColumnConstraints(p_data.creditcard) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_orders_exprdate_checkColumnConstraints(p_data.exprdate) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_orders_cardtype_checkColumnConstraints(p_data.cardtype) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_orders_sourceapp_checkColumnConstraints(p_data.sourceapp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.orders_checkTableConstraints
-
-{<BLOCK Name="fct.orders_orderid_checkColumnConstraints">}
-#+ Check constraints on the "orders.orderid" column
-#+
-#+ @param p_orderid - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_orders_orderid_checkColumnConstraints(p_orderid)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_orderid LIKE orders.orderid
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_orderid IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- orderid: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.orders_orderid_checkColumnConstraints
-
-{<BLOCK Name="fct.orders_userid_checkColumnConstraints">}
-#+ Check constraints on the "orders.userid" column
-#+
-#+ @param p_userid - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_orders_userid_checkColumnConstraints(p_userid)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_userid LIKE orders.userid
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_userid IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- userid: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.orders_userid_checkColumnConstraints
-
-{<BLOCK Name="fct.orders_orderdate_checkColumnConstraints">}
-#+ Check constraints on the "orders.orderdate" column
-#+
-#+ @param p_orderdate - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_orders_orderdate_checkColumnConstraints(p_orderdate)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_orderdate LIKE orders.orderdate
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_orderdate IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- orderdate: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.orders_orderdate_checkColumnConstraints
-
-{<BLOCK Name="fct.orders_shipfirstname_checkColumnConstraints">}
-#+ Check constraints on the "orders.shipfirstname" column
-#+
-#+ @param p_shipfirstname - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_orders_shipfirstname_checkColumnConstraints(p_shipfirstname)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_shipfirstname LIKE orders.shipfirstname
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_shipfirstname IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- shipfirstname: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.orders_shipfirstname_checkColumnConstraints
-
-{<BLOCK Name="fct.orders_shiplastname_checkColumnConstraints">}
-#+ Check constraints on the "orders.shiplastname" column
-#+
-#+ @param p_shiplastname - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_orders_shiplastname_checkColumnConstraints(p_shiplastname)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_shiplastname LIKE orders.shiplastname
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_shiplastname IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- shiplastname: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.orders_shiplastname_checkColumnConstraints
-
-{<BLOCK Name="fct.orders_shipaddr1_checkColumnConstraints">}
-#+ Check constraints on the "orders.shipaddr1" column
-#+
-#+ @param p_shipaddr1 - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_orders_shipaddr1_checkColumnConstraints(p_shipaddr1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_shipaddr1 LIKE orders.shipaddr1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_shipaddr1 IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- shipaddr1: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.orders_shipaddr1_checkColumnConstraints
-
-{<BLOCK Name="fct.orders_shipaddr2_checkColumnConstraints">}
-#+ Check constraints on the "orders.shipaddr2" column
-#+
-#+ @param p_shipaddr2 - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_orders_shipaddr2_checkColumnConstraints(p_shipaddr2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_shipaddr2 LIKE orders.shipaddr2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.orders_shipaddr2_checkColumnConstraints
-
-{<BLOCK Name="fct.orders_shipcity_checkColumnConstraints">}
-#+ Check constraints on the "orders.shipcity" column
-#+
-#+ @param p_shipcity - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_orders_shipcity_checkColumnConstraints(p_shipcity)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_shipcity LIKE orders.shipcity
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_shipcity IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- shipcity: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.orders_shipcity_checkColumnConstraints
-
-{<BLOCK Name="fct.orders_shipstate_checkColumnConstraints">}
-#+ Check constraints on the "orders.shipstate" column
-#+
-#+ @param p_shipstate - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_orders_shipstate_checkColumnConstraints(p_shipstate)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_shipstate LIKE orders.shipstate
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.orders_shipstate_checkColumnConstraints
-
-{<BLOCK Name="fct.orders_shipzip_checkColumnConstraints">}
-#+ Check constraints on the "orders.shipzip" column
-#+
-#+ @param p_shipzip - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_orders_shipzip_checkColumnConstraints(p_shipzip)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_shipzip LIKE orders.shipzip
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_shipzip IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- shipzip: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.orders_shipzip_checkColumnConstraints
-
-{<BLOCK Name="fct.orders_shipcountry_checkColumnConstraints">}
-#+ Check constraints on the "orders.shipcountry" column
-#+
-#+ @param p_shipcountry - CHAR(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_orders_shipcountry_checkColumnConstraints(p_shipcountry)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_shipcountry LIKE orders.shipcountry
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_shipcountry IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- shipcountry: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.orders_shipcountry_checkColumnConstraints
-
-{<BLOCK Name="fct.orders_billfirstname_checkColumnConstraints">}
-#+ Check constraints on the "orders.billfirstname" column
-#+
-#+ @param p_billfirstname - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_orders_billfirstname_checkColumnConstraints(p_billfirstname)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_billfirstname LIKE orders.billfirstname
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_billfirstname IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- billfirstname: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.orders_billfirstname_checkColumnConstraints
-
-{<BLOCK Name="fct.orders_billlastname_checkColumnConstraints">}
-#+ Check constraints on the "orders.billlastname" column
-#+
-#+ @param p_billlastname - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_orders_billlastname_checkColumnConstraints(p_billlastname)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_billlastname LIKE orders.billlastname
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_billlastname IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- billlastname: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.orders_billlastname_checkColumnConstraints
-
-{<BLOCK Name="fct.orders_billaddr1_checkColumnConstraints">}
-#+ Check constraints on the "orders.billaddr1" column
-#+
-#+ @param p_billaddr1 - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_orders_billaddr1_checkColumnConstraints(p_billaddr1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_billaddr1 LIKE orders.billaddr1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_billaddr1 IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- billaddr1: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.orders_billaddr1_checkColumnConstraints
-
-{<BLOCK Name="fct.orders_billaddr2_checkColumnConstraints">}
-#+ Check constraints on the "orders.billaddr2" column
-#+
-#+ @param p_billaddr2 - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_orders_billaddr2_checkColumnConstraints(p_billaddr2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_billaddr2 LIKE orders.billaddr2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.orders_billaddr2_checkColumnConstraints
-
-{<BLOCK Name="fct.orders_billcity_checkColumnConstraints">}
-#+ Check constraints on the "orders.billcity" column
-#+
-#+ @param p_billcity - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_orders_billcity_checkColumnConstraints(p_billcity)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_billcity LIKE orders.billcity
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_billcity IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- billcity: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.orders_billcity_checkColumnConstraints
-
-{<BLOCK Name="fct.orders_billstate_checkColumnConstraints">}
-#+ Check constraints on the "orders.billstate" column
-#+
-#+ @param p_billstate - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_orders_billstate_checkColumnConstraints(p_billstate)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_billstate LIKE orders.billstate
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.orders_billstate_checkColumnConstraints
-
-{<BLOCK Name="fct.orders_billzip_checkColumnConstraints">}
-#+ Check constraints on the "orders.billzip" column
-#+
-#+ @param p_billzip - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_orders_billzip_checkColumnConstraints(p_billzip)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_billzip LIKE orders.billzip
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_billzip IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- billzip: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.orders_billzip_checkColumnConstraints
-
-{<BLOCK Name="fct.orders_billcountry_checkColumnConstraints">}
-#+ Check constraints on the "orders.billcountry" column
-#+
-#+ @param p_billcountry - CHAR(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_orders_billcountry_checkColumnConstraints(p_billcountry)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_billcountry LIKE orders.billcountry
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_billcountry IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- billcountry: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.orders_billcountry_checkColumnConstraints
-
-{<BLOCK Name="fct.orders_totalprice_checkColumnConstraints">}
-#+ Check constraints on the "orders.totalprice" column
-#+
-#+ @param p_totalprice - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_orders_totalprice_checkColumnConstraints(p_totalprice)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_totalprice LIKE orders.totalprice
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_totalprice IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- totalprice: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.orders_totalprice_checkColumnConstraints
-
-{<BLOCK Name="fct.orders_creditcard_checkColumnConstraints">}
-#+ Check constraints on the "orders.creditcard" column
-#+
-#+ @param p_creditcard - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_orders_creditcard_checkColumnConstraints(p_creditcard)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_creditcard LIKE orders.creditcard
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.orders_creditcard_checkColumnConstraints
-
-{<BLOCK Name="fct.orders_exprdate_checkColumnConstraints">}
-#+ Check constraints on the "orders.exprdate" column
-#+
-#+ @param p_exprdate - CHAR(7) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_orders_exprdate_checkColumnConstraints(p_exprdate)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_exprdate LIKE orders.exprdate
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.orders_exprdate_checkColumnConstraints
-
-{<BLOCK Name="fct.orders_cardtype_checkColumnConstraints">}
-#+ Check constraints on the "orders.cardtype" column
-#+
-#+ @param p_cardtype - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_orders_cardtype_checkColumnConstraints(p_cardtype)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cardtype LIKE orders.cardtype
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.orders_cardtype_checkColumnConstraints
-
-{<BLOCK Name="fct.orders_sourceapp_checkColumnConstraints">}
-#+ Check constraints on the "orders.sourceapp" column
-#+
-#+ @param p_sourceapp - CHAR(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_orders_sourceapp_checkColumnConstraints(p_sourceapp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sourceapp LIKE orders.sourceapp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_sourceapp IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- sourceapp: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.orders_sourceapp_checkColumnConstraints
-
-{<BLOCK Name="fct.ntb00005_checkTableConstraints">}
-#+ Check constraints on the "ntb00005" table
-#+
-#+ @param p_data - a row data LIKE ntb00005.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_ntb00005_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE ntb00005.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_ntb00005_cod_mov_checkColumnConstraints(p_data.cod_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ntb00005_descrip_mov_checkColumnConstraints(p_data.descrip_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ntb00005_status_mov_checkColumnConstraints(p_data.status_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ntb00005_cuenta_1_checkColumnConstraints(p_data.cuenta_1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ntb00005_cuenta_2_checkColumnConstraints(p_data.cuenta_2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ntb00005_cuenta_3_checkColumnConstraints(p_data.cuenta_3) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ntb00005_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ntb00005_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ntb00005_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ntb00005_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ntb00005_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ntb00005_checkTableConstraints
-
-{<BLOCK Name="fct.ntb00005_cod_mov_checkColumnConstraints">}
-#+ Check constraints on the "ntb00005.cod_mov" column
-#+
-#+ @param p_cod_mov - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ntb00005_cod_mov_checkColumnConstraints(p_cod_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mov LIKE ntb00005.cod_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_mov IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_mov: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ntb00005_cod_mov_checkColumnConstraints
-
-{<BLOCK Name="fct.ntb00005_descrip_mov_checkColumnConstraints">}
-#+ Check constraints on the "ntb00005.descrip_mov" column
-#+
-#+ @param p_descrip_mov - VARCHAR2(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ntb00005_descrip_mov_checkColumnConstraints(p_descrip_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descrip_mov LIKE ntb00005.descrip_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ntb00005_descrip_mov_checkColumnConstraints
-
-{<BLOCK Name="fct.ntb00005_status_mov_checkColumnConstraints">}
-#+ Check constraints on the "ntb00005.status_mov" column
-#+
-#+ @param p_status_mov - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ntb00005_status_mov_checkColumnConstraints(p_status_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_mov LIKE ntb00005.status_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ntb00005_status_mov_checkColumnConstraints
-
-{<BLOCK Name="fct.ntb00005_cuenta_1_checkColumnConstraints">}
-#+ Check constraints on the "ntb00005.cuenta_1" column
-#+
-#+ @param p_cuenta_1 - VARCHAR2(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ntb00005_cuenta_1_checkColumnConstraints(p_cuenta_1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cuenta_1 LIKE ntb00005.cuenta_1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ntb00005_cuenta_1_checkColumnConstraints
-
-{<BLOCK Name="fct.ntb00005_cuenta_2_checkColumnConstraints">}
-#+ Check constraints on the "ntb00005.cuenta_2" column
-#+
-#+ @param p_cuenta_2 - VARCHAR2(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ntb00005_cuenta_2_checkColumnConstraints(p_cuenta_2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cuenta_2 LIKE ntb00005.cuenta_2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ntb00005_cuenta_2_checkColumnConstraints
-
-{<BLOCK Name="fct.ntb00005_cuenta_3_checkColumnConstraints">}
-#+ Check constraints on the "ntb00005.cuenta_3" column
-#+
-#+ @param p_cuenta_3 - VARCHAR2(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ntb00005_cuenta_3_checkColumnConstraints(p_cuenta_3)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cuenta_3 LIKE ntb00005.cuenta_3
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ntb00005_cuenta_3_checkColumnConstraints
-
-{<BLOCK Name="fct.ntb00005_status_t_checkColumnConstraints">}
-#+ Check constraints on the "ntb00005.status_t" column
-#+
-#+ @param p_status_t - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ntb00005_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE ntb00005.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ntb00005_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.ntb00005_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "ntb00005.us_crea" column
-#+
-#+ @param p_us_crea - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ntb00005_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE ntb00005.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ntb00005_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.ntb00005_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "ntb00005.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ntb00005_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE ntb00005.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ntb00005_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.ntb00005_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "ntb00005.us_mod" column
-#+
-#+ @param p_us_mod - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ntb00005_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE ntb00005.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ntb00005_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.ntb00005_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "ntb00005.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ntb00005_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE ntb00005.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ntb00005_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.notbingresos_checkTableConstraints">}
-#+ Check constraints on the "notbingresos" table
-#+
-#+ @param p_data - a row data LIKE notbingresos.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_notbingresos_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE notbingresos.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_notbingresos_num_emp_checkColumnConstraints(p_data.num_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notbingresos_monto_checkColumnConstraints(p_data.monto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notbingresos_checkTableConstraints
-
-{<BLOCK Name="fct.notbingresos_num_emp_checkColumnConstraints">}
-#+ Check constraints on the "notbingresos.num_emp" column
-#+
-#+ @param p_num_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notbingresos_num_emp_checkColumnConstraints(p_num_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_emp LIKE notbingresos.num_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notbingresos_num_emp_checkColumnConstraints
-
-{<BLOCK Name="fct.notbingresos_monto_checkColumnConstraints">}
-#+ Check constraints on the "notbingresos.monto" column
-#+
-#+ @param p_monto - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notbingresos_monto_checkColumnConstraints(p_monto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_monto LIKE notbingresos.monto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notbingresos_monto_checkColumnConstraints
-
-{<BLOCK Name="fct.notbcuenta_checkTableConstraints">}
-#+ Check constraints on the "notbcuenta" table
-#+
-#+ @param p_data - a row data LIKE notbcuenta.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_notbcuenta_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE notbcuenta.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_notbcuenta_num_emp_checkColumnConstraints(p_data.num_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notbcuenta_cuenta_no_checkColumnConstraints(p_data.cuenta_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notbcuenta_valor_checkColumnConstraints(p_data.valor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notbcuenta_checkTableConstraints
-
-{<BLOCK Name="fct.notbcuenta_num_emp_checkColumnConstraints">}
-#+ Check constraints on the "notbcuenta.num_emp" column
-#+
-#+ @param p_num_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notbcuenta_num_emp_checkColumnConstraints(p_num_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_emp LIKE notbcuenta.num_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notbcuenta_num_emp_checkColumnConstraints
-
-{<BLOCK Name="fct.notbcuenta_cuenta_no_checkColumnConstraints">}
-#+ Check constraints on the "notbcuenta.cuenta_no" column
-#+
-#+ @param p_cuenta_no - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notbcuenta_cuenta_no_checkColumnConstraints(p_cuenta_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cuenta_no LIKE notbcuenta.cuenta_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notbcuenta_cuenta_no_checkColumnConstraints
-
-{<BLOCK Name="fct.notbcuenta_valor_checkColumnConstraints">}
-#+ Check constraints on the "notbcuenta.valor" column
-#+
-#+ @param p_valor - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notbcuenta_valor_checkColumnConstraints(p_valor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valor LIKE notbcuenta.valor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notbcuenta_valor_checkColumnConstraints
-
-{<BLOCK Name="fct.notb03_checkTableConstraints">}
-#+ Check constraints on the "notb03" table
-#+
-#+ @param p_data - a row data LIKE notb03.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb03_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE notb03.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_notb03_num_emp_checkColumnConstraints(p_data.num_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb03_departamento_checkColumnConstraints(p_data.departamento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb03_nivel_emp_checkColumnConstraints(p_data.nivel_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb03_cod_puesto_checkColumnConstraints(p_data.cod_puesto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb03_cod_mov_checkColumnConstraints(p_data.cod_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb03_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb03_valor_checkColumnConstraints(p_data.valor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb03_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb03_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb03_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb03_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb03_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- CALL smarmotech_dbxconstraints_notb03_pk_notb003_checkUniqueConstraint(p_forUpdate, p_data.num_emp, p_data.cod_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb03_checkTableConstraints
-
-{<BLOCK Name="fct.notb03_pk_notb003_checkUniqueConstraint">}
-#+ Check the primary key uniqueness constraint on the "notb03"
-#+
-#+ @param p_key - Primary Key
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb03_pk_notb003_checkUniqueConstraint(p_forUpdate, p_key)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_key
- RECORD
- notb03_num_emp LIKE notb03.num_emp,
- notb03_cod_mov LIKE notb03.cod_mov
- END RECORD
- DEFINE l_key
- RECORD
- notb03_num_emp LIKE notb03.num_emp,
- notb03_cod_mov LIKE notb03.cod_mov
- END RECORD
- DEFINE l_where STRING
- DEFINE l_sqlQuery STRING
- DEFINE l_count INTEGER
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- LET l_where = "WHERE notb03.num_emp = ?
- AND notb03.cod_mov = ? "
-
- let l_sqlQuery = "SELECT COUNT(*), num_emp, cod_mov FROM notb03 ", l_where, " GROUP BY num_emp, cod_mov"
-
- PREPARE cur_notb03_pk_notb003_checkUniqueConstraint FROM l_sqlQuery
- EXECUTE cur_notb03_pk_notb003_checkUniqueConstraint INTO l_count, l_key.* USING p_key.*
- FREE cur_notb03_pk_notb003_checkUniqueConstraint
- IF (NOT p_forUpdate AND l_count > 0) OR (p_forUpdate AND l_count > 0 AND p_key.* != l_key.*) THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- num_emp + cod_mov: " || ERROR_BAM_00002) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb03_pk_notb003_checkUniqueConstraint
-
-{<BLOCK Name="fct.notb03_num_emp_checkColumnConstraints">}
-#+ Check constraints on the "notb03.num_emp" column
-#+
-#+ @param p_num_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb03_num_emp_checkColumnConstraints(p_num_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_emp LIKE notb03.num_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_num_emp IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- num_emp: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb03_num_emp_checkColumnConstraints
-
-{<BLOCK Name="fct.notb03_departamento_checkColumnConstraints">}
-#+ Check constraints on the "notb03.departamento" column
-#+
-#+ @param p_departamento - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb03_departamento_checkColumnConstraints(p_departamento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_departamento LIKE notb03.departamento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb03_departamento_checkColumnConstraints
-
-{<BLOCK Name="fct.notb03_nivel_emp_checkColumnConstraints">}
-#+ Check constraints on the "notb03.nivel_emp" column
-#+
-#+ @param p_nivel_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb03_nivel_emp_checkColumnConstraints(p_nivel_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nivel_emp LIKE notb03.nivel_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb03_nivel_emp_checkColumnConstraints
-
-{<BLOCK Name="fct.notb03_cod_puesto_checkColumnConstraints">}
-#+ Check constraints on the "notb03.cod_puesto" column
-#+
-#+ @param p_cod_puesto - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb03_cod_puesto_checkColumnConstraints(p_cod_puesto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_puesto LIKE notb03.cod_puesto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb03_cod_puesto_checkColumnConstraints
-
-{<BLOCK Name="fct.notb03_cod_mov_checkColumnConstraints">}
-#+ Check constraints on the "notb03.cod_mov" column
-#+
-#+ @param p_cod_mov - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb03_cod_mov_checkColumnConstraints(p_cod_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mov LIKE notb03.cod_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_mov IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_mov: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb03_cod_mov_checkColumnConstraints
-
-{<BLOCK Name="fct.notb03_cantidad_checkColumnConstraints">}
-#+ Check constraints on the "notb03.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb03_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE notb03.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb03_cantidad_checkColumnConstraints
-
-{<BLOCK Name="fct.notb03_valor_checkColumnConstraints">}
-#+ Check constraints on the "notb03.valor" column
-#+
-#+ @param p_valor - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb03_valor_checkColumnConstraints(p_valor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valor LIKE notb03.valor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb03_valor_checkColumnConstraints
-
-{<BLOCK Name="fct.notb03_status_t_checkColumnConstraints">}
-#+ Check constraints on the "notb03.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb03_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE notb03.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb03_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.notb03_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "notb03.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb03_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE notb03.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb03_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.notb03_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "notb03.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb03_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE notb03.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb03_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.notb03_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "notb03.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb03_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE notb03.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb03_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.notb03_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "notb03.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb03_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE notb03.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb03_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.notb0019_checkTableConstraints">}
-#+ Check constraints on the "notb0019" table
-#+
-#+ @param p_data - a row data LIKE notb0019.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb0019_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE notb0019.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_notb0019_num_nomi_checkColumnConstraints(p_data.num_nomi) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb0019_tipo_emp_checkColumnConstraints(p_data.tipo_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb0019_cheque_no_ini_checkColumnConstraints(p_data.cheque_no_ini) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb0019_cheque_no_fin_checkColumnConstraints(p_data.cheque_no_fin) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb0019_cuenta_no_checkColumnConstraints(p_data.cuenta_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb0019_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb0019_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb0019_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb0019_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb0019_checkTableConstraints
-
-{<BLOCK Name="fct.notb0019_num_nomi_checkColumnConstraints">}
-#+ Check constraints on the "notb0019.num_nomi" column
-#+
-#+ @param p_num_nomi - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb0019_num_nomi_checkColumnConstraints(p_num_nomi)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_nomi LIKE notb0019.num_nomi
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb0019_num_nomi_checkColumnConstraints
-
-{<BLOCK Name="fct.notb0019_tipo_emp_checkColumnConstraints">}
-#+ Check constraints on the "notb0019.tipo_emp" column
-#+
-#+ @param p_tipo_emp - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb0019_tipo_emp_checkColumnConstraints(p_tipo_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_emp LIKE notb0019.tipo_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb0019_tipo_emp_checkColumnConstraints
-
-{<BLOCK Name="fct.notb0019_cheque_no_ini_checkColumnConstraints">}
-#+ Check constraints on the "notb0019.cheque_no_ini" column
-#+
-#+ @param p_cheque_no_ini - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb0019_cheque_no_ini_checkColumnConstraints(p_cheque_no_ini)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cheque_no_ini LIKE notb0019.cheque_no_ini
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb0019_cheque_no_ini_checkColumnConstraints
-
-{<BLOCK Name="fct.notb0019_cheque_no_fin_checkColumnConstraints">}
-#+ Check constraints on the "notb0019.cheque_no_fin" column
-#+
-#+ @param p_cheque_no_fin - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb0019_cheque_no_fin_checkColumnConstraints(p_cheque_no_fin)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cheque_no_fin LIKE notb0019.cheque_no_fin
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb0019_cheque_no_fin_checkColumnConstraints
-
-{<BLOCK Name="fct.notb0019_cuenta_no_checkColumnConstraints">}
-#+ Check constraints on the "notb0019.cuenta_no" column
-#+
-#+ @param p_cuenta_no - CHAR(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb0019_cuenta_no_checkColumnConstraints(p_cuenta_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cuenta_no LIKE notb0019.cuenta_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb0019_cuenta_no_checkColumnConstraints
-
-{<BLOCK Name="fct.notb0019_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "notb0019.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb0019_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE notb0019.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb0019_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.notb0019_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "notb0019.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb0019_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE notb0019.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb0019_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.notb0019_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "notb0019.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb0019_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE notb0019.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb0019_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.notb0019_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "notb0019.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb0019_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE notb0019.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb0019_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00033_checkTableConstraints">}
-#+ Check constraints on the "notb00033" table
-#+
-#+ @param p_data - a row data LIKE notb00033.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00033_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE notb00033.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_notb00033_num_nomi_checkColumnConstraints(p_data.num_nomi) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00033_departamento_checkColumnConstraints(p_data.departamento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00033_cod_puesto_checkColumnConstraints(p_data.cod_puesto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00033_fecha_liquidacion_checkColumnConstraints(p_data.fecha_liquidacion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00033_num_emp_checkColumnConstraints(p_data.num_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00033_sueldo_actual_checkColumnConstraints(p_data.sueldo_actual) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00033_sueldo_promedio_checkColumnConstraints(p_data.sueldo_promedio) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00033_salario_dia_checkColumnConstraints(p_data.salario_dia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00033_anos_empresa_checkColumnConstraints(p_data.anos_empresa) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00033_meses_empresa_checkColumnConstraints(p_data.meses_empresa) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00033_dias_empresa_checkColumnConstraints(p_data.dias_empresa) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00033_dias_cesantia_checkColumnConstraints(p_data.dias_cesantia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00033_dias_preaviso_checkColumnConstraints(p_data.dias_preaviso) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00033_dias_vacaciones_checkColumnConstraints(p_data.dias_vacaciones) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00033_ultimas_vacaciones_checkColumnConstraints(p_data.ultimas_vacaciones) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00033_tiempo_empresa_checkColumnConstraints(p_data.tiempo_empresa) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00033_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00033_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00033_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00033_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00033_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00033_checkTableConstraints
-
-{<BLOCK Name="fct.notb00033_num_nomi_checkColumnConstraints">}
-#+ Check constraints on the "notb00033.num_nomi" column
-#+
-#+ @param p_num_nomi - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00033_num_nomi_checkColumnConstraints(p_num_nomi)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_nomi LIKE notb00033.num_nomi
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00033_num_nomi_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00033_departamento_checkColumnConstraints">}
-#+ Check constraints on the "notb00033.departamento" column
-#+
-#+ @param p_departamento - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00033_departamento_checkColumnConstraints(p_departamento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_departamento LIKE notb00033.departamento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00033_departamento_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00033_cod_puesto_checkColumnConstraints">}
-#+ Check constraints on the "notb00033.cod_puesto" column
-#+
-#+ @param p_cod_puesto - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00033_cod_puesto_checkColumnConstraints(p_cod_puesto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_puesto LIKE notb00033.cod_puesto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00033_cod_puesto_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00033_fecha_liquidacion_checkColumnConstraints">}
-#+ Check constraints on the "notb00033.fecha_liquidacion" column
-#+
-#+ @param p_fecha_liquidacion - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00033_fecha_liquidacion_checkColumnConstraints(p_fecha_liquidacion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_liquidacion LIKE notb00033.fecha_liquidacion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00033_fecha_liquidacion_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00033_num_emp_checkColumnConstraints">}
-#+ Check constraints on the "notb00033.num_emp" column
-#+
-#+ @param p_num_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00033_num_emp_checkColumnConstraints(p_num_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_emp LIKE notb00033.num_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00033_num_emp_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00033_sueldo_actual_checkColumnConstraints">}
-#+ Check constraints on the "notb00033.sueldo_actual" column
-#+
-#+ @param p_sueldo_actual - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00033_sueldo_actual_checkColumnConstraints(p_sueldo_actual)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sueldo_actual LIKE notb00033.sueldo_actual
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00033_sueldo_actual_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00033_sueldo_promedio_checkColumnConstraints">}
-#+ Check constraints on the "notb00033.sueldo_promedio" column
-#+
-#+ @param p_sueldo_promedio - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00033_sueldo_promedio_checkColumnConstraints(p_sueldo_promedio)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sueldo_promedio LIKE notb00033.sueldo_promedio
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00033_sueldo_promedio_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00033_salario_dia_checkColumnConstraints">}
-#+ Check constraints on the "notb00033.salario_dia" column
-#+
-#+ @param p_salario_dia - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00033_salario_dia_checkColumnConstraints(p_salario_dia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_salario_dia LIKE notb00033.salario_dia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00033_salario_dia_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00033_anos_empresa_checkColumnConstraints">}
-#+ Check constraints on the "notb00033.anos_empresa" column
-#+
-#+ @param p_anos_empresa - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00033_anos_empresa_checkColumnConstraints(p_anos_empresa)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_anos_empresa LIKE notb00033.anos_empresa
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00033_anos_empresa_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00033_meses_empresa_checkColumnConstraints">}
-#+ Check constraints on the "notb00033.meses_empresa" column
-#+
-#+ @param p_meses_empresa - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00033_meses_empresa_checkColumnConstraints(p_meses_empresa)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_meses_empresa LIKE notb00033.meses_empresa
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00033_meses_empresa_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00033_dias_empresa_checkColumnConstraints">}
-#+ Check constraints on the "notb00033.dias_empresa" column
-#+
-#+ @param p_dias_empresa - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00033_dias_empresa_checkColumnConstraints(p_dias_empresa)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_dias_empresa LIKE notb00033.dias_empresa
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00033_dias_empresa_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00033_dias_cesantia_checkColumnConstraints">}
-#+ Check constraints on the "notb00033.dias_cesantia" column
-#+
-#+ @param p_dias_cesantia - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00033_dias_cesantia_checkColumnConstraints(p_dias_cesantia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_dias_cesantia LIKE notb00033.dias_cesantia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00033_dias_cesantia_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00033_dias_preaviso_checkColumnConstraints">}
-#+ Check constraints on the "notb00033.dias_preaviso" column
-#+
-#+ @param p_dias_preaviso - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00033_dias_preaviso_checkColumnConstraints(p_dias_preaviso)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_dias_preaviso LIKE notb00033.dias_preaviso
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00033_dias_preaviso_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00033_dias_vacaciones_checkColumnConstraints">}
-#+ Check constraints on the "notb00033.dias_vacaciones" column
-#+
-#+ @param p_dias_vacaciones - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00033_dias_vacaciones_checkColumnConstraints(p_dias_vacaciones)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_dias_vacaciones LIKE notb00033.dias_vacaciones
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00033_dias_vacaciones_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00033_ultimas_vacaciones_checkColumnConstraints">}
-#+ Check constraints on the "notb00033.ultimas_vacaciones" column
-#+
-#+ @param p_ultimas_vacaciones - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00033_ultimas_vacaciones_checkColumnConstraints(p_ultimas_vacaciones)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ultimas_vacaciones LIKE notb00033.ultimas_vacaciones
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00033_ultimas_vacaciones_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00033_tiempo_empresa_checkColumnConstraints">}
-#+ Check constraints on the "notb00033.tiempo_empresa" column
-#+
-#+ @param p_tiempo_empresa - DECIMAL(6,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00033_tiempo_empresa_checkColumnConstraints(p_tiempo_empresa)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tiempo_empresa LIKE notb00033.tiempo_empresa
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00033_tiempo_empresa_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00033_status_t_checkColumnConstraints">}
-#+ Check constraints on the "notb00033.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00033_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE notb00033.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00033_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00033_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "notb00033.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00033_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE notb00033.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00033_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00033_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "notb00033.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00033_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE notb00033.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00033_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00033_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "notb00033.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00033_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE notb00033.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00033_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00033_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "notb00033.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00033_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE notb00033.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00033_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00023_checkTableConstraints">}
-#+ Check constraints on the "notb00023" table
-#+
-#+ @param p_data - a row data LIKE notb00023.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00023_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE notb00023.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_notb00023_numero_nomina_checkColumnConstraints(p_data.numero_nomina) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00023_tipo_emp_checkColumnConstraints(p_data.tipo_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00023_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00023_monto_excento_checkColumnConstraints(p_data.monto_excento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00023_porc_15_checkColumnConstraints(p_data.porc_15) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00023_porc_20_checkColumnConstraints(p_data.porc_20) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00023_porc_25_checkColumnConstraints(p_data.porc_25) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00023_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00023_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00023_fecha_crea_checkColumnConstraints(p_data.fecha_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00023_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00023_fecha_mod_checkColumnConstraints(p_data.fecha_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00023_checkTableConstraints
-
-{<BLOCK Name="fct.notb00023_numero_nomina_checkColumnConstraints">}
-#+ Check constraints on the "notb00023.numero_nomina" column
-#+
-#+ @param p_numero_nomina - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00023_numero_nomina_checkColumnConstraints(p_numero_nomina)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_numero_nomina LIKE notb00023.numero_nomina
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00023_numero_nomina_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00023_tipo_emp_checkColumnConstraints">}
-#+ Check constraints on the "notb00023.tipo_emp" column
-#+
-#+ @param p_tipo_emp - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00023_tipo_emp_checkColumnConstraints(p_tipo_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_emp LIKE notb00023.tipo_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00023_tipo_emp_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00023_fecha_checkColumnConstraints">}
-#+ Check constraints on the "notb00023.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00023_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE notb00023.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00023_fecha_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00023_monto_excento_checkColumnConstraints">}
-#+ Check constraints on the "notb00023.monto_excento" column
-#+
-#+ @param p_monto_excento - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00023_monto_excento_checkColumnConstraints(p_monto_excento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_monto_excento LIKE notb00023.monto_excento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00023_monto_excento_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00023_porc_15_checkColumnConstraints">}
-#+ Check constraints on the "notb00023.porc_15" column
-#+
-#+ @param p_porc_15 - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00023_porc_15_checkColumnConstraints(p_porc_15)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_porc_15 LIKE notb00023.porc_15
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00023_porc_15_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00023_porc_20_checkColumnConstraints">}
-#+ Check constraints on the "notb00023.porc_20" column
-#+
-#+ @param p_porc_20 - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00023_porc_20_checkColumnConstraints(p_porc_20)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_porc_20 LIKE notb00023.porc_20
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00023_porc_20_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00023_porc_25_checkColumnConstraints">}
-#+ Check constraints on the "notb00023.porc_25" column
-#+
-#+ @param p_porc_25 - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00023_porc_25_checkColumnConstraints(p_porc_25)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_porc_25 LIKE notb00023.porc_25
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00023_porc_25_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00023_status_t_checkColumnConstraints">}
-#+ Check constraints on the "notb00023.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00023_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE notb00023.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00023_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00023_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "notb00023.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00023_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE notb00023.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00023_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00023_fecha_crea_checkColumnConstraints">}
-#+ Check constraints on the "notb00023.fecha_crea" column
-#+
-#+ @param p_fecha_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00023_fecha_crea_checkColumnConstraints(p_fecha_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_crea LIKE notb00023.fecha_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00023_fecha_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00023_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "notb00023.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00023_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE notb00023.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00023_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00023_fecha_mod_checkColumnConstraints">}
-#+ Check constraints on the "notb00023.fecha_mod" column
-#+
-#+ @param p_fecha_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00023_fecha_mod_checkColumnConstraints(p_fecha_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_mod LIKE notb00023.fecha_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00023_fecha_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00021_checkTableConstraints">}
-#+ Check constraints on the "notb00021" table
-#+
-#+ @param p_data - a row data LIKE notb00021.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00021_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE notb00021.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_notb00021_num_nomi_checkColumnConstraints(p_data.num_nomi) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00021_tipo_emp_checkColumnConstraints(p_data.tipo_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00021_cheque_no_ini_checkColumnConstraints(p_data.cheque_no_ini) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00021_cheque_no_fin_checkColumnConstraints(p_data.cheque_no_fin) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00021_cuenta_no_checkColumnConstraints(p_data.cuenta_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00021_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00021_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00021_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00021_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00021_checkTableConstraints
-
-{<BLOCK Name="fct.notb00021_num_nomi_checkColumnConstraints">}
-#+ Check constraints on the "notb00021.num_nomi" column
-#+
-#+ @param p_num_nomi - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00021_num_nomi_checkColumnConstraints(p_num_nomi)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_nomi LIKE notb00021.num_nomi
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00021_num_nomi_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00021_tipo_emp_checkColumnConstraints">}
-#+ Check constraints on the "notb00021.tipo_emp" column
-#+
-#+ @param p_tipo_emp - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00021_tipo_emp_checkColumnConstraints(p_tipo_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_emp LIKE notb00021.tipo_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00021_tipo_emp_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00021_cheque_no_ini_checkColumnConstraints">}
-#+ Check constraints on the "notb00021.cheque_no_ini" column
-#+
-#+ @param p_cheque_no_ini - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00021_cheque_no_ini_checkColumnConstraints(p_cheque_no_ini)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cheque_no_ini LIKE notb00021.cheque_no_ini
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00021_cheque_no_ini_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00021_cheque_no_fin_checkColumnConstraints">}
-#+ Check constraints on the "notb00021.cheque_no_fin" column
-#+
-#+ @param p_cheque_no_fin - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00021_cheque_no_fin_checkColumnConstraints(p_cheque_no_fin)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cheque_no_fin LIKE notb00021.cheque_no_fin
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00021_cheque_no_fin_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00021_cuenta_no_checkColumnConstraints">}
-#+ Check constraints on the "notb00021.cuenta_no" column
-#+
-#+ @param p_cuenta_no - CHAR(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00021_cuenta_no_checkColumnConstraints(p_cuenta_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cuenta_no LIKE notb00021.cuenta_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00021_cuenta_no_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00021_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "notb00021.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00021_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE notb00021.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00021_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00021_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "notb00021.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00021_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE notb00021.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00021_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00021_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "notb00021.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00021_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE notb00021.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00021_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00021_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "notb00021.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00021_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE notb00021.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00021_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00020_checkTableConstraints">}
-#+ Check constraints on the "notb00020" table
-#+
-#+ @param p_data - a row data LIKE notb00020.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00020_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE notb00020.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_notb00020_cuenta_no_checkColumnConstraints(p_data.cuenta_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00020_cheque_no_checkColumnConstraints(p_data.cheque_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00020_num_emp_checkColumnConstraints(p_data.num_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00020_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00020_portador_checkColumnConstraints(p_data.portador) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00020_tasa_checkColumnConstraints(p_data.tasa) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00020_monto_checkColumnConstraints(p_data.monto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00020_status_impresion_checkColumnConstraints(p_data.status_impresion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00020_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00020_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00020_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00020_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00020_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00020_checkTableConstraints
-
-{<BLOCK Name="fct.notb00020_cuenta_no_checkColumnConstraints">}
-#+ Check constraints on the "notb00020.cuenta_no" column
-#+
-#+ @param p_cuenta_no - CHAR(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00020_cuenta_no_checkColumnConstraints(p_cuenta_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cuenta_no LIKE notb00020.cuenta_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00020_cuenta_no_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00020_cheque_no_checkColumnConstraints">}
-#+ Check constraints on the "notb00020.cheque_no" column
-#+
-#+ @param p_cheque_no - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00020_cheque_no_checkColumnConstraints(p_cheque_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cheque_no LIKE notb00020.cheque_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00020_cheque_no_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00020_num_emp_checkColumnConstraints">}
-#+ Check constraints on the "notb00020.num_emp" column
-#+
-#+ @param p_num_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00020_num_emp_checkColumnConstraints(p_num_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_emp LIKE notb00020.num_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00020_num_emp_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00020_fecha_checkColumnConstraints">}
-#+ Check constraints on the "notb00020.fecha" column
-#+
-#+ @param p_fecha - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00020_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE notb00020.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00020_fecha_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00020_portador_checkColumnConstraints">}
-#+ Check constraints on the "notb00020.portador" column
-#+
-#+ @param p_portador - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00020_portador_checkColumnConstraints(p_portador)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_portador LIKE notb00020.portador
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00020_portador_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00020_tasa_checkColumnConstraints">}
-#+ Check constraints on the "notb00020.tasa" column
-#+
-#+ @param p_tasa - DECIMAL(8,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00020_tasa_checkColumnConstraints(p_tasa)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tasa LIKE notb00020.tasa
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00020_tasa_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00020_monto_checkColumnConstraints">}
-#+ Check constraints on the "notb00020.monto" column
-#+
-#+ @param p_monto - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00020_monto_checkColumnConstraints(p_monto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_monto LIKE notb00020.monto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00020_monto_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00020_status_impresion_checkColumnConstraints">}
-#+ Check constraints on the "notb00020.status_impresion" column
-#+
-#+ @param p_status_impresion - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00020_status_impresion_checkColumnConstraints(p_status_impresion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_impresion LIKE notb00020.status_impresion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00020_status_impresion_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00020_status_t_checkColumnConstraints">}
-#+ Check constraints on the "notb00020.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00020_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE notb00020.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00020_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00020_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "notb00020.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00020_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE notb00020.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00020_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00020_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "notb00020.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00020_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE notb00020.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00020_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00020_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "notb00020.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00020_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE notb00020.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00020_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00020_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "notb00020.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00020_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE notb00020.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00020_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00019_checkTableConstraints">}
-#+ Check constraints on the "notb00019" table
-#+
-#+ @param p_data - a row data LIKE notb00019.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00019_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE notb00019.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_notb00019_num_nomi_checkColumnConstraints(p_data.num_nomi) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00019_tipo_emp_checkColumnConstraints(p_data.tipo_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00019_cheque_no_ini_checkColumnConstraints(p_data.cheque_no_ini) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00019_cheque_no_fin_checkColumnConstraints(p_data.cheque_no_fin) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00019_cuenta_no_checkColumnConstraints(p_data.cuenta_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00019_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00019_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00019_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00019_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00019_checkTableConstraints
-
-{<BLOCK Name="fct.notb00019_num_nomi_checkColumnConstraints">}
-#+ Check constraints on the "notb00019.num_nomi" column
-#+
-#+ @param p_num_nomi - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00019_num_nomi_checkColumnConstraints(p_num_nomi)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_nomi LIKE notb00019.num_nomi
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00019_num_nomi_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00019_tipo_emp_checkColumnConstraints">}
-#+ Check constraints on the "notb00019.tipo_emp" column
-#+
-#+ @param p_tipo_emp - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00019_tipo_emp_checkColumnConstraints(p_tipo_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_emp LIKE notb00019.tipo_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00019_tipo_emp_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00019_cheque_no_ini_checkColumnConstraints">}
-#+ Check constraints on the "notb00019.cheque_no_ini" column
-#+
-#+ @param p_cheque_no_ini - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00019_cheque_no_ini_checkColumnConstraints(p_cheque_no_ini)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cheque_no_ini LIKE notb00019.cheque_no_ini
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00019_cheque_no_ini_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00019_cheque_no_fin_checkColumnConstraints">}
-#+ Check constraints on the "notb00019.cheque_no_fin" column
-#+
-#+ @param p_cheque_no_fin - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00019_cheque_no_fin_checkColumnConstraints(p_cheque_no_fin)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cheque_no_fin LIKE notb00019.cheque_no_fin
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00019_cheque_no_fin_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00019_cuenta_no_checkColumnConstraints">}
-#+ Check constraints on the "notb00019.cuenta_no" column
-#+
-#+ @param p_cuenta_no - CHAR(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00019_cuenta_no_checkColumnConstraints(p_cuenta_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cuenta_no LIKE notb00019.cuenta_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00019_cuenta_no_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00019_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "notb00019.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00019_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE notb00019.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00019_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00019_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "notb00019.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00019_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE notb00019.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00019_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00019_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "notb00019.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00019_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE notb00019.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00019_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00019_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "notb00019.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00019_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE notb00019.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00019_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00018_checkTableConstraints">}
-#+ Check constraints on the "notb00018" table
-#+
-#+ @param p_data - a row data LIKE notb00018.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00018_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE notb00018.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_notb00018_num_emp_checkColumnConstraints(p_data.num_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00018_porc_accidente_checkColumnConstraints(p_data.porc_accidente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00018_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00018_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00018_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00018_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00018_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00018_checkTableConstraints
-
-{<BLOCK Name="fct.notb00018_num_emp_checkColumnConstraints">}
-#+ Check constraints on the "notb00018.num_emp" column
-#+
-#+ @param p_num_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00018_num_emp_checkColumnConstraints(p_num_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_emp LIKE notb00018.num_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00018_num_emp_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00018_porc_accidente_checkColumnConstraints">}
-#+ Check constraints on the "notb00018.porc_accidente" column
-#+
-#+ @param p_porc_accidente - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00018_porc_accidente_checkColumnConstraints(p_porc_accidente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_porc_accidente LIKE notb00018.porc_accidente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00018_porc_accidente_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00018_status_t_checkColumnConstraints">}
-#+ Check constraints on the "notb00018.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00018_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE notb00018.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00018_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00018_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "notb00018.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00018_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE notb00018.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00018_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00018_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "notb00018.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00018_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE notb00018.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00018_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00018_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "notb00018.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00018_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE notb00018.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00018_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00018_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "notb00018.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00018_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE notb00018.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00018_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00017_checkTableConstraints">}
-#+ Check constraints on the "notb00017" table
-#+
-#+ @param p_data - a row data LIKE notb00017.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00017_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE notb00017.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_notb00017_num_emp_checkColumnConstraints(p_data.num_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00017_departamento_checkColumnConstraints(p_data.departamento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00017_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00017_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00017_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00017_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00017_checkTableConstraints
-
-{<BLOCK Name="fct.notb00017_num_emp_checkColumnConstraints">}
-#+ Check constraints on the "notb00017.num_emp" column
-#+
-#+ @param p_num_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00017_num_emp_checkColumnConstraints(p_num_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_emp LIKE notb00017.num_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00017_num_emp_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00017_departamento_checkColumnConstraints">}
-#+ Check constraints on the "notb00017.departamento" column
-#+
-#+ @param p_departamento - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00017_departamento_checkColumnConstraints(p_departamento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_departamento LIKE notb00017.departamento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00017_departamento_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00017_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "notb00017.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00017_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE notb00017.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00017_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00017_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "notb00017.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00017_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE notb00017.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00017_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00017_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "notb00017.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00017_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE notb00017.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00017_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00017_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "notb00017.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00017_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE notb00017.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00017_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00016_checkTableConstraints">}
-#+ Check constraints on the "notb00016" table
-#+
-#+ @param p_data - a row data LIKE notb00016.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00016_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE notb00016.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_notb00016_num_nomi_checkColumnConstraints(p_data.num_nomi) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00016_tipo_emp_checkColumnConstraints(p_data.tipo_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00016_num_emp_checkColumnConstraints(p_data.num_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00016_departamento_checkColumnConstraints(p_data.departamento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00016_nivel_emp_checkColumnConstraints(p_data.nivel_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00016_cod_puesto_checkColumnConstraints(p_data.cod_puesto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00016_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00016_cod_mov_checkColumnConstraints(p_data.cod_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00016_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00016_valor_checkColumnConstraints(p_data.valor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00016_clase_mov_checkColumnConstraints(p_data.clase_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00016_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00016_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00016_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00016_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00016_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00016_checkTableConstraints
-
-{<BLOCK Name="fct.notb00016_num_nomi_checkColumnConstraints">}
-#+ Check constraints on the "notb00016.num_nomi" column
-#+
-#+ @param p_num_nomi - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00016_num_nomi_checkColumnConstraints(p_num_nomi)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_nomi LIKE notb00016.num_nomi
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00016_num_nomi_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00016_tipo_emp_checkColumnConstraints">}
-#+ Check constraints on the "notb00016.tipo_emp" column
-#+
-#+ @param p_tipo_emp - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00016_tipo_emp_checkColumnConstraints(p_tipo_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_emp LIKE notb00016.tipo_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00016_tipo_emp_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00016_num_emp_checkColumnConstraints">}
-#+ Check constraints on the "notb00016.num_emp" column
-#+
-#+ @param p_num_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00016_num_emp_checkColumnConstraints(p_num_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_emp LIKE notb00016.num_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00016_num_emp_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00016_departamento_checkColumnConstraints">}
-#+ Check constraints on the "notb00016.departamento" column
-#+
-#+ @param p_departamento - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00016_departamento_checkColumnConstraints(p_departamento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_departamento LIKE notb00016.departamento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00016_departamento_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00016_nivel_emp_checkColumnConstraints">}
-#+ Check constraints on the "notb00016.nivel_emp" column
-#+
-#+ @param p_nivel_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00016_nivel_emp_checkColumnConstraints(p_nivel_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nivel_emp LIKE notb00016.nivel_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00016_nivel_emp_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00016_cod_puesto_checkColumnConstraints">}
-#+ Check constraints on the "notb00016.cod_puesto" column
-#+
-#+ @param p_cod_puesto - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00016_cod_puesto_checkColumnConstraints(p_cod_puesto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_puesto LIKE notb00016.cod_puesto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00016_cod_puesto_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00016_fecha_checkColumnConstraints">}
-#+ Check constraints on the "notb00016.fecha" column
-#+
-#+ @param p_fecha - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00016_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE notb00016.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00016_fecha_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00016_cod_mov_checkColumnConstraints">}
-#+ Check constraints on the "notb00016.cod_mov" column
-#+
-#+ @param p_cod_mov - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00016_cod_mov_checkColumnConstraints(p_cod_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mov LIKE notb00016.cod_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00016_cod_mov_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00016_cantidad_checkColumnConstraints">}
-#+ Check constraints on the "notb00016.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00016_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE notb00016.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00016_cantidad_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00016_valor_checkColumnConstraints">}
-#+ Check constraints on the "notb00016.valor" column
-#+
-#+ @param p_valor - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00016_valor_checkColumnConstraints(p_valor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valor LIKE notb00016.valor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00016_valor_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00016_clase_mov_checkColumnConstraints">}
-#+ Check constraints on the "notb00016.clase_mov" column
-#+
-#+ @param p_clase_mov - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00016_clase_mov_checkColumnConstraints(p_clase_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_clase_mov LIKE notb00016.clase_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00016_clase_mov_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00016_status_t_checkColumnConstraints">}
-#+ Check constraints on the "notb00016.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00016_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE notb00016.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00016_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00016_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "notb00016.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00016_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE notb00016.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00016_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00016_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "notb00016.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00016_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE notb00016.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00016_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00016_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "notb00016.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00016_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE notb00016.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00016_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00016_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "notb00016.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00016_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE notb00016.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00016_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00015_checkTableConstraints">}
-#+ Check constraints on the "notb00015" table
-#+
-#+ @param p_data - a row data LIKE notb00015.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00015_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE notb00015.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_notb00015_num_emp_checkColumnConstraints(p_data.num_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00015_departamento_checkColumnConstraints(p_data.departamento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00015_nivel_emp_checkColumnConstraints(p_data.nivel_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00015_cod_puesto_checkColumnConstraints(p_data.cod_puesto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00015_num_doc_checkColumnConstraints(p_data.num_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00015_cod_mov_checkColumnConstraints(p_data.cod_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00015_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00015_monto_checkColumnConstraints(p_data.monto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00015_porciento_checkColumnConstraints(p_data.porciento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00015_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00015_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00015_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00015_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00015_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00015_checkTableConstraints
-
-{<BLOCK Name="fct.notb00015_num_emp_checkColumnConstraints">}
-#+ Check constraints on the "notb00015.num_emp" column
-#+
-#+ @param p_num_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00015_num_emp_checkColumnConstraints(p_num_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_emp LIKE notb00015.num_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00015_num_emp_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00015_departamento_checkColumnConstraints">}
-#+ Check constraints on the "notb00015.departamento" column
-#+
-#+ @param p_departamento - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00015_departamento_checkColumnConstraints(p_departamento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_departamento LIKE notb00015.departamento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00015_departamento_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00015_nivel_emp_checkColumnConstraints">}
-#+ Check constraints on the "notb00015.nivel_emp" column
-#+
-#+ @param p_nivel_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00015_nivel_emp_checkColumnConstraints(p_nivel_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nivel_emp LIKE notb00015.nivel_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00015_nivel_emp_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00015_cod_puesto_checkColumnConstraints">}
-#+ Check constraints on the "notb00015.cod_puesto" column
-#+
-#+ @param p_cod_puesto - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00015_cod_puesto_checkColumnConstraints(p_cod_puesto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_puesto LIKE notb00015.cod_puesto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00015_cod_puesto_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00015_num_doc_checkColumnConstraints">}
-#+ Check constraints on the "notb00015.num_doc" column
-#+
-#+ @param p_num_doc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00015_num_doc_checkColumnConstraints(p_num_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_doc LIKE notb00015.num_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00015_num_doc_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00015_cod_mov_checkColumnConstraints">}
-#+ Check constraints on the "notb00015.cod_mov" column
-#+
-#+ @param p_cod_mov - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00015_cod_mov_checkColumnConstraints(p_cod_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mov LIKE notb00015.cod_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00015_cod_mov_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00015_fecha_checkColumnConstraints">}
-#+ Check constraints on the "notb00015.fecha" column
-#+
-#+ @param p_fecha - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00015_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE notb00015.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00015_fecha_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00015_monto_checkColumnConstraints">}
-#+ Check constraints on the "notb00015.monto" column
-#+
-#+ @param p_monto - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00015_monto_checkColumnConstraints(p_monto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_monto LIKE notb00015.monto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00015_monto_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00015_porciento_checkColumnConstraints">}
-#+ Check constraints on the "notb00015.porciento" column
-#+
-#+ @param p_porciento - DECIMAL(5,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00015_porciento_checkColumnConstraints(p_porciento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_porciento LIKE notb00015.porciento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00015_porciento_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00015_status_t_checkColumnConstraints">}
-#+ Check constraints on the "notb00015.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00015_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE notb00015.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00015_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00015_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "notb00015.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00015_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE notb00015.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00015_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00015_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "notb00015.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00015_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE notb00015.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00015_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00015_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "notb00015.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00015_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE notb00015.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00015_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00015_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "notb00015.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00015_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE notb00015.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00015_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00014_checkTableConstraints">}
-#+ Check constraints on the "notb00014" table
-#+
-#+ @param p_data - a row data LIKE notb00014.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00014_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE notb00014.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_notb00014_cod_mov_checkColumnConstraints(p_data.cod_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00014_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00014_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00014_checkTableConstraints
-
-{<BLOCK Name="fct.notb00014_cod_mov_checkColumnConstraints">}
-#+ Check constraints on the "notb00014.cod_mov" column
-#+
-#+ @param p_cod_mov - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00014_cod_mov_checkColumnConstraints(p_cod_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mov LIKE notb00014.cod_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00014_cod_mov_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00014_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "notb00014.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00014_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE notb00014.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00014_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00014_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "notb00014.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00014_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE notb00014.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00014_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00013_checkTableConstraints">}
-#+ Check constraints on the "notb00013" table
-#+
-#+ @param p_data - a row data LIKE notb00013.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00013_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE notb00013.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_notb00013_cod_mov_checkColumnConstraints(p_data.cod_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00013_cod_mov_a_checkColumnConstraints(p_data.cod_mov_a) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00013_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00013_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00013_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00013_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00013_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00013_checkTableConstraints
-
-{<BLOCK Name="fct.notb00013_cod_mov_checkColumnConstraints">}
-#+ Check constraints on the "notb00013.cod_mov" column
-#+
-#+ @param p_cod_mov - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00013_cod_mov_checkColumnConstraints(p_cod_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mov LIKE notb00013.cod_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00013_cod_mov_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00013_cod_mov_a_checkColumnConstraints">}
-#+ Check constraints on the "notb00013.cod_mov_a" column
-#+
-#+ @param p_cod_mov_a - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00013_cod_mov_a_checkColumnConstraints(p_cod_mov_a)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mov_a LIKE notb00013.cod_mov_a
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00013_cod_mov_a_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00013_status_t_checkColumnConstraints">}
-#+ Check constraints on the "notb00013.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00013_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE notb00013.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00013_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00013_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "notb00013.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00013_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE notb00013.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00013_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00013_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "notb00013.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00013_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE notb00013.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00013_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00013_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "notb00013.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00013_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE notb00013.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00013_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00013_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "notb00013.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00013_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE notb00013.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00013_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00012_checkTableConstraints">}
-#+ Check constraints on the "notb00012" table
-#+
-#+ @param p_data - a row data LIKE notb00012.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00012_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE notb00012.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_notb00012_cod_mes_checkColumnConstraints(p_data.cod_mes) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00012_dias_checkColumnConstraints(p_data.dias) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00012_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00012_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00012_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00012_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00012_checkTableConstraints
-
-{<BLOCK Name="fct.notb00012_cod_mes_checkColumnConstraints">}
-#+ Check constraints on the "notb00012.cod_mes" column
-#+
-#+ @param p_cod_mes - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00012_cod_mes_checkColumnConstraints(p_cod_mes)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mes LIKE notb00012.cod_mes
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00012_cod_mes_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00012_dias_checkColumnConstraints">}
-#+ Check constraints on the "notb00012.dias" column
-#+
-#+ @param p_dias - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00012_dias_checkColumnConstraints(p_dias)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_dias LIKE notb00012.dias
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00012_dias_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00012_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "notb00012.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00012_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE notb00012.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00012_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00012_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "notb00012.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00012_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE notb00012.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00012_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00012_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "notb00012.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00012_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE notb00012.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00012_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00012_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "notb00012.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00012_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE notb00012.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00012_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00011_checkTableConstraints">}
-#+ Check constraints on the "notb00011" table
-#+
-#+ @param p_data - a row data LIKE notb00011.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00011_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE notb00011.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_notb00011_num_emp_checkColumnConstraints(p_data.num_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00011_departamento_checkColumnConstraints(p_data.departamento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00011_nivel_emp_checkColumnConstraints(p_data.nivel_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00011_cod_puesto_checkColumnConstraints(p_data.cod_puesto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00011_num_doc_checkColumnConstraints(p_data.num_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00011_cod_mov_checkColumnConstraints(p_data.cod_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00011_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00011_monto_checkColumnConstraints(p_data.monto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00011_porciento_checkColumnConstraints(p_data.porciento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00011_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00011_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00011_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00011_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00011_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00011_checkTableConstraints
-
-{<BLOCK Name="fct.notb00011_num_emp_checkColumnConstraints">}
-#+ Check constraints on the "notb00011.num_emp" column
-#+
-#+ @param p_num_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00011_num_emp_checkColumnConstraints(p_num_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_emp LIKE notb00011.num_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00011_num_emp_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00011_departamento_checkColumnConstraints">}
-#+ Check constraints on the "notb00011.departamento" column
-#+
-#+ @param p_departamento - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00011_departamento_checkColumnConstraints(p_departamento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_departamento LIKE notb00011.departamento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00011_departamento_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00011_nivel_emp_checkColumnConstraints">}
-#+ Check constraints on the "notb00011.nivel_emp" column
-#+
-#+ @param p_nivel_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00011_nivel_emp_checkColumnConstraints(p_nivel_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nivel_emp LIKE notb00011.nivel_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00011_nivel_emp_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00011_cod_puesto_checkColumnConstraints">}
-#+ Check constraints on the "notb00011.cod_puesto" column
-#+
-#+ @param p_cod_puesto - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00011_cod_puesto_checkColumnConstraints(p_cod_puesto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_puesto LIKE notb00011.cod_puesto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00011_cod_puesto_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00011_num_doc_checkColumnConstraints">}
-#+ Check constraints on the "notb00011.num_doc" column
-#+
-#+ @param p_num_doc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00011_num_doc_checkColumnConstraints(p_num_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_doc LIKE notb00011.num_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00011_num_doc_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00011_cod_mov_checkColumnConstraints">}
-#+ Check constraints on the "notb00011.cod_mov" column
-#+
-#+ @param p_cod_mov - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00011_cod_mov_checkColumnConstraints(p_cod_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mov LIKE notb00011.cod_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00011_cod_mov_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00011_fecha_checkColumnConstraints">}
-#+ Check constraints on the "notb00011.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00011_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE notb00011.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00011_fecha_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00011_monto_checkColumnConstraints">}
-#+ Check constraints on the "notb00011.monto" column
-#+
-#+ @param p_monto - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00011_monto_checkColumnConstraints(p_monto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_monto LIKE notb00011.monto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00011_monto_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00011_porciento_checkColumnConstraints">}
-#+ Check constraints on the "notb00011.porciento" column
-#+
-#+ @param p_porciento - DECIMAL(5,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00011_porciento_checkColumnConstraints(p_porciento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_porciento LIKE notb00011.porciento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00011_porciento_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00011_status_t_checkColumnConstraints">}
-#+ Check constraints on the "notb00011.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00011_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE notb00011.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00011_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00011_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "notb00011.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00011_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE notb00011.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00011_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00011_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "notb00011.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00011_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE notb00011.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00011_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00011_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "notb00011.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00011_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE notb00011.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00011_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00011_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "notb00011.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00011_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE notb00011.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00011_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00010_checkTableConstraints">}
-#+ Check constraints on the "notb00010" table
-#+
-#+ @param p_data - a row data LIKE notb00010.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00010_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE notb00010.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_notb00010_tipo_emp_checkColumnConstraints(p_data.tipo_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00010_h_normal_checkColumnConstraints(p_data.h_normal) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00010_num_nomi_checkColumnConstraints(p_data.num_nomi) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00010_mes_checkColumnConstraints(p_data.mes) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00010_ano_checkColumnConstraints(p_data.ano) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00010_num_sem_checkColumnConstraints(p_data.num_sem) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00010_fecha_del_checkColumnConstraints(p_data.fecha_del) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00010_fecha_al_checkColumnConstraints(p_data.fecha_al) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00010_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00010_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00010_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00010_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00010_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00010_fecha_cierre_nomina_checkColumnConstraints(p_data.fecha_cierre_nomina) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00010_checkTableConstraints
-
-{<BLOCK Name="fct.notb00010_tipo_emp_checkColumnConstraints">}
-#+ Check constraints on the "notb00010.tipo_emp" column
-#+
-#+ @param p_tipo_emp - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00010_tipo_emp_checkColumnConstraints(p_tipo_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_emp LIKE notb00010.tipo_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00010_tipo_emp_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00010_h_normal_checkColumnConstraints">}
-#+ Check constraints on the "notb00010.h_normal" column
-#+
-#+ @param p_h_normal - DECIMAL(8,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00010_h_normal_checkColumnConstraints(p_h_normal)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_h_normal LIKE notb00010.h_normal
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00010_h_normal_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00010_num_nomi_checkColumnConstraints">}
-#+ Check constraints on the "notb00010.num_nomi" column
-#+
-#+ @param p_num_nomi - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00010_num_nomi_checkColumnConstraints(p_num_nomi)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_nomi LIKE notb00010.num_nomi
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00010_num_nomi_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00010_mes_checkColumnConstraints">}
-#+ Check constraints on the "notb00010.mes" column
-#+
-#+ @param p_mes - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00010_mes_checkColumnConstraints(p_mes)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mes LIKE notb00010.mes
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00010_mes_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00010_ano_checkColumnConstraints">}
-#+ Check constraints on the "notb00010.ano" column
-#+
-#+ @param p_ano - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00010_ano_checkColumnConstraints(p_ano)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ano LIKE notb00010.ano
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_ano IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- ano: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00010_ano_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00010_num_sem_checkColumnConstraints">}
-#+ Check constraints on the "notb00010.num_sem" column
-#+
-#+ @param p_num_sem - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00010_num_sem_checkColumnConstraints(p_num_sem)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_sem LIKE notb00010.num_sem
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00010_num_sem_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00010_fecha_del_checkColumnConstraints">}
-#+ Check constraints on the "notb00010.fecha_del" column
-#+
-#+ @param p_fecha_del - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00010_fecha_del_checkColumnConstraints(p_fecha_del)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_del LIKE notb00010.fecha_del
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00010_fecha_del_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00010_fecha_al_checkColumnConstraints">}
-#+ Check constraints on the "notb00010.fecha_al" column
-#+
-#+ @param p_fecha_al - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00010_fecha_al_checkColumnConstraints(p_fecha_al)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_al LIKE notb00010.fecha_al
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00010_fecha_al_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00010_status_t_checkColumnConstraints">}
-#+ Check constraints on the "notb00010.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00010_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE notb00010.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00010_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00010_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "notb00010.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00010_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE notb00010.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00010_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00010_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "notb00010.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00010_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE notb00010.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00010_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00010_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "notb00010.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00010_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE notb00010.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00010_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00010_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "notb00010.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00010_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE notb00010.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00010_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00010_fecha_cierre_nomina_checkColumnConstraints">}
-#+ Check constraints on the "notb00010.fecha_cierre_nomina" column
-#+
-#+ @param p_fecha_cierre_nomina - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00010_fecha_cierre_nomina_checkColumnConstraints(p_fecha_cierre_nomina)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_cierre_nomina LIKE notb00010.fecha_cierre_nomina
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00010_fecha_cierre_nomina_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00009_checkTableConstraints">}
-#+ Check constraints on the "notb00009" table
-#+
-#+ @param p_data - a row data LIKE notb00009.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00009_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE notb00009.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_notb00009_num_nomi_checkColumnConstraints(p_data.num_nomi) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00009_tipo_emp_checkColumnConstraints(p_data.tipo_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00009_cheque_no_checkColumnConstraints(p_data.cheque_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00009_num_emp_checkColumnConstraints(p_data.num_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00009_monto_checkColumnConstraints(p_data.monto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00009_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00009_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00009_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00009_checkTableConstraints
-
-{<BLOCK Name="fct.notb00009_num_nomi_checkColumnConstraints">}
-#+ Check constraints on the "notb00009.num_nomi" column
-#+
-#+ @param p_num_nomi - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00009_num_nomi_checkColumnConstraints(p_num_nomi)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_nomi LIKE notb00009.num_nomi
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00009_num_nomi_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00009_tipo_emp_checkColumnConstraints">}
-#+ Check constraints on the "notb00009.tipo_emp" column
-#+
-#+ @param p_tipo_emp - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00009_tipo_emp_checkColumnConstraints(p_tipo_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_emp LIKE notb00009.tipo_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00009_tipo_emp_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00009_cheque_no_checkColumnConstraints">}
-#+ Check constraints on the "notb00009.cheque_no" column
-#+
-#+ @param p_cheque_no - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00009_cheque_no_checkColumnConstraints(p_cheque_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cheque_no LIKE notb00009.cheque_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00009_cheque_no_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00009_num_emp_checkColumnConstraints">}
-#+ Check constraints on the "notb00009.num_emp" column
-#+
-#+ @param p_num_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00009_num_emp_checkColumnConstraints(p_num_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_emp LIKE notb00009.num_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00009_num_emp_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00009_monto_checkColumnConstraints">}
-#+ Check constraints on the "notb00009.monto" column
-#+
-#+ @param p_monto - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00009_monto_checkColumnConstraints(p_monto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_monto LIKE notb00009.monto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00009_monto_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00009_status_t_checkColumnConstraints">}
-#+ Check constraints on the "notb00009.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00009_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE notb00009.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00009_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00009_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "notb00009.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00009_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE notb00009.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00009_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00009_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "notb00009.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00009_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE notb00009.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00009_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00008_checkTableConstraints">}
-#+ Check constraints on the "notb00008" table
-#+
-#+ @param p_data - a row data LIKE notb00008.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00008_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE notb00008.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_notb00008_num_nomi_checkColumnConstraints(p_data.num_nomi) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00008_tipo_emp_checkColumnConstraints(p_data.tipo_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00008_num_emp_checkColumnConstraints(p_data.num_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00008_departamento_checkColumnConstraints(p_data.departamento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00008_nivel_emp_checkColumnConstraints(p_data.nivel_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00008_cod_puesto_checkColumnConstraints(p_data.cod_puesto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00008_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00008_cod_mov_checkColumnConstraints(p_data.cod_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00008_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00008_valor_checkColumnConstraints(p_data.valor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00008_clase_mov_checkColumnConstraints(p_data.clase_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00008_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00008_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00008_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00008_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00008_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00008_checkTableConstraints
-
-{<BLOCK Name="fct.notb00008_num_nomi_checkColumnConstraints">}
-#+ Check constraints on the "notb00008.num_nomi" column
-#+
-#+ @param p_num_nomi - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00008_num_nomi_checkColumnConstraints(p_num_nomi)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_nomi LIKE notb00008.num_nomi
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00008_num_nomi_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00008_tipo_emp_checkColumnConstraints">}
-#+ Check constraints on the "notb00008.tipo_emp" column
-#+
-#+ @param p_tipo_emp - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00008_tipo_emp_checkColumnConstraints(p_tipo_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_emp LIKE notb00008.tipo_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00008_tipo_emp_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00008_num_emp_checkColumnConstraints">}
-#+ Check constraints on the "notb00008.num_emp" column
-#+
-#+ @param p_num_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00008_num_emp_checkColumnConstraints(p_num_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_emp LIKE notb00008.num_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00008_num_emp_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00008_departamento_checkColumnConstraints">}
-#+ Check constraints on the "notb00008.departamento" column
-#+
-#+ @param p_departamento - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00008_departamento_checkColumnConstraints(p_departamento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_departamento LIKE notb00008.departamento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00008_departamento_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00008_nivel_emp_checkColumnConstraints">}
-#+ Check constraints on the "notb00008.nivel_emp" column
-#+
-#+ @param p_nivel_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00008_nivel_emp_checkColumnConstraints(p_nivel_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nivel_emp LIKE notb00008.nivel_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00008_nivel_emp_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00008_cod_puesto_checkColumnConstraints">}
-#+ Check constraints on the "notb00008.cod_puesto" column
-#+
-#+ @param p_cod_puesto - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00008_cod_puesto_checkColumnConstraints(p_cod_puesto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_puesto LIKE notb00008.cod_puesto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00008_cod_puesto_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00008_fecha_checkColumnConstraints">}
-#+ Check constraints on the "notb00008.fecha" column
-#+
-#+ @param p_fecha - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00008_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE notb00008.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00008_fecha_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00008_cod_mov_checkColumnConstraints">}
-#+ Check constraints on the "notb00008.cod_mov" column
-#+
-#+ @param p_cod_mov - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00008_cod_mov_checkColumnConstraints(p_cod_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mov LIKE notb00008.cod_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00008_cod_mov_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00008_cantidad_checkColumnConstraints">}
-#+ Check constraints on the "notb00008.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00008_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE notb00008.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00008_cantidad_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00008_valor_checkColumnConstraints">}
-#+ Check constraints on the "notb00008.valor" column
-#+
-#+ @param p_valor - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00008_valor_checkColumnConstraints(p_valor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valor LIKE notb00008.valor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00008_valor_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00008_clase_mov_checkColumnConstraints">}
-#+ Check constraints on the "notb00008.clase_mov" column
-#+
-#+ @param p_clase_mov - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00008_clase_mov_checkColumnConstraints(p_clase_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_clase_mov LIKE notb00008.clase_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00008_clase_mov_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00008_status_t_checkColumnConstraints">}
-#+ Check constraints on the "notb00008.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00008_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE notb00008.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00008_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00008_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "notb00008.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00008_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE notb00008.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00008_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00008_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "notb00008.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00008_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE notb00008.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00008_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00008_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "notb00008.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00008_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE notb00008.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00008_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00008_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "notb00008.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00008_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE notb00008.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00008_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00007_checkTableConstraints">}
-#+ Check constraints on the "notb00007" table
-#+
-#+ @param p_data - a row data LIKE notb00007.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00007_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE notb00007.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_notb00007_num_nomi_checkColumnConstraints(p_data.num_nomi) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00007_tipo_emp_checkColumnConstraints(p_data.tipo_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00007_num_emp_checkColumnConstraints(p_data.num_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00007_departamento_checkColumnConstraints(p_data.departamento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00007_nivel_emp_checkColumnConstraints(p_data.nivel_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00007_cod_puesto_checkColumnConstraints(p_data.cod_puesto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00007_cod_mov_checkColumnConstraints(p_data.cod_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00007_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00007_valor_checkColumnConstraints(p_data.valor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00007_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00007_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00007_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00007_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00007_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00007_checkTableConstraints
-
-{<BLOCK Name="fct.notb00007_num_nomi_checkColumnConstraints">}
-#+ Check constraints on the "notb00007.num_nomi" column
-#+
-#+ @param p_num_nomi - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00007_num_nomi_checkColumnConstraints(p_num_nomi)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_nomi LIKE notb00007.num_nomi
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00007_num_nomi_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00007_tipo_emp_checkColumnConstraints">}
-#+ Check constraints on the "notb00007.tipo_emp" column
-#+
-#+ @param p_tipo_emp - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00007_tipo_emp_checkColumnConstraints(p_tipo_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_emp LIKE notb00007.tipo_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00007_tipo_emp_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00007_num_emp_checkColumnConstraints">}
-#+ Check constraints on the "notb00007.num_emp" column
-#+
-#+ @param p_num_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00007_num_emp_checkColumnConstraints(p_num_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_emp LIKE notb00007.num_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00007_num_emp_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00007_departamento_checkColumnConstraints">}
-#+ Check constraints on the "notb00007.departamento" column
-#+
-#+ @param p_departamento - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00007_departamento_checkColumnConstraints(p_departamento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_departamento LIKE notb00007.departamento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00007_departamento_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00007_nivel_emp_checkColumnConstraints">}
-#+ Check constraints on the "notb00007.nivel_emp" column
-#+
-#+ @param p_nivel_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00007_nivel_emp_checkColumnConstraints(p_nivel_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nivel_emp LIKE notb00007.nivel_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00007_nivel_emp_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00007_cod_puesto_checkColumnConstraints">}
-#+ Check constraints on the "notb00007.cod_puesto" column
-#+
-#+ @param p_cod_puesto - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00007_cod_puesto_checkColumnConstraints(p_cod_puesto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_puesto LIKE notb00007.cod_puesto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00007_cod_puesto_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00007_cod_mov_checkColumnConstraints">}
-#+ Check constraints on the "notb00007.cod_mov" column
-#+
-#+ @param p_cod_mov - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00007_cod_mov_checkColumnConstraints(p_cod_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mov LIKE notb00007.cod_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00007_cod_mov_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00007_cantidad_checkColumnConstraints">}
-#+ Check constraints on the "notb00007.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00007_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE notb00007.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00007_cantidad_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00007_valor_checkColumnConstraints">}
-#+ Check constraints on the "notb00007.valor" column
-#+
-#+ @param p_valor - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00007_valor_checkColumnConstraints(p_valor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valor LIKE notb00007.valor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00007_valor_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00007_status_t_checkColumnConstraints">}
-#+ Check constraints on the "notb00007.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00007_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE notb00007.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00007_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00007_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "notb00007.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00007_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE notb00007.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00007_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00007_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "notb00007.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00007_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE notb00007.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00007_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00007_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "notb00007.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00007_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE notb00007.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00007_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00007_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "notb00007.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00007_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE notb00007.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00007_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00006_checkTableConstraints">}
-#+ Check constraints on the "notb00006" table
-#+
-#+ @param p_data - a row data LIKE notb00006.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00006_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE notb00006.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_notb00006_salario_sem_desde_checkColumnConstraints(p_data.salario_sem_desde) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00006_salario_sem_hasta_checkColumnConstraints(p_data.salario_sem_hasta) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00006_salario_men_desde_checkColumnConstraints(p_data.salario_men_desde) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00006_salario_men_hasta_checkColumnConstraints(p_data.salario_men_hasta) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00006_porc_emp_checkColumnConstraints(p_data.porc_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00006_porc_pat_checkColumnConstraints(p_data.porc_pat) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00006_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00006_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00006_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00006_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00006_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00006_checkTableConstraints
-
-{<BLOCK Name="fct.notb00006_salario_sem_desde_checkColumnConstraints">}
-#+ Check constraints on the "notb00006.salario_sem_desde" column
-#+
-#+ @param p_salario_sem_desde - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00006_salario_sem_desde_checkColumnConstraints(p_salario_sem_desde)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_salario_sem_desde LIKE notb00006.salario_sem_desde
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00006_salario_sem_desde_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00006_salario_sem_hasta_checkColumnConstraints">}
-#+ Check constraints on the "notb00006.salario_sem_hasta" column
-#+
-#+ @param p_salario_sem_hasta - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00006_salario_sem_hasta_checkColumnConstraints(p_salario_sem_hasta)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_salario_sem_hasta LIKE notb00006.salario_sem_hasta
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00006_salario_sem_hasta_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00006_salario_men_desde_checkColumnConstraints">}
-#+ Check constraints on the "notb00006.salario_men_desde" column
-#+
-#+ @param p_salario_men_desde - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00006_salario_men_desde_checkColumnConstraints(p_salario_men_desde)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_salario_men_desde LIKE notb00006.salario_men_desde
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00006_salario_men_desde_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00006_salario_men_hasta_checkColumnConstraints">}
-#+ Check constraints on the "notb00006.salario_men_hasta" column
-#+
-#+ @param p_salario_men_hasta - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00006_salario_men_hasta_checkColumnConstraints(p_salario_men_hasta)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_salario_men_hasta LIKE notb00006.salario_men_hasta
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00006_salario_men_hasta_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00006_porc_emp_checkColumnConstraints">}
-#+ Check constraints on the "notb00006.porc_emp" column
-#+
-#+ @param p_porc_emp - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00006_porc_emp_checkColumnConstraints(p_porc_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_porc_emp LIKE notb00006.porc_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00006_porc_emp_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00006_porc_pat_checkColumnConstraints">}
-#+ Check constraints on the "notb00006.porc_pat" column
-#+
-#+ @param p_porc_pat - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00006_porc_pat_checkColumnConstraints(p_porc_pat)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_porc_pat LIKE notb00006.porc_pat
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00006_porc_pat_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00006_status_t_checkColumnConstraints">}
-#+ Check constraints on the "notb00006.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00006_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE notb00006.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00006_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00006_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "notb00006.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00006_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE notb00006.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00006_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00006_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "notb00006.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00006_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE notb00006.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00006_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00006_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "notb00006.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00006_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE notb00006.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00006_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00006_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "notb00006.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00006_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE notb00006.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00006_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00005_checkTableConstraints">}
-#+ Check constraints on the "notb00005" table
-#+
-#+ @param p_data - a row data LIKE notb00005.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00005_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE notb00005.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_notb00005_salario_checkColumnConstraints(p_data.salario) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00005_valor_checkColumnConstraints(p_data.valor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00005_porc_imp_checkColumnConstraints(p_data.porc_imp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00005_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00005_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00005_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00005_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00005_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00005_checkTableConstraints
-
-{<BLOCK Name="fct.notb00005_salario_checkColumnConstraints">}
-#+ Check constraints on the "notb00005.salario" column
-#+
-#+ @param p_salario - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00005_salario_checkColumnConstraints(p_salario)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_salario LIKE notb00005.salario
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00005_salario_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00005_valor_checkColumnConstraints">}
-#+ Check constraints on the "notb00005.valor" column
-#+
-#+ @param p_valor - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00005_valor_checkColumnConstraints(p_valor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valor LIKE notb00005.valor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00005_valor_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00005_porc_imp_checkColumnConstraints">}
-#+ Check constraints on the "notb00005.porc_imp" column
-#+
-#+ @param p_porc_imp - DECIMAL(8,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00005_porc_imp_checkColumnConstraints(p_porc_imp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_porc_imp LIKE notb00005.porc_imp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00005_porc_imp_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00005_status_t_checkColumnConstraints">}
-#+ Check constraints on the "notb00005.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00005_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE notb00005.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00005_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00005_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "notb00005.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00005_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE notb00005.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00005_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00005_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "notb00005.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00005_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE notb00005.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00005_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00005_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "notb00005.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00005_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE notb00005.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00005_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00005_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "notb00005.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00005_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE notb00005.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00005_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00003_checkTableConstraints">}
-#+ Check constraints on the "notb00003" table
-#+
-#+ @param p_data - a row data LIKE notb00003.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00003_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE notb00003.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_notb00003_num_emp_checkColumnConstraints(p_data.num_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00003_departamento_checkColumnConstraints(p_data.departamento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00003_nivel_emp_checkColumnConstraints(p_data.nivel_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00003_cod_puesto_checkColumnConstraints(p_data.cod_puesto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00003_cod_mov_checkColumnConstraints(p_data.cod_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00003_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00003_valor_checkColumnConstraints(p_data.valor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00003_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00003_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00003_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00003_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00003_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- CALL smarmotech_dbxconstraints_notb00003_pk_notb00003_checkUniqueConstraint(p_forUpdate, p_data.num_emp, p_data.cod_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00003_checkTableConstraints
-
-{<BLOCK Name="fct.notb00003_pk_notb00003_checkUniqueConstraint">}
-#+ Check the primary key uniqueness constraint on the "notb00003"
-#+
-#+ @param p_key - Primary Key
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00003_pk_notb00003_checkUniqueConstraint(p_forUpdate, p_key)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_key
- RECORD
- notb00003_num_emp LIKE notb00003.num_emp,
- notb00003_cod_mov LIKE notb00003.cod_mov
- END RECORD
- DEFINE l_key
- RECORD
- notb00003_num_emp LIKE notb00003.num_emp,
- notb00003_cod_mov LIKE notb00003.cod_mov
- END RECORD
- DEFINE l_where STRING
- DEFINE l_sqlQuery STRING
- DEFINE l_count INTEGER
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- LET l_where = "WHERE notb00003.num_emp = ?
- AND notb00003.cod_mov = ? "
-
- let l_sqlQuery = "SELECT COUNT(*), num_emp, cod_mov FROM notb00003 ", l_where, " GROUP BY num_emp, cod_mov"
-
- PREPARE cur_notb00003_pk_notb00003_checkUniqueConstraint FROM l_sqlQuery
- EXECUTE cur_notb00003_pk_notb00003_checkUniqueConstraint INTO l_count, l_key.* USING p_key.*
- FREE cur_notb00003_pk_notb00003_checkUniqueConstraint
- IF (NOT p_forUpdate AND l_count > 0) OR (p_forUpdate AND l_count > 0 AND p_key.* != l_key.*) THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- num_emp + cod_mov: " || ERROR_BAM_00002) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00003_pk_notb00003_checkUniqueConstraint
-
-{<BLOCK Name="fct.notb00003_num_emp_checkColumnConstraints">}
-#+ Check constraints on the "notb00003.num_emp" column
-#+
-#+ @param p_num_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00003_num_emp_checkColumnConstraints(p_num_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_emp LIKE notb00003.num_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_num_emp IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- num_emp: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00003_num_emp_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00003_departamento_checkColumnConstraints">}
-#+ Check constraints on the "notb00003.departamento" column
-#+
-#+ @param p_departamento - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00003_departamento_checkColumnConstraints(p_departamento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_departamento LIKE notb00003.departamento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00003_departamento_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00003_nivel_emp_checkColumnConstraints">}
-#+ Check constraints on the "notb00003.nivel_emp" column
-#+
-#+ @param p_nivel_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00003_nivel_emp_checkColumnConstraints(p_nivel_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nivel_emp LIKE notb00003.nivel_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00003_nivel_emp_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00003_cod_puesto_checkColumnConstraints">}
-#+ Check constraints on the "notb00003.cod_puesto" column
-#+
-#+ @param p_cod_puesto - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00003_cod_puesto_checkColumnConstraints(p_cod_puesto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_puesto LIKE notb00003.cod_puesto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00003_cod_puesto_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00003_cod_mov_checkColumnConstraints">}
-#+ Check constraints on the "notb00003.cod_mov" column
-#+
-#+ @param p_cod_mov - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00003_cod_mov_checkColumnConstraints(p_cod_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mov LIKE notb00003.cod_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_mov IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_mov: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00003_cod_mov_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00003_cantidad_checkColumnConstraints">}
-#+ Check constraints on the "notb00003.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00003_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE notb00003.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00003_cantidad_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00003_valor_checkColumnConstraints">}
-#+ Check constraints on the "notb00003.valor" column
-#+
-#+ @param p_valor - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00003_valor_checkColumnConstraints(p_valor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valor LIKE notb00003.valor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00003_valor_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00003_status_t_checkColumnConstraints">}
-#+ Check constraints on the "notb00003.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00003_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE notb00003.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00003_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00003_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "notb00003.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00003_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE notb00003.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00003_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00003_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "notb00003.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00003_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE notb00003.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00003_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00003_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "notb00003.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00003_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE notb00003.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00003_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00003_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "notb00003.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00003_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE notb00003.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00003_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00002_checkTableConstraints">}
-#+ Check constraints on the "notb00002" table
-#+
-#+ @param p_data - a row data LIKE notb00002.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00002_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE notb00002.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_notb00002_cod_mov_checkColumnConstraints(p_data.cod_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00002_descrip_mov_checkColumnConstraints(p_data.descrip_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00002_primer_enc_checkColumnConstraints(p_data.primer_enc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00002_segundo_enc_checkColumnConstraints(p_data.segundo_enc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00002_tercer_enc_checkColumnConstraints(p_data.tercer_enc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00002_ch_encabeza_checkColumnConstraints(p_data.ch_encabeza) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00002_tipo_mov_checkColumnConstraints(p_data.tipo_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00002_clase_mov_checkColumnConstraints(p_data.clase_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00002_cantidad_cia_checkColumnConstraints(p_data.cantidad_cia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00002_cantidad_emp_checkColumnConstraints(p_data.cantidad_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00002_cta_control_checkColumnConstraints(p_data.cta_control) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00002_cta_aux_checkColumnConstraints(p_data.cta_aux) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00002_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00002_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00002_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00002_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00002_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00002_checkTableConstraints
-
-{<BLOCK Name="fct.notb00002_cod_mov_checkColumnConstraints">}
-#+ Check constraints on the "notb00002.cod_mov" column
-#+
-#+ @param p_cod_mov - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00002_cod_mov_checkColumnConstraints(p_cod_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mov LIKE notb00002.cod_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00002_cod_mov_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00002_descrip_mov_checkColumnConstraints">}
-#+ Check constraints on the "notb00002.descrip_mov" column
-#+
-#+ @param p_descrip_mov - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00002_descrip_mov_checkColumnConstraints(p_descrip_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descrip_mov LIKE notb00002.descrip_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00002_descrip_mov_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00002_primer_enc_checkColumnConstraints">}
-#+ Check constraints on the "notb00002.primer_enc" column
-#+
-#+ @param p_primer_enc - CHAR(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00002_primer_enc_checkColumnConstraints(p_primer_enc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_primer_enc LIKE notb00002.primer_enc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00002_primer_enc_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00002_segundo_enc_checkColumnConstraints">}
-#+ Check constraints on the "notb00002.segundo_enc" column
-#+
-#+ @param p_segundo_enc - CHAR(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00002_segundo_enc_checkColumnConstraints(p_segundo_enc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_segundo_enc LIKE notb00002.segundo_enc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00002_segundo_enc_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00002_tercer_enc_checkColumnConstraints">}
-#+ Check constraints on the "notb00002.tercer_enc" column
-#+
-#+ @param p_tercer_enc - CHAR(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00002_tercer_enc_checkColumnConstraints(p_tercer_enc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tercer_enc LIKE notb00002.tercer_enc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00002_tercer_enc_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00002_ch_encabeza_checkColumnConstraints">}
-#+ Check constraints on the "notb00002.ch_encabeza" column
-#+
-#+ @param p_ch_encabeza - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00002_ch_encabeza_checkColumnConstraints(p_ch_encabeza)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ch_encabeza LIKE notb00002.ch_encabeza
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00002_ch_encabeza_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00002_tipo_mov_checkColumnConstraints">}
-#+ Check constraints on the "notb00002.tipo_mov" column
-#+
-#+ @param p_tipo_mov - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00002_tipo_mov_checkColumnConstraints(p_tipo_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_mov LIKE notb00002.tipo_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00002_tipo_mov_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00002_clase_mov_checkColumnConstraints">}
-#+ Check constraints on the "notb00002.clase_mov" column
-#+
-#+ @param p_clase_mov - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00002_clase_mov_checkColumnConstraints(p_clase_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_clase_mov LIKE notb00002.clase_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00002_clase_mov_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00002_cantidad_cia_checkColumnConstraints">}
-#+ Check constraints on the "notb00002.cantidad_cia" column
-#+
-#+ @param p_cantidad_cia - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00002_cantidad_cia_checkColumnConstraints(p_cantidad_cia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad_cia LIKE notb00002.cantidad_cia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00002_cantidad_cia_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00002_cantidad_emp_checkColumnConstraints">}
-#+ Check constraints on the "notb00002.cantidad_emp" column
-#+
-#+ @param p_cantidad_emp - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00002_cantidad_emp_checkColumnConstraints(p_cantidad_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad_emp LIKE notb00002.cantidad_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00002_cantidad_emp_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00002_cta_control_checkColumnConstraints">}
-#+ Check constraints on the "notb00002.cta_control" column
-#+
-#+ @param p_cta_control - CHAR(6) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00002_cta_control_checkColumnConstraints(p_cta_control)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cta_control LIKE notb00002.cta_control
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00002_cta_control_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00002_cta_aux_checkColumnConstraints">}
-#+ Check constraints on the "notb00002.cta_aux" column
-#+
-#+ @param p_cta_aux - CHAR(7) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00002_cta_aux_checkColumnConstraints(p_cta_aux)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cta_aux LIKE notb00002.cta_aux
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00002_cta_aux_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00002_status_t_checkColumnConstraints">}
-#+ Check constraints on the "notb00002.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00002_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE notb00002.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00002_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00002_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "notb00002.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00002_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE notb00002.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00002_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00002_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "notb00002.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00002_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE notb00002.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00002_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00002_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "notb00002.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00002_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE notb00002.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00002_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00002_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "notb00002.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00002_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE notb00002.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00002_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00001_checkTableConstraints">}
-#+ Check constraints on the "notb00001" table
-#+
-#+ @param p_data - a row data LIKE notb00001.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00001_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE notb00001.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_notb00001_ult_cheque_checkColumnConstraints(p_data.ult_cheque) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00001_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_notb00001_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00001_checkTableConstraints
-
-{<BLOCK Name="fct.notb00001_ult_cheque_checkColumnConstraints">}
-#+ Check constraints on the "notb00001.ult_cheque" column
-#+
-#+ @param p_ult_cheque - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00001_ult_cheque_checkColumnConstraints(p_ult_cheque)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ult_cheque LIKE notb00001.ult_cheque
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00001_ult_cheque_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00001_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "notb00001.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00001_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE notb00001.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00001_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.notb00001_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "notb00001.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_notb00001_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE notb00001.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.notb00001_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.nc_checkTableConstraints">}
-#+ Check constraints on the "nc" table
-#+
-#+ @param p_data - a row data LIKE nc.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_nc_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE nc.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_nc_cuenta_no_checkColumnConstraints(p_data.cuenta_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_nc_cod_cia_checkColumnConstraints(p_data.cod_cia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_nc_tipo_doc_checkColumnConstraints(p_data.tipo_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_nc_num_doc_checkColumnConstraints(p_data.num_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_nc_tipo_cliente_checkColumnConstraints(p_data.tipo_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_nc_sec_cliente_checkColumnConstraints(p_data.sec_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_nc_cod_emp_checkColumnConstraints(p_data.cod_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_nc_cod_emp_sec_checkColumnConstraints(p_data.cod_emp_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_nc_fecha_orig_checkColumnConstraints(p_data.fecha_orig) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_nc_fecha_ven_checkColumnConstraints(p_data.fecha_ven) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_nc_aplica_a_checkColumnConstraints(p_data.aplica_a) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_nc_banco_checkColumnConstraints(p_data.banco) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_nc_num_cheque_checkColumnConstraints(p_data.num_cheque) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_nc_valor_checkColumnConstraints(p_data.valor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_nc_valor_efectivo_checkColumnConstraints(p_data.valor_efectivo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_nc_valor_cheque_checkColumnConstraints(p_data.valor_cheque) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_nc_costo_checkColumnConstraints(p_data.costo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_nc_monto_desc_checkColumnConstraints(p_data.monto_desc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_nc_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_nc_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_nc_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_nc_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_nc_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.nc_checkTableConstraints
-
-{<BLOCK Name="fct.nc_cuenta_no_checkColumnConstraints">}
-#+ Check constraints on the "nc.cuenta_no" column
-#+
-#+ @param p_cuenta_no - CHAR(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_nc_cuenta_no_checkColumnConstraints(p_cuenta_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cuenta_no LIKE nc.cuenta_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.nc_cuenta_no_checkColumnConstraints
-
-{<BLOCK Name="fct.nc_cod_cia_checkColumnConstraints">}
-#+ Check constraints on the "nc.cod_cia" column
-#+
-#+ @param p_cod_cia - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_nc_cod_cia_checkColumnConstraints(p_cod_cia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_cia LIKE nc.cod_cia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.nc_cod_cia_checkColumnConstraints
-
-{<BLOCK Name="fct.nc_tipo_doc_checkColumnConstraints">}
-#+ Check constraints on the "nc.tipo_doc" column
-#+
-#+ @param p_tipo_doc - CHAR(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_nc_tipo_doc_checkColumnConstraints(p_tipo_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_doc LIKE nc.tipo_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.nc_tipo_doc_checkColumnConstraints
-
-{<BLOCK Name="fct.nc_num_doc_checkColumnConstraints">}
-#+ Check constraints on the "nc.num_doc" column
-#+
-#+ @param p_num_doc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_nc_num_doc_checkColumnConstraints(p_num_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_doc LIKE nc.num_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_num_doc IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- num_doc: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.nc_num_doc_checkColumnConstraints
-
-{<BLOCK Name="fct.nc_tipo_cliente_checkColumnConstraints">}
-#+ Check constraints on the "nc.tipo_cliente" column
-#+
-#+ @param p_tipo_cliente - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_nc_tipo_cliente_checkColumnConstraints(p_tipo_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_cliente LIKE nc.tipo_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.nc_tipo_cliente_checkColumnConstraints
-
-{<BLOCK Name="fct.nc_sec_cliente_checkColumnConstraints">}
-#+ Check constraints on the "nc.sec_cliente" column
-#+
-#+ @param p_sec_cliente - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_nc_sec_cliente_checkColumnConstraints(p_sec_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_cliente LIKE nc.sec_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.nc_sec_cliente_checkColumnConstraints
-
-{<BLOCK Name="fct.nc_cod_emp_checkColumnConstraints">}
-#+ Check constraints on the "nc.cod_emp" column
-#+
-#+ @param p_cod_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_nc_cod_emp_checkColumnConstraints(p_cod_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_emp LIKE nc.cod_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.nc_cod_emp_checkColumnConstraints
-
-{<BLOCK Name="fct.nc_cod_emp_sec_checkColumnConstraints">}
-#+ Check constraints on the "nc.cod_emp_sec" column
-#+
-#+ @param p_cod_emp_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_nc_cod_emp_sec_checkColumnConstraints(p_cod_emp_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_emp_sec LIKE nc.cod_emp_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.nc_cod_emp_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.nc_fecha_orig_checkColumnConstraints">}
-#+ Check constraints on the "nc.fecha_orig" column
-#+
-#+ @param p_fecha_orig - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_nc_fecha_orig_checkColumnConstraints(p_fecha_orig)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_orig LIKE nc.fecha_orig
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.nc_fecha_orig_checkColumnConstraints
-
-{<BLOCK Name="fct.nc_fecha_ven_checkColumnConstraints">}
-#+ Check constraints on the "nc.fecha_ven" column
-#+
-#+ @param p_fecha_ven - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_nc_fecha_ven_checkColumnConstraints(p_fecha_ven)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_ven LIKE nc.fecha_ven
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.nc_fecha_ven_checkColumnConstraints
-
-{<BLOCK Name="fct.nc_aplica_a_checkColumnConstraints">}
-#+ Check constraints on the "nc.aplica_a" column
-#+
-#+ @param p_aplica_a - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_nc_aplica_a_checkColumnConstraints(p_aplica_a)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_aplica_a LIKE nc.aplica_a
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.nc_aplica_a_checkColumnConstraints
-
-{<BLOCK Name="fct.nc_banco_checkColumnConstraints">}
-#+ Check constraints on the "nc.banco" column
-#+
-#+ @param p_banco - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_nc_banco_checkColumnConstraints(p_banco)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_banco LIKE nc.banco
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.nc_banco_checkColumnConstraints
-
-{<BLOCK Name="fct.nc_num_cheque_checkColumnConstraints">}
-#+ Check constraints on the "nc.num_cheque" column
-#+
-#+ @param p_num_cheque - CHAR(12) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_nc_num_cheque_checkColumnConstraints(p_num_cheque)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_cheque LIKE nc.num_cheque
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.nc_num_cheque_checkColumnConstraints
-
-{<BLOCK Name="fct.nc_valor_checkColumnConstraints">}
-#+ Check constraints on the "nc.valor" column
-#+
-#+ @param p_valor - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_nc_valor_checkColumnConstraints(p_valor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valor LIKE nc.valor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_valor IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- valor: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.nc_valor_checkColumnConstraints
-
-{<BLOCK Name="fct.nc_valor_efectivo_checkColumnConstraints">}
-#+ Check constraints on the "nc.valor_efectivo" column
-#+
-#+ @param p_valor_efectivo - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_nc_valor_efectivo_checkColumnConstraints(p_valor_efectivo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valor_efectivo LIKE nc.valor_efectivo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.nc_valor_efectivo_checkColumnConstraints
-
-{<BLOCK Name="fct.nc_valor_cheque_checkColumnConstraints">}
-#+ Check constraints on the "nc.valor_cheque" column
-#+
-#+ @param p_valor_cheque - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_nc_valor_cheque_checkColumnConstraints(p_valor_cheque)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valor_cheque LIKE nc.valor_cheque
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.nc_valor_cheque_checkColumnConstraints
-
-{<BLOCK Name="fct.nc_costo_checkColumnConstraints">}
-#+ Check constraints on the "nc.costo" column
-#+
-#+ @param p_costo - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_nc_costo_checkColumnConstraints(p_costo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_costo LIKE nc.costo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.nc_costo_checkColumnConstraints
-
-{<BLOCK Name="fct.nc_monto_desc_checkColumnConstraints">}
-#+ Check constraints on the "nc.monto_desc" column
-#+
-#+ @param p_monto_desc - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_nc_monto_desc_checkColumnConstraints(p_monto_desc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_monto_desc LIKE nc.monto_desc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.nc_monto_desc_checkColumnConstraints
-
-{<BLOCK Name="fct.nc_status_t_checkColumnConstraints">}
-#+ Check constraints on the "nc.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_nc_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE nc.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.nc_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.nc_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "nc.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_nc_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE nc.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.nc_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.nc_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "nc.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_nc_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE nc.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.nc_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.nc_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "nc.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_nc_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE nc.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.nc_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.nc_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "nc.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_nc_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE nc.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.nc_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.msgtable_checkTableConstraints">}
-#+ Check constraints on the "msgtable" table
-#+
-#+ @param p_data - a row data LIKE msgtable.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_msgtable_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE msgtable.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_msgtable_cod_msg_checkColumnConstraints(p_data.cod_msg) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_msgtable_desc_msg_checkColumnConstraints(p_data.desc_msg) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_msgtable_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_msgtable_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_msgtable_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_msgtable_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.msgtable_checkTableConstraints
-
-{<BLOCK Name="fct.msgtable_cod_msg_checkColumnConstraints">}
-#+ Check constraints on the "msgtable.cod_msg" column
-#+
-#+ @param p_cod_msg - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_msgtable_cod_msg_checkColumnConstraints(p_cod_msg)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_msg LIKE msgtable.cod_msg
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.msgtable_cod_msg_checkColumnConstraints
-
-{<BLOCK Name="fct.msgtable_desc_msg_checkColumnConstraints">}
-#+ Check constraints on the "msgtable.desc_msg" column
-#+
-#+ @param p_desc_msg - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_msgtable_desc_msg_checkColumnConstraints(p_desc_msg)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_desc_msg LIKE msgtable.desc_msg
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.msgtable_desc_msg_checkColumnConstraints
-
-{<BLOCK Name="fct.msgtable_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "msgtable.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_msgtable_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE msgtable.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.msgtable_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.msgtable_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "msgtable.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_msgtable_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE msgtable.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.msgtable_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.msgtable_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "msgtable.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_msgtable_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE msgtable.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.msgtable_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.msgtable_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "msgtable.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_msgtable_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE msgtable.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.msgtable_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.molduras23_checkTableConstraints">}
-#+ Check constraints on the "molduras23" table
-#+
-#+ @param p_data - a row data LIKE molduras23.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_molduras23_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE molduras23.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_molduras23_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_molduras23_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_molduras23_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_molduras23_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.molduras23_checkTableConstraints
-
-{<BLOCK Name="fct.molduras23_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "molduras23.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_molduras23_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE molduras23.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.molduras23_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.molduras23_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "molduras23.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_molduras23_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE molduras23.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.molduras23_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.molduras23_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "molduras23.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_molduras23_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE molduras23.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.molduras23_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.molduras23_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "molduras23.cod_sec" column
-#+
-#+ @param p_cod_sec - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_molduras23_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE molduras23.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.molduras23_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.mestable_checkTableConstraints">}
-#+ Check constraints on the "mestable" table
-#+
-#+ @param p_data - a row data LIKE mestable.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_mestable_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE mestable.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_mestable_mes_checkColumnConstraints(p_data.mes) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_mestable_descrip_checkColumnConstraints(p_data.descrip) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_mestable_dias_prod_checkColumnConstraints(p_data.dias_prod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_mestable_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_mestable_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_mestable_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_mestable_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_mestable_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.mestable_checkTableConstraints
-
-{<BLOCK Name="fct.mestable_mes_checkColumnConstraints">}
-#+ Check constraints on the "mestable.mes" column
-#+
-#+ @param p_mes - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_mestable_mes_checkColumnConstraints(p_mes)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mes LIKE mestable.mes
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.mestable_mes_checkColumnConstraints
-
-{<BLOCK Name="fct.mestable_descrip_checkColumnConstraints">}
-#+ Check constraints on the "mestable.descrip" column
-#+
-#+ @param p_descrip - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_mestable_descrip_checkColumnConstraints(p_descrip)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descrip LIKE mestable.descrip
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.mestable_descrip_checkColumnConstraints
-
-{<BLOCK Name="fct.mestable_dias_prod_checkColumnConstraints">}
-#+ Check constraints on the "mestable.dias_prod" column
-#+
-#+ @param p_dias_prod - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_mestable_dias_prod_checkColumnConstraints(p_dias_prod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_dias_prod LIKE mestable.dias_prod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.mestable_dias_prod_checkColumnConstraints
-
-{<BLOCK Name="fct.mestable_status_t_checkColumnConstraints">}
-#+ Check constraints on the "mestable.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_mestable_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE mestable.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.mestable_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.mestable_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "mestable.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_mestable_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE mestable.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.mestable_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.mestable_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "mestable.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_mestable_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE mestable.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.mestable_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.mestable_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "mestable.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_mestable_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE mestable.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.mestable_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.mestable_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "mestable.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_mestable_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE mestable.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.mestable_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.marzo$_checkTableConstraints">}
-#+ Check constraints on the "marzo$" table
-#+
-#+ @param p_data - a row data LIKE marzo$.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_marzo$_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE marzo$.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_marzo$_mes_checkColumnConstraints(p_data.mes) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_marzo$_ano_checkColumnConstraints(p_data.ano) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_marzo$_codprod_checkColumnConstraints(p_data.codprod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_marzo$_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.marzo$_checkTableConstraints
-
-{<BLOCK Name="fct.marzo$_mes_checkColumnConstraints">}
-#+ Check constraints on the "marzo$.mes" column
-#+
-#+ @param p_mes - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_marzo$_mes_checkColumnConstraints(p_mes)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mes LIKE marzo$.mes
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.marzo$_mes_checkColumnConstraints
-
-{<BLOCK Name="fct.marzo$_ano_checkColumnConstraints">}
-#+ Check constraints on the "marzo$.ano" column
-#+
-#+ @param p_ano - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_marzo$_ano_checkColumnConstraints(p_ano)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ano LIKE marzo$.ano
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.marzo$_ano_checkColumnConstraints
-
-{<BLOCK Name="fct.marzo$_codprod_checkColumnConstraints">}
-#+ Check constraints on the "marzo$.codprod" column
-#+
-#+ @param p_codprod - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_marzo$_codprod_checkColumnConstraints(p_codprod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codprod LIKE marzo$.codprod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.marzo$_codprod_checkColumnConstraints
-
-{<BLOCK Name="fct.marzo$_cantidad_checkColumnConstraints">}
-#+ Check constraints on the "marzo$.cantidad" column
-#+
-#+ @param p_cantidad - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_marzo$_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE marzo$.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.marzo$_cantidad_checkColumnConstraints
-
-{<BLOCK Name="fct.mallas9_checkTableConstraints">}
-#+ Check constraints on the "mallas9" table
-#+
-#+ @param p_data - a row data LIKE mallas9.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_mallas9_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE mallas9.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_mallas9_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_mallas9_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_mallas9_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_mallas9_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.mallas9_checkTableConstraints
-
-{<BLOCK Name="fct.mallas9_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "mallas9.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_mallas9_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE mallas9.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.mallas9_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.mallas9_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "mallas9.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_mallas9_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE mallas9.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.mallas9_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.mallas9_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "mallas9.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_mallas9_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE mallas9.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.mallas9_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.mallas9_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "mallas9.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_mallas9_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE mallas9.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.mallas9_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.localizacion_checkTableConstraints">}
-#+ Check constraints on the "localizacion" table
-#+
-#+ @param p_data - a row data LIKE localizacion.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_localizacion_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE localizacion.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_localizacion_sucid_checkColumnConstraints(p_data.sucid) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_localizacion_locid_checkColumnConstraints(p_data.locid) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_localizacion_locdescripcion_checkColumnConstraints(p_data.locdescripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.localizacion_checkTableConstraints
-
-{<BLOCK Name="fct.localizacion_sucid_checkColumnConstraints">}
-#+ Check constraints on the "localizacion.sucid" column
-#+
-#+ @param p_sucid - VARCHAR2(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_localizacion_sucid_checkColumnConstraints(p_sucid)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sucid LIKE localizacion.sucid
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_sucid IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- sucid: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.localizacion_sucid_checkColumnConstraints
-
-{<BLOCK Name="fct.localizacion_locid_checkColumnConstraints">}
-#+ Check constraints on the "localizacion.locid" column
-#+
-#+ @param p_locid - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_localizacion_locid_checkColumnConstraints(p_locid)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_locid LIKE localizacion.locid
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_locid IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- locid: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.localizacion_locid_checkColumnConstraints
-
-{<BLOCK Name="fct.localizacion_locdescripcion_checkColumnConstraints">}
-#+ Check constraints on the "localizacion.locdescripcion" column
-#+
-#+ @param p_locdescripcion - VARCHAR2(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_localizacion_locdescripcion_checkColumnConstraints(p_locdescripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_locdescripcion LIKE localizacion.locdescripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_locdescripcion IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- locdescripcion: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.localizacion_locdescripcion_checkColumnConstraints
-
-{<BLOCK Name="fct.listaprecio_checkTableConstraints">}
-#+ Check constraints on the "listaprecio" table
-#+
-#+ @param p_data - a row data LIKE listaprecio.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_listaprecio_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE listaprecio.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_listaprecio_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_listaprecio_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_listaprecio_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_listaprecio_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_listaprecio_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_listaprecio_costo_prima_checkColumnConstraints(p_data.costo_prima) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_listaprecio_costo_rd_checkColumnConstraints(p_data.costo_rd) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_listaprecio_costo_estand_checkColumnConstraints(p_data.costo_estand) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_listaprecio_dif_costo_estand_checkColumnConstraints(p_data.dif_costo_estand) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.listaprecio_checkTableConstraints
-
-{<BLOCK Name="fct.listaprecio_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "listaprecio.cod_n" column
-#+
-#+ @param p_cod_n - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_listaprecio_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE listaprecio.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.listaprecio_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.listaprecio_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "listaprecio.cod_grupo" column
-#+
-#+ @param p_cod_grupo - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_listaprecio_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE listaprecio.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.listaprecio_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.listaprecio_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "listaprecio.cod_tipo" column
-#+
-#+ @param p_cod_tipo - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_listaprecio_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE listaprecio.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.listaprecio_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.listaprecio_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "listaprecio.cod_sec" column
-#+
-#+ @param p_cod_sec - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_listaprecio_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE listaprecio.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.listaprecio_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.listaprecio_descripcion_checkColumnConstraints">}
-#+ Check constraints on the "listaprecio.descripcion" column
-#+
-#+ @param p_descripcion - VARCHAR2(255) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_listaprecio_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE listaprecio.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.listaprecio_descripcion_checkColumnConstraints
-
-{<BLOCK Name="fct.listaprecio_costo_prima_checkColumnConstraints">}
-#+ Check constraints on the "listaprecio.costo_prima" column
-#+
-#+ @param p_costo_prima - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_listaprecio_costo_prima_checkColumnConstraints(p_costo_prima)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_costo_prima LIKE listaprecio.costo_prima
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.listaprecio_costo_prima_checkColumnConstraints
-
-{<BLOCK Name="fct.listaprecio_costo_rd_checkColumnConstraints">}
-#+ Check constraints on the "listaprecio.costo_rd" column
-#+
-#+ @param p_costo_rd - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_listaprecio_costo_rd_checkColumnConstraints(p_costo_rd)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_costo_rd LIKE listaprecio.costo_rd
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.listaprecio_costo_rd_checkColumnConstraints
-
-{<BLOCK Name="fct.listaprecio_costo_estand_checkColumnConstraints">}
-#+ Check constraints on the "listaprecio.costo_estand" column
-#+
-#+ @param p_costo_estand - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_listaprecio_costo_estand_checkColumnConstraints(p_costo_estand)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_costo_estand LIKE listaprecio.costo_estand
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.listaprecio_costo_estand_checkColumnConstraints
-
-{<BLOCK Name="fct.listaprecio_dif_costo_estand_checkColumnConstraints">}
-#+ Check constraints on the "listaprecio.dif_costo_estand" column
-#+
-#+ @param p_dif_costo_estand - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_listaprecio_dif_costo_estand_checkColumnConstraints(p_dif_costo_estand)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_dif_costo_estand LIKE listaprecio.dif_costo_estand
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.listaprecio_dif_costo_estand_checkColumnConstraints
-
-{<BLOCK Name="fct.lineitem_checkTableConstraints">}
-#+ Check constraints on the "lineitem" table
-#+
-#+ @param p_data - a row data LIKE lineitem.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_lineitem_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE lineitem.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_lineitem_orderid_checkColumnConstraints(p_data.orderid) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_lineitem_linenum_checkColumnConstraints(p_data.linenum) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_lineitem_itemid_checkColumnConstraints(p_data.itemid) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_lineitem_quantity_checkColumnConstraints(p_data.quantity) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_lineitem_unitprice_checkColumnConstraints(p_data.unitprice) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.lineitem_checkTableConstraints
-
-{<BLOCK Name="fct.lineitem_orderid_checkColumnConstraints">}
-#+ Check constraints on the "lineitem.orderid" column
-#+
-#+ @param p_orderid - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_lineitem_orderid_checkColumnConstraints(p_orderid)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_orderid LIKE lineitem.orderid
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_orderid IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- orderid: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.lineitem_orderid_checkColumnConstraints
-
-{<BLOCK Name="fct.lineitem_linenum_checkColumnConstraints">}
-#+ Check constraints on the "lineitem.linenum" column
-#+
-#+ @param p_linenum - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_lineitem_linenum_checkColumnConstraints(p_linenum)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_linenum LIKE lineitem.linenum
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_linenum IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- linenum: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.lineitem_linenum_checkColumnConstraints
-
-{<BLOCK Name="fct.lineitem_itemid_checkColumnConstraints">}
-#+ Check constraints on the "lineitem.itemid" column
-#+
-#+ @param p_itemid - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_lineitem_itemid_checkColumnConstraints(p_itemid)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_itemid LIKE lineitem.itemid
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_itemid IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- itemid: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.lineitem_itemid_checkColumnConstraints
-
-{<BLOCK Name="fct.lineitem_quantity_checkColumnConstraints">}
-#+ Check constraints on the "lineitem.quantity" column
-#+
-#+ @param p_quantity - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_lineitem_quantity_checkColumnConstraints(p_quantity)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_quantity LIKE lineitem.quantity
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_quantity IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- quantity: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.lineitem_quantity_checkColumnConstraints
-
-{<BLOCK Name="fct.lineitem_unitprice_checkColumnConstraints">}
-#+ Check constraints on the "lineitem.unitprice" column
-#+
-#+ @param p_unitprice - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_lineitem_unitprice_checkColumnConstraints(p_unitprice)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_unitprice LIKE lineitem.unitprice
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_unitprice IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- unitprice: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.lineitem_unitprice_checkColumnConstraints
-
-{<BLOCK Name="fct.lajas2$_checkTableConstraints">}
-#+ Check constraints on the "lajas2$" table
-#+
-#+ @param p_data - a row data LIKE lajas2$.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_lajas2$_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE lajas2$.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_lajas2$_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_lajas2$_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_lajas2$_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_lajas2$_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.lajas2$_checkTableConstraints
-
-{<BLOCK Name="fct.lajas2$_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "lajas2$.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_lajas2$_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE lajas2$.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.lajas2$_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.lajas2$_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "lajas2$.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_lajas2$_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE lajas2$.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.lajas2$_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.lajas2$_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "lajas2$.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_lajas2$_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE lajas2$.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.lajas2$_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.lajas2$_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "lajas2$.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_lajas2$_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE lajas2$.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.lajas2$_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.lajas2_checkTableConstraints">}
-#+ Check constraints on the "lajas2" table
-#+
-#+ @param p_data - a row data LIKE lajas2.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_lajas2_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE lajas2.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_lajas2_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_lajas2_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_lajas2_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_lajas2_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.lajas2_checkTableConstraints
-
-{<BLOCK Name="fct.lajas2_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "lajas2.cod_n" column
-#+
-#+ @param p_cod_n - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_lajas2_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE lajas2.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.lajas2_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.lajas2_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "lajas2.cod_grupo" column
-#+
-#+ @param p_cod_grupo - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_lajas2_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE lajas2.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.lajas2_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.lajas2_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "lajas2.cod_tipo" column
-#+
-#+ @param p_cod_tipo - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_lajas2_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE lajas2.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.lajas2_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.lajas2_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "lajas2.cod_sec" column
-#+
-#+ @param p_cod_sec - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_lajas2_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE lajas2.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.lajas2_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.lajas14_checkTableConstraints">}
-#+ Check constraints on the "lajas14" table
-#+
-#+ @param p_data - a row data LIKE lajas14.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_lajas14_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE lajas14.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_lajas14_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_lajas14_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_lajas14_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_lajas14_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.lajas14_checkTableConstraints
-
-{<BLOCK Name="fct.lajas14_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "lajas14.cod_n" column
-#+
-#+ @param p_cod_n - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_lajas14_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE lajas14.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.lajas14_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.lajas14_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "lajas14.cod_grupo" column
-#+
-#+ @param p_cod_grupo - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_lajas14_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE lajas14.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.lajas14_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.lajas14_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "lajas14.cod_tipo" column
-#+
-#+ @param p_cod_tipo - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_lajas14_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE lajas14.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.lajas14_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.lajas14_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "lajas14.cod_sec" column
-#+
-#+ @param p_cod_sec - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_lajas14_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE lajas14.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.lajas14_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.lajas_checkTableConstraints">}
-#+ Check constraints on the "lajas" table
-#+
-#+ @param p_data - a row data LIKE lajas.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_lajas_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE lajas.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_lajas_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_lajas_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_lajas_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_lajas_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.lajas_checkTableConstraints
-
-{<BLOCK Name="fct.lajas_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "lajas.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_lajas_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE lajas.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.lajas_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.lajas_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "lajas.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_lajas_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE lajas.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.lajas_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.lajas_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "lajas.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_lajas_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE lajas.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.lajas_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.lajas_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "lajas.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_lajas_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE lajas.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.lajas_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.item_checkTableConstraints">}
-#+ Check constraints on the "item" table
-#+
-#+ @param p_data - a row data LIKE item.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_item_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE item.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_item_itemid_checkColumnConstraints(p_data.itemid) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_item_productid_checkColumnConstraints(p_data.productid) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_item_listprice_checkColumnConstraints(p_data.listprice) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_item_unitcost_checkColumnConstraints(p_data.unitcost) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_item_supplier_checkColumnConstraints(p_data.supplier) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_item_status_checkColumnConstraints(p_data.status) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_item_attr1_checkColumnConstraints(p_data.attr1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_item_attr2_checkColumnConstraints(p_data.attr2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_item_attr3_checkColumnConstraints(p_data.attr3) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_item_attr4_checkColumnConstraints(p_data.attr4) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_item_attr5_checkColumnConstraints(p_data.attr5) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.item_checkTableConstraints
-
-{<BLOCK Name="fct.item_itemid_checkColumnConstraints">}
-#+ Check constraints on the "item.itemid" column
-#+
-#+ @param p_itemid - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_item_itemid_checkColumnConstraints(p_itemid)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_itemid LIKE item.itemid
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_itemid IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- itemid: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.item_itemid_checkColumnConstraints
-
-{<BLOCK Name="fct.item_productid_checkColumnConstraints">}
-#+ Check constraints on the "item.productid" column
-#+
-#+ @param p_productid - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_item_productid_checkColumnConstraints(p_productid)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_productid LIKE item.productid
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_productid IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- productid: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.item_productid_checkColumnConstraints
-
-{<BLOCK Name="fct.item_listprice_checkColumnConstraints">}
-#+ Check constraints on the "item.listprice" column
-#+
-#+ @param p_listprice - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_item_listprice_checkColumnConstraints(p_listprice)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_listprice LIKE item.listprice
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.item_listprice_checkColumnConstraints
-
-{<BLOCK Name="fct.item_unitcost_checkColumnConstraints">}
-#+ Check constraints on the "item.unitcost" column
-#+
-#+ @param p_unitcost - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_item_unitcost_checkColumnConstraints(p_unitcost)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_unitcost LIKE item.unitcost
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.item_unitcost_checkColumnConstraints
-
-{<BLOCK Name="fct.item_supplier_checkColumnConstraints">}
-#+ Check constraints on the "item.supplier" column
-#+
-#+ @param p_supplier - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_item_supplier_checkColumnConstraints(p_supplier)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_supplier LIKE item.supplier
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.item_supplier_checkColumnConstraints
-
-{<BLOCK Name="fct.item_status_checkColumnConstraints">}
-#+ Check constraints on the "item.status" column
-#+
-#+ @param p_status - CHAR(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_item_status_checkColumnConstraints(p_status)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status LIKE item.status
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.item_status_checkColumnConstraints
-
-{<BLOCK Name="fct.item_attr1_checkColumnConstraints">}
-#+ Check constraints on the "item.attr1" column
-#+
-#+ @param p_attr1 - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_item_attr1_checkColumnConstraints(p_attr1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_attr1 LIKE item.attr1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.item_attr1_checkColumnConstraints
-
-{<BLOCK Name="fct.item_attr2_checkColumnConstraints">}
-#+ Check constraints on the "item.attr2" column
-#+
-#+ @param p_attr2 - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_item_attr2_checkColumnConstraints(p_attr2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_attr2 LIKE item.attr2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.item_attr2_checkColumnConstraints
-
-{<BLOCK Name="fct.item_attr3_checkColumnConstraints">}
-#+ Check constraints on the "item.attr3" column
-#+
-#+ @param p_attr3 - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_item_attr3_checkColumnConstraints(p_attr3)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_attr3 LIKE item.attr3
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.item_attr3_checkColumnConstraints
-
-{<BLOCK Name="fct.item_attr4_checkColumnConstraints">}
-#+ Check constraints on the "item.attr4" column
-#+
-#+ @param p_attr4 - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_item_attr4_checkColumnConstraints(p_attr4)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_attr4 LIKE item.attr4
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.item_attr4_checkColumnConstraints
-
-{<BLOCK Name="fct.item_attr5_checkColumnConstraints">}
-#+ Check constraints on the "item.attr5" column
-#+
-#+ @param p_attr5 - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_item_attr5_checkColumnConstraints(p_attr5)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_attr5 LIKE item.attr5
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.item_attr5_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00042_checkTableConstraints">}
-#+ Check constraints on the "irtb00042" table
-#+
-#+ @param p_data - a row data LIKE irtb00042.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00042_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE irtb00042.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_irtb00042_num_doc_checkColumnConstraints(p_data.num_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00042_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00042_cod_mov_checkColumnConstraints(p_data.cod_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00042_bodega_checkColumnConstraints(p_data.bodega) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00042_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00042_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00042_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00042_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00042_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00042_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00042_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00042_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00042_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00042_checkTableConstraints
-
-{<BLOCK Name="fct.irtb00042_num_doc_checkColumnConstraints">}
-#+ Check constraints on the "irtb00042.num_doc" column
-#+
-#+ @param p_num_doc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00042_num_doc_checkColumnConstraints(p_num_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_doc LIKE irtb00042.num_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00042_num_doc_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00042_fecha_checkColumnConstraints">}
-#+ Check constraints on the "irtb00042.fecha" column
-#+
-#+ @param p_fecha - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00042_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE irtb00042.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00042_fecha_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00042_cod_mov_checkColumnConstraints">}
-#+ Check constraints on the "irtb00042.cod_mov" column
-#+
-#+ @param p_cod_mov - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00042_cod_mov_checkColumnConstraints(p_cod_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mov LIKE irtb00042.cod_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00042_cod_mov_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00042_bodega_checkColumnConstraints">}
-#+ Check constraints on the "irtb00042.bodega" column
-#+
-#+ @param p_bodega - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00042_bodega_checkColumnConstraints(p_bodega)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_bodega LIKE irtb00042.bodega
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00042_bodega_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00042_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "irtb00042.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00042_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE irtb00042.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00042_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00042_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "irtb00042.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00042_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE irtb00042.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00042_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00042_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "irtb00042.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00042_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE irtb00042.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00042_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00042_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "irtb00042.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00042_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE irtb00042.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00042_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00042_cantidad_checkColumnConstraints">}
-#+ Check constraints on the "irtb00042.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(18,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00042_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE irtb00042.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00042_cantidad_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00042_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "irtb00042.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00042_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE irtb00042.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00042_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00042_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "irtb00042.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00042_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE irtb00042.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00042_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00042_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "irtb00042.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00042_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE irtb00042.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00042_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00042_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "irtb00042.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00042_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE irtb00042.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00042_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00041_checkTableConstraints">}
-#+ Check constraints on the "irtb00041" table
-#+
-#+ @param p_data - a row data LIKE irtb00041.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00041_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE irtb00041.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_irtb00041_fecha_act_checkColumnConstraints(p_data.fecha_act) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00041_idtrx_checkColumnConstraints(p_data.idtrx) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00041_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00041_bodega_checkColumnConstraints(p_data.bodega) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00041_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00041_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00041_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00041_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00041_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00041_balance_checkColumnConstraints(p_data.balance) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00041_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00041_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00041_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00041_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00041_checkTableConstraints
-
-{<BLOCK Name="fct.irtb00041_fecha_act_checkColumnConstraints">}
-#+ Check constraints on the "irtb00041.fecha_act" column
-#+
-#+ @param p_fecha_act - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00041_fecha_act_checkColumnConstraints(p_fecha_act)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_act LIKE irtb00041.fecha_act
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00041_fecha_act_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00041_idtrx_checkColumnConstraints">}
-#+ Check constraints on the "irtb00041.idtrx" column
-#+
-#+ @param p_idtrx - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00041_idtrx_checkColumnConstraints(p_idtrx)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_idtrx LIKE irtb00041.idtrx
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00041_idtrx_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00041_fecha_checkColumnConstraints">}
-#+ Check constraints on the "irtb00041.fecha" column
-#+
-#+ @param p_fecha - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00041_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE irtb00041.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00041_fecha_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00041_bodega_checkColumnConstraints">}
-#+ Check constraints on the "irtb00041.bodega" column
-#+
-#+ @param p_bodega - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00041_bodega_checkColumnConstraints(p_bodega)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_bodega LIKE irtb00041.bodega
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00041_bodega_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00041_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "irtb00041.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00041_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE irtb00041.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00041_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00041_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "irtb00041.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00041_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE irtb00041.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00041_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00041_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "irtb00041.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00041_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE irtb00041.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00041_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00041_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "irtb00041.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00041_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE irtb00041.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00041_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00041_cantidad_checkColumnConstraints">}
-#+ Check constraints on the "irtb00041.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00041_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE irtb00041.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00041_cantidad_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00041_balance_checkColumnConstraints">}
-#+ Check constraints on the "irtb00041.balance" column
-#+
-#+ @param p_balance - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00041_balance_checkColumnConstraints(p_balance)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_balance LIKE irtb00041.balance
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00041_balance_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00041_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "irtb00041.us_crea" column
-#+
-#+ @param p_us_crea - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00041_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE irtb00041.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00041_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00041_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "irtb00041.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00041_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE irtb00041.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00041_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00041_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "irtb00041.us_mod" column
-#+
-#+ @param p_us_mod - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00041_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE irtb00041.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00041_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00041_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "irtb00041.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00041_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE irtb00041.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00041_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00040_checkTableConstraints">}
-#+ Check constraints on the "irtb00040" table
-#+
-#+ @param p_data - a row data LIKE irtb00040.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00040_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE irtb00040.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_irtb00040_fecha_act_checkColumnConstraints(p_data.fecha_act) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00040_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00040_bodega_checkColumnConstraints(p_data.bodega) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00040_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00040_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00040_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00040_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00040_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00040_balance_checkColumnConstraints(p_data.balance) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00040_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00040_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00040_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00040_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00040_checkTableConstraints
-
-{<BLOCK Name="fct.irtb00040_fecha_act_checkColumnConstraints">}
-#+ Check constraints on the "irtb00040.fecha_act" column
-#+
-#+ @param p_fecha_act - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00040_fecha_act_checkColumnConstraints(p_fecha_act)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_act LIKE irtb00040.fecha_act
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00040_fecha_act_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00040_fecha_checkColumnConstraints">}
-#+ Check constraints on the "irtb00040.fecha" column
-#+
-#+ @param p_fecha - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00040_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE irtb00040.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00040_fecha_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00040_bodega_checkColumnConstraints">}
-#+ Check constraints on the "irtb00040.bodega" column
-#+
-#+ @param p_bodega - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00040_bodega_checkColumnConstraints(p_bodega)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_bodega LIKE irtb00040.bodega
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00040_bodega_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00040_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "irtb00040.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00040_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE irtb00040.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00040_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00040_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "irtb00040.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00040_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE irtb00040.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00040_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00040_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "irtb00040.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00040_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE irtb00040.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00040_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00040_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "irtb00040.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00040_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE irtb00040.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00040_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00040_cantidad_checkColumnConstraints">}
-#+ Check constraints on the "irtb00040.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00040_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE irtb00040.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00040_cantidad_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00040_balance_checkColumnConstraints">}
-#+ Check constraints on the "irtb00040.balance" column
-#+
-#+ @param p_balance - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00040_balance_checkColumnConstraints(p_balance)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_balance LIKE irtb00040.balance
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00040_balance_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00040_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "irtb00040.us_crea" column
-#+
-#+ @param p_us_crea - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00040_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE irtb00040.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00040_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00040_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "irtb00040.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00040_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE irtb00040.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00040_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00040_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "irtb00040.us_mod" column
-#+
-#+ @param p_us_mod - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00040_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE irtb00040.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00040_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00040_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "irtb00040.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00040_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE irtb00040.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00040_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00029_checkTableConstraints">}
-#+ Check constraints on the "irtb00029" table
-#+
-#+ @param p_data - a row data LIKE irtb00029.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00029_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE irtb00029.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_irtb00029_departamento_checkColumnConstraints(p_data.departamento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00029_maquina_checkColumnConstraints(p_data.maquina) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00029_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00029_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00029_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00029_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00029_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00029_checkTableConstraints
-
-{<BLOCK Name="fct.irtb00029_departamento_checkColumnConstraints">}
-#+ Check constraints on the "irtb00029.departamento" column
-#+
-#+ @param p_departamento - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00029_departamento_checkColumnConstraints(p_departamento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_departamento LIKE irtb00029.departamento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00029_departamento_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00029_maquina_checkColumnConstraints">}
-#+ Check constraints on the "irtb00029.maquina" column
-#+
-#+ @param p_maquina - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00029_maquina_checkColumnConstraints(p_maquina)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_maquina LIKE irtb00029.maquina
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00029_maquina_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00029_status_t_checkColumnConstraints">}
-#+ Check constraints on the "irtb00029.status_t" column
-#+
-#+ @param p_status_t - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00029_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE irtb00029.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00029_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00029_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "irtb00029.us_crea" column
-#+
-#+ @param p_us_crea - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00029_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE irtb00029.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00029_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00029_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "irtb00029.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00029_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE irtb00029.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00029_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00029_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "irtb00029.us_mod" column
-#+
-#+ @param p_us_mod - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00029_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE irtb00029.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00029_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00029_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "irtb00029.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00029_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE irtb00029.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00029_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00027_checkTableConstraints">}
-#+ Check constraints on the "irtb00027" table
-#+
-#+ @param p_data - a row data LIKE irtb00027.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00027_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE irtb00027.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_irtb00027_fecha_r_checkColumnConstraints(p_data.fecha_r) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00027_cod_n_r_checkColumnConstraints(p_data.cod_n_r) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00027_cod_grupo_r_checkColumnConstraints(p_data.cod_grupo_r) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00027_cod_tipo_r_checkColumnConstraints(p_data.cod_tipo_r) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00027_cod_sec_r_checkColumnConstraints(p_data.cod_sec_r) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00027_cod_n_m_checkColumnConstraints(p_data.cod_n_m) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00027_cod_grupo_m_checkColumnConstraints(p_data.cod_grupo_m) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00027_cod_tipo_m_checkColumnConstraints(p_data.cod_tipo_m) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00027_cod_sec_m_checkColumnConstraints(p_data.cod_sec_m) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00027_cantidad_m_checkColumnConstraints(p_data.cantidad_m) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00027_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00027_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00027_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00027_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00027_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00027_checkTableConstraints
-
-{<BLOCK Name="fct.irtb00027_fecha_r_checkColumnConstraints">}
-#+ Check constraints on the "irtb00027.fecha_r" column
-#+
-#+ @param p_fecha_r - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00027_fecha_r_checkColumnConstraints(p_fecha_r)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_r LIKE irtb00027.fecha_r
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_fecha_r IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- fecha_r: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00027_fecha_r_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00027_cod_n_r_checkColumnConstraints">}
-#+ Check constraints on the "irtb00027.cod_n_r" column
-#+
-#+ @param p_cod_n_r - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00027_cod_n_r_checkColumnConstraints(p_cod_n_r)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n_r LIKE irtb00027.cod_n_r
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_n_r IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_n_r: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00027_cod_n_r_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00027_cod_grupo_r_checkColumnConstraints">}
-#+ Check constraints on the "irtb00027.cod_grupo_r" column
-#+
-#+ @param p_cod_grupo_r - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00027_cod_grupo_r_checkColumnConstraints(p_cod_grupo_r)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo_r LIKE irtb00027.cod_grupo_r
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_grupo_r IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_grupo_r: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00027_cod_grupo_r_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00027_cod_tipo_r_checkColumnConstraints">}
-#+ Check constraints on the "irtb00027.cod_tipo_r" column
-#+
-#+ @param p_cod_tipo_r - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00027_cod_tipo_r_checkColumnConstraints(p_cod_tipo_r)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo_r LIKE irtb00027.cod_tipo_r
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_tipo_r IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_tipo_r: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00027_cod_tipo_r_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00027_cod_sec_r_checkColumnConstraints">}
-#+ Check constraints on the "irtb00027.cod_sec_r" column
-#+
-#+ @param p_cod_sec_r - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00027_cod_sec_r_checkColumnConstraints(p_cod_sec_r)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec_r LIKE irtb00027.cod_sec_r
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_sec_r IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_sec_r: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00027_cod_sec_r_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00027_cod_n_m_checkColumnConstraints">}
-#+ Check constraints on the "irtb00027.cod_n_m" column
-#+
-#+ @param p_cod_n_m - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00027_cod_n_m_checkColumnConstraints(p_cod_n_m)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n_m LIKE irtb00027.cod_n_m
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_n_m IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_n_m: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00027_cod_n_m_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00027_cod_grupo_m_checkColumnConstraints">}
-#+ Check constraints on the "irtb00027.cod_grupo_m" column
-#+
-#+ @param p_cod_grupo_m - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00027_cod_grupo_m_checkColumnConstraints(p_cod_grupo_m)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo_m LIKE irtb00027.cod_grupo_m
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_grupo_m IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_grupo_m: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00027_cod_grupo_m_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00027_cod_tipo_m_checkColumnConstraints">}
-#+ Check constraints on the "irtb00027.cod_tipo_m" column
-#+
-#+ @param p_cod_tipo_m - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00027_cod_tipo_m_checkColumnConstraints(p_cod_tipo_m)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo_m LIKE irtb00027.cod_tipo_m
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_tipo_m IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_tipo_m: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00027_cod_tipo_m_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00027_cod_sec_m_checkColumnConstraints">}
-#+ Check constraints on the "irtb00027.cod_sec_m" column
-#+
-#+ @param p_cod_sec_m - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00027_cod_sec_m_checkColumnConstraints(p_cod_sec_m)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec_m LIKE irtb00027.cod_sec_m
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_sec_m IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_sec_m: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00027_cod_sec_m_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00027_cantidad_m_checkColumnConstraints">}
-#+ Check constraints on the "irtb00027.cantidad_m" column
-#+
-#+ @param p_cantidad_m - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00027_cantidad_m_checkColumnConstraints(p_cantidad_m)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad_m LIKE irtb00027.cantidad_m
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cantidad_m IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cantidad_m: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00027_cantidad_m_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00027_status_t_checkColumnConstraints">}
-#+ Check constraints on the "irtb00027.status_t" column
-#+
-#+ @param p_status_t - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00027_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE irtb00027.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00027_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00027_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "irtb00027.us_crea" column
-#+
-#+ @param p_us_crea - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00027_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE irtb00027.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00027_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00027_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "irtb00027.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00027_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE irtb00027.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00027_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00027_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "irtb00027.us_mod" column
-#+
-#+ @param p_us_mod - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00027_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE irtb00027.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00027_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00027_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "irtb00027.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00027_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE irtb00027.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00027_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00018_checkTableConstraints">}
-#+ Check constraints on the "irtb00018" table
-#+
-#+ @param p_data - a row data LIKE irtb00018.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00018_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE irtb00018.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_irtb00018_cod_mov_checkColumnConstraints(p_data.cod_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00018_usuario_checkColumnConstraints(p_data.usuario) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00018_checkTableConstraints
-
-{<BLOCK Name="fct.irtb00018_cod_mov_checkColumnConstraints">}
-#+ Check constraints on the "irtb00018.cod_mov" column
-#+
-#+ @param p_cod_mov - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00018_cod_mov_checkColumnConstraints(p_cod_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mov LIKE irtb00018.cod_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00018_cod_mov_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00018_usuario_checkColumnConstraints">}
-#+ Check constraints on the "irtb00018.usuario" column
-#+
-#+ @param p_usuario - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00018_usuario_checkColumnConstraints(p_usuario)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_usuario LIKE irtb00018.usuario
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00018_usuario_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00017_checkTableConstraints">}
-#+ Check constraints on the "irtb00017" table
-#+
-#+ @param p_data - a row data LIKE irtb00017.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00017_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE irtb00017.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_irtb00017_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00017_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00017_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00017_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00017_semana_del_checkColumnConstraints(p_data.semana_del) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00017_semana_al_checkColumnConstraints(p_data.semana_al) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00017_exis_act_checkColumnConstraints(p_data.exis_act) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00017_exis_fisica_checkColumnConstraints(p_data.exis_fisica) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00017_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00017_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00017_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00017_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00017_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00017_checkTableConstraints
-
-{<BLOCK Name="fct.irtb00017_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "irtb00017.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00017_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE irtb00017.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00017_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00017_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "irtb00017.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00017_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE irtb00017.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00017_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00017_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "irtb00017.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00017_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE irtb00017.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00017_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00017_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "irtb00017.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00017_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE irtb00017.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00017_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00017_semana_del_checkColumnConstraints">}
-#+ Check constraints on the "irtb00017.semana_del" column
-#+
-#+ @param p_semana_del - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00017_semana_del_checkColumnConstraints(p_semana_del)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_semana_del LIKE irtb00017.semana_del
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00017_semana_del_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00017_semana_al_checkColumnConstraints">}
-#+ Check constraints on the "irtb00017.semana_al" column
-#+
-#+ @param p_semana_al - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00017_semana_al_checkColumnConstraints(p_semana_al)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_semana_al LIKE irtb00017.semana_al
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00017_semana_al_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00017_exis_act_checkColumnConstraints">}
-#+ Check constraints on the "irtb00017.exis_act" column
-#+
-#+ @param p_exis_act - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00017_exis_act_checkColumnConstraints(p_exis_act)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_exis_act LIKE irtb00017.exis_act
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00017_exis_act_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00017_exis_fisica_checkColumnConstraints">}
-#+ Check constraints on the "irtb00017.exis_fisica" column
-#+
-#+ @param p_exis_fisica - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00017_exis_fisica_checkColumnConstraints(p_exis_fisica)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_exis_fisica LIKE irtb00017.exis_fisica
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00017_exis_fisica_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00017_status_t_checkColumnConstraints">}
-#+ Check constraints on the "irtb00017.status_t" column
-#+
-#+ @param p_status_t - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00017_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE irtb00017.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00017_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00017_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "irtb00017.us_crea" column
-#+
-#+ @param p_us_crea - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00017_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE irtb00017.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00017_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00017_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "irtb00017.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00017_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE irtb00017.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00017_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00017_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "irtb00017.us_mod" column
-#+
-#+ @param p_us_mod - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00017_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE irtb00017.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00017_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00017_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "irtb00017.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00017_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE irtb00017.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00017_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00016_checkTableConstraints">}
-#+ Check constraints on the "irtb00016" table
-#+
-#+ @param p_data - a row data LIKE irtb00016.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00016_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE irtb00016.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_irtb00016_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00016_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00016_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00016_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00016_categoria_checkColumnConstraints(p_data.categoria) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00016_mes_ch_checkColumnConstraints(p_data.mes_ch) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00016_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00016_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00016_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00016_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00016_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00016_checkTableConstraints
-
-{<BLOCK Name="fct.irtb00016_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "irtb00016.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00016_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE irtb00016.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00016_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00016_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "irtb00016.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00016_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE irtb00016.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00016_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00016_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "irtb00016.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00016_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE irtb00016.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00016_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00016_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "irtb00016.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00016_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE irtb00016.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00016_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00016_categoria_checkColumnConstraints">}
-#+ Check constraints on the "irtb00016.categoria" column
-#+
-#+ @param p_categoria - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00016_categoria_checkColumnConstraints(p_categoria)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_categoria LIKE irtb00016.categoria
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00016_categoria_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00016_mes_ch_checkColumnConstraints">}
-#+ Check constraints on the "irtb00016.mes_ch" column
-#+
-#+ @param p_mes_ch - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00016_mes_ch_checkColumnConstraints(p_mes_ch)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mes_ch LIKE irtb00016.mes_ch
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00016_mes_ch_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00016_status_t_checkColumnConstraints">}
-#+ Check constraints on the "irtb00016.status_t" column
-#+
-#+ @param p_status_t - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00016_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE irtb00016.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00016_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00016_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "irtb00016.us_crea" column
-#+
-#+ @param p_us_crea - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00016_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE irtb00016.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00016_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00016_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "irtb00016.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00016_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE irtb00016.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00016_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00016_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "irtb00016.us_mod" column
-#+
-#+ @param p_us_mod - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00016_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE irtb00016.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00016_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00016_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "irtb00016.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00016_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE irtb00016.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00016_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00014_checkTableConstraints">}
-#+ Check constraints on the "irtb00014" table
-#+
-#+ @param p_data - a row data LIKE irtb00014.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00014_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE irtb00014.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_irtb00014_num_salida_checkColumnConstraints(p_data.num_salida) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00014_cod_mov_checkColumnConstraints(p_data.cod_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00014_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00014_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00014_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00014_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00014_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00014_checkTableConstraints
-
-{<BLOCK Name="fct.irtb00014_num_salida_checkColumnConstraints">}
-#+ Check constraints on the "irtb00014.num_salida" column
-#+
-#+ @param p_num_salida - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00014_num_salida_checkColumnConstraints(p_num_salida)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_salida LIKE irtb00014.num_salida
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00014_num_salida_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00014_cod_mov_checkColumnConstraints">}
-#+ Check constraints on the "irtb00014.cod_mov" column
-#+
-#+ @param p_cod_mov - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00014_cod_mov_checkColumnConstraints(p_cod_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mov LIKE irtb00014.cod_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00014_cod_mov_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00014_status_t_checkColumnConstraints">}
-#+ Check constraints on the "irtb00014.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00014_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE irtb00014.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00014_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00014_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "irtb00014.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00014_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE irtb00014.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00014_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00014_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "irtb00014.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00014_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE irtb00014.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00014_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00014_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "irtb00014.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00014_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE irtb00014.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00014_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00014_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "irtb00014.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00014_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE irtb00014.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00014_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00013_checkTableConstraints">}
-#+ Check constraints on the "irtb00013" table
-#+
-#+ @param p_data - a row data LIKE irtb00013.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00013_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE irtb00013.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_irtb00013_mes_ini_checkColumnConstraints(p_data.mes_ini) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00013_mes_fin_checkColumnConstraints(p_data.mes_fin) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00013_ano_checkColumnConstraints(p_data.ano) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00013_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00013_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00013_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00013_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00013_costo_st_checkColumnConstraints(p_data.costo_st) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00013_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00013_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00013_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00013_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00013_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- CALL smarmotech_dbxconstraints_irtb00013_pk_irtb00013_checkUniqueConstraint(p_forUpdate, p_data.ano, p_data.cod_n, p_data.cod_grupo, p_data.cod_tipo, p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00013_checkTableConstraints
-
-{<BLOCK Name="fct.irtb00013_pk_irtb00013_checkUniqueConstraint">}
-#+ Check the primary key uniqueness constraint on the "irtb00013"
-#+
-#+ @param p_key - Primary Key
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00013_pk_irtb00013_checkUniqueConstraint(p_forUpdate, p_key)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_key
- RECORD
- irtb00013_ano LIKE irtb00013.ano,
- irtb00013_cod_n LIKE irtb00013.cod_n,
- irtb00013_cod_grupo LIKE irtb00013.cod_grupo,
- irtb00013_cod_tipo LIKE irtb00013.cod_tipo,
- irtb00013_cod_sec LIKE irtb00013.cod_sec
- END RECORD
- DEFINE l_key
- RECORD
- irtb00013_ano LIKE irtb00013.ano,
- irtb00013_cod_n LIKE irtb00013.cod_n,
- irtb00013_cod_grupo LIKE irtb00013.cod_grupo,
- irtb00013_cod_tipo LIKE irtb00013.cod_tipo,
- irtb00013_cod_sec LIKE irtb00013.cod_sec
- END RECORD
- DEFINE l_where STRING
- DEFINE l_sqlQuery STRING
- DEFINE l_count INTEGER
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- LET l_where = "WHERE irtb00013.ano = ?
- AND irtb00013.cod_n = ?
- AND irtb00013.cod_grupo = ?
- AND irtb00013.cod_tipo = ?
- AND irtb00013.cod_sec = ? "
-
- let l_sqlQuery = "SELECT COUNT(*), ano, cod_n, cod_grupo, cod_tipo, cod_sec FROM irtb00013 ", l_where, " GROUP BY ano, cod_n, cod_grupo, cod_tipo, cod_sec"
-
- PREPARE cur_irtb00013_pk_irtb00013_checkUniqueConstraint FROM l_sqlQuery
- EXECUTE cur_irtb00013_pk_irtb00013_checkUniqueConstraint INTO l_count, l_key.* USING p_key.*
- FREE cur_irtb00013_pk_irtb00013_checkUniqueConstraint
- IF (NOT p_forUpdate AND l_count > 0) OR (p_forUpdate AND l_count > 0 AND p_key.* != l_key.*) THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- ano + cod_n + cod_grupo + cod_tipo + cod_sec: " || ERROR_BAM_00002) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00013_pk_irtb00013_checkUniqueConstraint
-
-{<BLOCK Name="fct.irtb00013_mes_ini_checkColumnConstraints">}
-#+ Check constraints on the "irtb00013.mes_ini" column
-#+
-#+ @param p_mes_ini - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00013_mes_ini_checkColumnConstraints(p_mes_ini)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mes_ini LIKE irtb00013.mes_ini
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00013_mes_ini_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00013_mes_fin_checkColumnConstraints">}
-#+ Check constraints on the "irtb00013.mes_fin" column
-#+
-#+ @param p_mes_fin - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00013_mes_fin_checkColumnConstraints(p_mes_fin)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mes_fin LIKE irtb00013.mes_fin
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00013_mes_fin_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00013_ano_checkColumnConstraints">}
-#+ Check constraints on the "irtb00013.ano" column
-#+
-#+ @param p_ano - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00013_ano_checkColumnConstraints(p_ano)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ano LIKE irtb00013.ano
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_ano IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- ano: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00013_ano_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00013_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "irtb00013.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00013_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE irtb00013.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_n IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_n: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00013_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00013_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "irtb00013.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00013_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE irtb00013.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_grupo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_grupo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00013_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00013_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "irtb00013.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00013_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE irtb00013.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_tipo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_tipo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00013_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00013_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "irtb00013.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00013_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE irtb00013.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_sec IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_sec: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00013_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00013_costo_st_checkColumnConstraints">}
-#+ Check constraints on the "irtb00013.costo_st" column
-#+
-#+ @param p_costo_st - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00013_costo_st_checkColumnConstraints(p_costo_st)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_costo_st LIKE irtb00013.costo_st
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00013_costo_st_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00013_status_t_checkColumnConstraints">}
-#+ Check constraints on the "irtb00013.status_t" column
-#+
-#+ @param p_status_t - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00013_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE irtb00013.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00013_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00013_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "irtb00013.us_crea" column
-#+
-#+ @param p_us_crea - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00013_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE irtb00013.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00013_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00013_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "irtb00013.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00013_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE irtb00013.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00013_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00013_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "irtb00013.us_mod" column
-#+
-#+ @param p_us_mod - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00013_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE irtb00013.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00013_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00013_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "irtb00013.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00013_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE irtb00013.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00013_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00012_checkTableConstraints">}
-#+ Check constraints on the "irtb00012" table
-#+
-#+ @param p_data - a row data LIKE irtb00012.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00012_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE irtb00012.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_irtb00012_idtrx_checkColumnConstraints(p_data.idtrx) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00012_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00012_bodega_checkColumnConstraints(p_data.bodega) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00012_cod_seccion_checkColumnConstraints(p_data.cod_seccion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00012_cod_tramo_checkColumnConstraints(p_data.cod_tramo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00012_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00012_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00012_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00012_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00012_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00012_balance_checkColumnConstraints(p_data.balance) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00012_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00012_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00012_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00012_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00012_checkTableConstraints
-
-{<BLOCK Name="fct.irtb00012_idtrx_checkColumnConstraints">}
-#+ Check constraints on the "irtb00012.idtrx" column
-#+
-#+ @param p_idtrx - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00012_idtrx_checkColumnConstraints(p_idtrx)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_idtrx LIKE irtb00012.idtrx
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00012_idtrx_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00012_fecha_checkColumnConstraints">}
-#+ Check constraints on the "irtb00012.fecha" column
-#+
-#+ @param p_fecha - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00012_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE irtb00012.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00012_fecha_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00012_bodega_checkColumnConstraints">}
-#+ Check constraints on the "irtb00012.bodega" column
-#+
-#+ @param p_bodega - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00012_bodega_checkColumnConstraints(p_bodega)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_bodega LIKE irtb00012.bodega
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00012_bodega_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00012_cod_seccion_checkColumnConstraints">}
-#+ Check constraints on the "irtb00012.cod_seccion" column
-#+
-#+ @param p_cod_seccion - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00012_cod_seccion_checkColumnConstraints(p_cod_seccion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_seccion LIKE irtb00012.cod_seccion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00012_cod_seccion_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00012_cod_tramo_checkColumnConstraints">}
-#+ Check constraints on the "irtb00012.cod_tramo" column
-#+
-#+ @param p_cod_tramo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00012_cod_tramo_checkColumnConstraints(p_cod_tramo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tramo LIKE irtb00012.cod_tramo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00012_cod_tramo_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00012_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "irtb00012.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00012_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE irtb00012.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00012_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00012_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "irtb00012.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00012_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE irtb00012.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00012_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00012_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "irtb00012.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00012_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE irtb00012.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00012_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00012_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "irtb00012.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00012_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE irtb00012.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00012_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00012_cantidad_checkColumnConstraints">}
-#+ Check constraints on the "irtb00012.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00012_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE irtb00012.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00012_cantidad_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00012_balance_checkColumnConstraints">}
-#+ Check constraints on the "irtb00012.balance" column
-#+
-#+ @param p_balance - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00012_balance_checkColumnConstraints(p_balance)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_balance LIKE irtb00012.balance
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00012_balance_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00012_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "irtb00012.us_crea" column
-#+
-#+ @param p_us_crea - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00012_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE irtb00012.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00012_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00012_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "irtb00012.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00012_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE irtb00012.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00012_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00012_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "irtb00012.us_mod" column
-#+
-#+ @param p_us_mod - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00012_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE irtb00012.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00012_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00012_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "irtb00012.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00012_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE irtb00012.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00012_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00011_checkTableConstraints">}
-#+ Check constraints on the "irtb00011" table
-#+
-#+ @param p_data - a row data LIKE irtb00011.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00011_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE irtb00011.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_irtb00011_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00011_bodega_checkColumnConstraints(p_data.bodega) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00011_cod_seccion_checkColumnConstraints(p_data.cod_seccion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00011_cod_tramo_checkColumnConstraints(p_data.cod_tramo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00011_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00011_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00011_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00011_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00011_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00011_balance_checkColumnConstraints(p_data.balance) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00011_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00011_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00011_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00011_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00011_checkTableConstraints
-
-{<BLOCK Name="fct.irtb00011_fecha_checkColumnConstraints">}
-#+ Check constraints on the "irtb00011.fecha" column
-#+
-#+ @param p_fecha - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00011_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE irtb00011.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_fecha IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- fecha: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00011_fecha_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00011_bodega_checkColumnConstraints">}
-#+ Check constraints on the "irtb00011.bodega" column
-#+
-#+ @param p_bodega - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00011_bodega_checkColumnConstraints(p_bodega)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_bodega LIKE irtb00011.bodega
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_bodega IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- bodega: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00011_bodega_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00011_cod_seccion_checkColumnConstraints">}
-#+ Check constraints on the "irtb00011.cod_seccion" column
-#+
-#+ @param p_cod_seccion - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00011_cod_seccion_checkColumnConstraints(p_cod_seccion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_seccion LIKE irtb00011.cod_seccion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_seccion IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_seccion: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00011_cod_seccion_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00011_cod_tramo_checkColumnConstraints">}
-#+ Check constraints on the "irtb00011.cod_tramo" column
-#+
-#+ @param p_cod_tramo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00011_cod_tramo_checkColumnConstraints(p_cod_tramo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tramo LIKE irtb00011.cod_tramo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_tramo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_tramo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00011_cod_tramo_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00011_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "irtb00011.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00011_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE irtb00011.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_n IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_n: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00011_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00011_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "irtb00011.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00011_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE irtb00011.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_grupo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_grupo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00011_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00011_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "irtb00011.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00011_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE irtb00011.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_tipo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_tipo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00011_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00011_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "irtb00011.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00011_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE irtb00011.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_sec IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_sec: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00011_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00011_cantidad_checkColumnConstraints">}
-#+ Check constraints on the "irtb00011.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00011_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE irtb00011.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cantidad IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cantidad: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00011_cantidad_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00011_balance_checkColumnConstraints">}
-#+ Check constraints on the "irtb00011.balance" column
-#+
-#+ @param p_balance - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00011_balance_checkColumnConstraints(p_balance)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_balance LIKE irtb00011.balance
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00011_balance_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00011_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "irtb00011.us_crea" column
-#+
-#+ @param p_us_crea - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00011_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE irtb00011.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00011_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00011_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "irtb00011.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00011_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE irtb00011.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00011_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00011_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "irtb00011.us_mod" column
-#+
-#+ @param p_us_mod - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00011_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE irtb00011.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00011_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00011_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "irtb00011.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00011_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE irtb00011.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00011_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00010_checkTableConstraints">}
-#+ Check constraints on the "irtb00010" table
-#+
-#+ @param p_data - a row data LIKE irtb00010.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00010_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE irtb00010.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_irtb00010_codigo_checkColumnConstraints(p_data.codigo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00010_nombre_checkColumnConstraints(p_data.nombre) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00010_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00010_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00010_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00010_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00010_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00010_checkTableConstraints
-
-{<BLOCK Name="fct.irtb00010_codigo_checkColumnConstraints">}
-#+ Check constraints on the "irtb00010.codigo" column
-#+
-#+ @param p_codigo - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00010_codigo_checkColumnConstraints(p_codigo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codigo LIKE irtb00010.codigo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00010_codigo_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00010_nombre_checkColumnConstraints">}
-#+ Check constraints on the "irtb00010.nombre" column
-#+
-#+ @param p_nombre - VARCHAR2(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00010_nombre_checkColumnConstraints(p_nombre)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombre LIKE irtb00010.nombre
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00010_nombre_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00010_status_t_checkColumnConstraints">}
-#+ Check constraints on the "irtb00010.status_t" column
-#+
-#+ @param p_status_t - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00010_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE irtb00010.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00010_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00010_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "irtb00010.us_crea" column
-#+
-#+ @param p_us_crea - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00010_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE irtb00010.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00010_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00010_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "irtb00010.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00010_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE irtb00010.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00010_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00010_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "irtb00010.us_mod" column
-#+
-#+ @param p_us_mod - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00010_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE irtb00010.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00010_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00010_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "irtb00010.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00010_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE irtb00010.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00010_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00009_checkTableConstraints">}
-#+ Check constraints on the "irtb00009" table
-#+
-#+ @param p_data - a row data LIKE irtb00009.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00009_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE irtb00009.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_irtb00009_codigo_checkColumnConstraints(p_data.codigo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00009_nombre_checkColumnConstraints(p_data.nombre) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00009_unidad_med_checkColumnConstraints(p_data.unidad_med) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00009_modelo_checkColumnConstraints(p_data.modelo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00009_serie_checkColumnConstraints(p_data.serie) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00009_fabricante_checkColumnConstraints(p_data.fabricante) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00009_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00009_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00009_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00009_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00009_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00009_checkTableConstraints
-
-{<BLOCK Name="fct.irtb00009_codigo_checkColumnConstraints">}
-#+ Check constraints on the "irtb00009.codigo" column
-#+
-#+ @param p_codigo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00009_codigo_checkColumnConstraints(p_codigo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codigo LIKE irtb00009.codigo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00009_codigo_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00009_nombre_checkColumnConstraints">}
-#+ Check constraints on the "irtb00009.nombre" column
-#+
-#+ @param p_nombre - VARCHAR2(25) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00009_nombre_checkColumnConstraints(p_nombre)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombre LIKE irtb00009.nombre
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00009_nombre_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00009_unidad_med_checkColumnConstraints">}
-#+ Check constraints on the "irtb00009.unidad_med" column
-#+
-#+ @param p_unidad_med - VARCHAR2(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00009_unidad_med_checkColumnConstraints(p_unidad_med)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_unidad_med LIKE irtb00009.unidad_med
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00009_unidad_med_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00009_modelo_checkColumnConstraints">}
-#+ Check constraints on the "irtb00009.modelo" column
-#+
-#+ @param p_modelo - VARCHAR2(15) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00009_modelo_checkColumnConstraints(p_modelo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_modelo LIKE irtb00009.modelo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00009_modelo_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00009_serie_checkColumnConstraints">}
-#+ Check constraints on the "irtb00009.serie" column
-#+
-#+ @param p_serie - VARCHAR2(15) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00009_serie_checkColumnConstraints(p_serie)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_serie LIKE irtb00009.serie
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00009_serie_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00009_fabricante_checkColumnConstraints">}
-#+ Check constraints on the "irtb00009.fabricante" column
-#+
-#+ @param p_fabricante - VARCHAR2(45) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00009_fabricante_checkColumnConstraints(p_fabricante)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fabricante LIKE irtb00009.fabricante
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00009_fabricante_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00009_status_t_checkColumnConstraints">}
-#+ Check constraints on the "irtb00009.status_t" column
-#+
-#+ @param p_status_t - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00009_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE irtb00009.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00009_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00009_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "irtb00009.us_crea" column
-#+
-#+ @param p_us_crea - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00009_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE irtb00009.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00009_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00009_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "irtb00009.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00009_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE irtb00009.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00009_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00009_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "irtb00009.us_mod" column
-#+
-#+ @param p_us_mod - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00009_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE irtb00009.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00009_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00009_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "irtb00009.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00009_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE irtb00009.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00009_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00008_checkTableConstraints">}
-#+ Check constraints on the "irtb00008" table
-#+
-#+ @param p_data - a row data LIKE irtb00008.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00008_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE irtb00008.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_irtb00008_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00008_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00008_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00008_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00008_cod_maq_checkColumnConstraints(p_data.cod_maq) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00008_numero_checkColumnConstraints(p_data.numero) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00008_serie_checkColumnConstraints(p_data.serie) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00008_distribuidor_checkColumnConstraints(p_data.distribuidor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00008_fabricante_checkColumnConstraints(p_data.fabricante) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00008_localizacion_checkColumnConstraints(p_data.localizacion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00008_material_checkColumnConstraints(p_data.material) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00008_dureza_checkColumnConstraints(p_data.dureza) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00008_motor_elec_checkColumnConstraints(p_data.motor_elec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00008_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00008_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00008_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00008_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00008_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00008_checkTableConstraints
-
-{<BLOCK Name="fct.irtb00008_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "irtb00008.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00008_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE irtb00008.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00008_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00008_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "irtb00008.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00008_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE irtb00008.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00008_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00008_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "irtb00008.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00008_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE irtb00008.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00008_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00008_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "irtb00008.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00008_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE irtb00008.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00008_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00008_cod_maq_checkColumnConstraints">}
-#+ Check constraints on the "irtb00008.cod_maq" column
-#+
-#+ @param p_cod_maq - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00008_cod_maq_checkColumnConstraints(p_cod_maq)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_maq LIKE irtb00008.cod_maq
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00008_cod_maq_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00008_numero_checkColumnConstraints">}
-#+ Check constraints on the "irtb00008.numero" column
-#+
-#+ @param p_numero - VARCHAR2(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00008_numero_checkColumnConstraints(p_numero)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_numero LIKE irtb00008.numero
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00008_numero_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00008_serie_checkColumnConstraints">}
-#+ Check constraints on the "irtb00008.serie" column
-#+
-#+ @param p_serie - VARCHAR2(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00008_serie_checkColumnConstraints(p_serie)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_serie LIKE irtb00008.serie
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00008_serie_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00008_distribuidor_checkColumnConstraints">}
-#+ Check constraints on the "irtb00008.distribuidor" column
-#+
-#+ @param p_distribuidor - VARCHAR2(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00008_distribuidor_checkColumnConstraints(p_distribuidor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_distribuidor LIKE irtb00008.distribuidor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00008_distribuidor_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00008_fabricante_checkColumnConstraints">}
-#+ Check constraints on the "irtb00008.fabricante" column
-#+
-#+ @param p_fabricante - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00008_fabricante_checkColumnConstraints(p_fabricante)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fabricante LIKE irtb00008.fabricante
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00008_fabricante_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00008_localizacion_checkColumnConstraints">}
-#+ Check constraints on the "irtb00008.localizacion" column
-#+
-#+ @param p_localizacion - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00008_localizacion_checkColumnConstraints(p_localizacion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_localizacion LIKE irtb00008.localizacion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00008_localizacion_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00008_material_checkColumnConstraints">}
-#+ Check constraints on the "irtb00008.material" column
-#+
-#+ @param p_material - VARCHAR2(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00008_material_checkColumnConstraints(p_material)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_material LIKE irtb00008.material
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00008_material_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00008_dureza_checkColumnConstraints">}
-#+ Check constraints on the "irtb00008.dureza" column
-#+
-#+ @param p_dureza - VARCHAR2(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00008_dureza_checkColumnConstraints(p_dureza)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_dureza LIKE irtb00008.dureza
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00008_dureza_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00008_motor_elec_checkColumnConstraints">}
-#+ Check constraints on the "irtb00008.motor_elec" column
-#+
-#+ @param p_motor_elec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00008_motor_elec_checkColumnConstraints(p_motor_elec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_motor_elec LIKE irtb00008.motor_elec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00008_motor_elec_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00008_status_t_checkColumnConstraints">}
-#+ Check constraints on the "irtb00008.status_t" column
-#+
-#+ @param p_status_t - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00008_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE irtb00008.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00008_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00008_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "irtb00008.us_crea" column
-#+
-#+ @param p_us_crea - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00008_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE irtb00008.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00008_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00008_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "irtb00008.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00008_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE irtb00008.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00008_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00008_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "irtb00008.us_mod" column
-#+
-#+ @param p_us_mod - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00008_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE irtb00008.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00008_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00008_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "irtb00008.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00008_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE irtb00008.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00008_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00007_checkTableConstraints">}
-#+ Check constraints on the "irtb00007" table
-#+
-#+ @param p_data - a row data LIKE irtb00007.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00007_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE irtb00007.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_irtb00007_codigo_m_checkColumnConstraints(p_data.codigo_m) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00007_frame_checkColumnConstraints(p_data.frame) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00007_numero_checkColumnConstraints(p_data.numero) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00007_fase_m_checkColumnConstraints(p_data.fase_m) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00007_serie_checkColumnConstraints(p_data.serie) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00007_rpm_m_checkColumnConstraints(p_data.rpm_m) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00007_hp_m_checkColumnConstraints(p_data.hp_m) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00007_voltaje_checkColumnConstraints(p_data.voltaje) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00007_amperaje_checkColumnConstraints(p_data.amperaje) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00007_ciclo_checkColumnConstraints(p_data.ciclo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00007_tipo_checkColumnConstraints(p_data.tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00007_modelo_checkColumnConstraints(p_data.modelo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00007_marca_checkColumnConstraints(p_data.marca) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00007_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00007_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00007_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00007_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00007_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00007_checkTableConstraints
-
-{<BLOCK Name="fct.irtb00007_codigo_m_checkColumnConstraints">}
-#+ Check constraints on the "irtb00007.codigo_m" column
-#+
-#+ @param p_codigo_m - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00007_codigo_m_checkColumnConstraints(p_codigo_m)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codigo_m LIKE irtb00007.codigo_m
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00007_codigo_m_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00007_frame_checkColumnConstraints">}
-#+ Check constraints on the "irtb00007.frame" column
-#+
-#+ @param p_frame - VARCHAR2(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00007_frame_checkColumnConstraints(p_frame)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_frame LIKE irtb00007.frame
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00007_frame_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00007_numero_checkColumnConstraints">}
-#+ Check constraints on the "irtb00007.numero" column
-#+
-#+ @param p_numero - VARCHAR2(15) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00007_numero_checkColumnConstraints(p_numero)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_numero LIKE irtb00007.numero
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00007_numero_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00007_fase_m_checkColumnConstraints">}
-#+ Check constraints on the "irtb00007.fase_m" column
-#+
-#+ @param p_fase_m - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00007_fase_m_checkColumnConstraints(p_fase_m)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fase_m LIKE irtb00007.fase_m
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00007_fase_m_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00007_serie_checkColumnConstraints">}
-#+ Check constraints on the "irtb00007.serie" column
-#+
-#+ @param p_serie - VARCHAR2(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00007_serie_checkColumnConstraints(p_serie)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_serie LIKE irtb00007.serie
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00007_serie_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00007_rpm_m_checkColumnConstraints">}
-#+ Check constraints on the "irtb00007.rpm_m" column
-#+
-#+ @param p_rpm_m - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00007_rpm_m_checkColumnConstraints(p_rpm_m)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_rpm_m LIKE irtb00007.rpm_m
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00007_rpm_m_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00007_hp_m_checkColumnConstraints">}
-#+ Check constraints on the "irtb00007.hp_m" column
-#+
-#+ @param p_hp_m - VARCHAR2(7) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00007_hp_m_checkColumnConstraints(p_hp_m)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_hp_m LIKE irtb00007.hp_m
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00007_hp_m_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00007_voltaje_checkColumnConstraints">}
-#+ Check constraints on the "irtb00007.voltaje" column
-#+
-#+ @param p_voltaje - VARCHAR2(7) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00007_voltaje_checkColumnConstraints(p_voltaje)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_voltaje LIKE irtb00007.voltaje
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00007_voltaje_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00007_amperaje_checkColumnConstraints">}
-#+ Check constraints on the "irtb00007.amperaje" column
-#+
-#+ @param p_amperaje - VARCHAR2(7) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00007_amperaje_checkColumnConstraints(p_amperaje)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_amperaje LIKE irtb00007.amperaje
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00007_amperaje_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00007_ciclo_checkColumnConstraints">}
-#+ Check constraints on the "irtb00007.ciclo" column
-#+
-#+ @param p_ciclo - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00007_ciclo_checkColumnConstraints(p_ciclo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ciclo LIKE irtb00007.ciclo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00007_ciclo_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00007_tipo_checkColumnConstraints">}
-#+ Check constraints on the "irtb00007.tipo" column
-#+
-#+ @param p_tipo - VARCHAR2(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00007_tipo_checkColumnConstraints(p_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo LIKE irtb00007.tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00007_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00007_modelo_checkColumnConstraints">}
-#+ Check constraints on the "irtb00007.modelo" column
-#+
-#+ @param p_modelo - VARCHAR2(15) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00007_modelo_checkColumnConstraints(p_modelo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_modelo LIKE irtb00007.modelo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00007_modelo_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00007_marca_checkColumnConstraints">}
-#+ Check constraints on the "irtb00007.marca" column
-#+
-#+ @param p_marca - VARCHAR2(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00007_marca_checkColumnConstraints(p_marca)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_marca LIKE irtb00007.marca
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00007_marca_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00007_status_t_checkColumnConstraints">}
-#+ Check constraints on the "irtb00007.status_t" column
-#+
-#+ @param p_status_t - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00007_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE irtb00007.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00007_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00007_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "irtb00007.us_crea" column
-#+
-#+ @param p_us_crea - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00007_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE irtb00007.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00007_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00007_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "irtb00007.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00007_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE irtb00007.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00007_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00007_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "irtb00007.us_mod" column
-#+
-#+ @param p_us_mod - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00007_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE irtb00007.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00007_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00007_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "irtb00007.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00007_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE irtb00007.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00007_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00006_checkTableConstraints">}
-#+ Check constraints on the "irtb00006" table
-#+
-#+ @param p_data - a row data LIKE irtb00006.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00006_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE irtb00006.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_irtb00006_num_doc_checkColumnConstraints(p_data.num_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00006_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00006_fact_no_checkColumnConstraints(p_data.fact_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00006_conduce_no_checkColumnConstraints(p_data.conduce_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00006_tipo_checkColumnConstraints(p_data.tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00006_orden_compra_checkColumnConstraints(p_data.orden_compra) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00006_cod_sp_checkColumnConstraints(p_data.cod_sp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00006_cod_sp_sec_checkColumnConstraints(p_data.cod_sp_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00006_cod_mov_checkColumnConstraints(p_data.cod_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00006_maquina_checkColumnConstraints(p_data.maquina) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00006_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00006_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00006_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00006_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00006_cantidad_1_checkColumnConstraints(p_data.cantidad_1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00006_cantidad_2_checkColumnConstraints(p_data.cantidad_2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00006_sec_de_checkColumnConstraints(p_data.sec_de) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00006_sec_a_checkColumnConstraints(p_data.sec_a) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00006_status_mov_checkColumnConstraints(p_data.status_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00006_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00006_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00006_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00006_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00006_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00006_bodega_checkColumnConstraints(p_data.bodega) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00006_checkTableConstraints
-
-{<BLOCK Name="fct.irtb00006_num_doc_checkColumnConstraints">}
-#+ Check constraints on the "irtb00006.num_doc" column
-#+
-#+ @param p_num_doc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00006_num_doc_checkColumnConstraints(p_num_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_doc LIKE irtb00006.num_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_num_doc IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- num_doc: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00006_num_doc_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00006_fecha_checkColumnConstraints">}
-#+ Check constraints on the "irtb00006.fecha" column
-#+
-#+ @param p_fecha - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00006_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE irtb00006.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_fecha IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- fecha: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00006_fecha_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00006_fact_no_checkColumnConstraints">}
-#+ Check constraints on the "irtb00006.fact_no" column
-#+
-#+ @param p_fact_no - VARCHAR2(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00006_fact_no_checkColumnConstraints(p_fact_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fact_no LIKE irtb00006.fact_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00006_fact_no_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00006_conduce_no_checkColumnConstraints">}
-#+ Check constraints on the "irtb00006.conduce_no" column
-#+
-#+ @param p_conduce_no - VARCHAR2(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00006_conduce_no_checkColumnConstraints(p_conduce_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_conduce_no LIKE irtb00006.conduce_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00006_conduce_no_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00006_tipo_checkColumnConstraints">}
-#+ Check constraints on the "irtb00006.tipo" column
-#+
-#+ @param p_tipo - VARCHAR2(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00006_tipo_checkColumnConstraints(p_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo LIKE irtb00006.tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00006_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00006_orden_compra_checkColumnConstraints">}
-#+ Check constraints on the "irtb00006.orden_compra" column
-#+
-#+ @param p_orden_compra - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00006_orden_compra_checkColumnConstraints(p_orden_compra)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_orden_compra LIKE irtb00006.orden_compra
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00006_orden_compra_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00006_cod_sp_checkColumnConstraints">}
-#+ Check constraints on the "irtb00006.cod_sp" column
-#+
-#+ @param p_cod_sp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00006_cod_sp_checkColumnConstraints(p_cod_sp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sp LIKE irtb00006.cod_sp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00006_cod_sp_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00006_cod_sp_sec_checkColumnConstraints">}
-#+ Check constraints on the "irtb00006.cod_sp_sec" column
-#+
-#+ @param p_cod_sp_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00006_cod_sp_sec_checkColumnConstraints(p_cod_sp_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sp_sec LIKE irtb00006.cod_sp_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00006_cod_sp_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00006_cod_mov_checkColumnConstraints">}
-#+ Check constraints on the "irtb00006.cod_mov" column
-#+
-#+ @param p_cod_mov - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00006_cod_mov_checkColumnConstraints(p_cod_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mov LIKE irtb00006.cod_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_mov IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_mov: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00006_cod_mov_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00006_maquina_checkColumnConstraints">}
-#+ Check constraints on the "irtb00006.maquina" column
-#+
-#+ @param p_maquina - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00006_maquina_checkColumnConstraints(p_maquina)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_maquina LIKE irtb00006.maquina
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00006_maquina_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00006_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "irtb00006.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00006_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE irtb00006.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00006_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00006_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "irtb00006.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00006_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE irtb00006.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00006_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00006_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "irtb00006.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00006_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE irtb00006.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00006_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00006_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "irtb00006.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00006_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE irtb00006.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00006_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00006_cantidad_1_checkColumnConstraints">}
-#+ Check constraints on the "irtb00006.cantidad_1" column
-#+
-#+ @param p_cantidad_1 - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00006_cantidad_1_checkColumnConstraints(p_cantidad_1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad_1 LIKE irtb00006.cantidad_1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00006_cantidad_1_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00006_cantidad_2_checkColumnConstraints">}
-#+ Check constraints on the "irtb00006.cantidad_2" column
-#+
-#+ @param p_cantidad_2 - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00006_cantidad_2_checkColumnConstraints(p_cantidad_2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad_2 LIKE irtb00006.cantidad_2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00006_cantidad_2_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00006_sec_de_checkColumnConstraints">}
-#+ Check constraints on the "irtb00006.sec_de" column
-#+
-#+ @param p_sec_de - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00006_sec_de_checkColumnConstraints(p_sec_de)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_de LIKE irtb00006.sec_de
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00006_sec_de_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00006_sec_a_checkColumnConstraints">}
-#+ Check constraints on the "irtb00006.sec_a" column
-#+
-#+ @param p_sec_a - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00006_sec_a_checkColumnConstraints(p_sec_a)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_a LIKE irtb00006.sec_a
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00006_sec_a_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00006_status_mov_checkColumnConstraints">}
-#+ Check constraints on the "irtb00006.status_mov" column
-#+
-#+ @param p_status_mov - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00006_status_mov_checkColumnConstraints(p_status_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_mov LIKE irtb00006.status_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00006_status_mov_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00006_status_t_checkColumnConstraints">}
-#+ Check constraints on the "irtb00006.status_t" column
-#+
-#+ @param p_status_t - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00006_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE irtb00006.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00006_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00006_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "irtb00006.us_crea" column
-#+
-#+ @param p_us_crea - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00006_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE irtb00006.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00006_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00006_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "irtb00006.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00006_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE irtb00006.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00006_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00006_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "irtb00006.us_mod" column
-#+
-#+ @param p_us_mod - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00006_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE irtb00006.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00006_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00006_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "irtb00006.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00006_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE irtb00006.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00006_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00006_bodega_checkColumnConstraints">}
-#+ Check constraints on the "irtb00006.bodega" column
-#+
-#+ @param p_bodega - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00006_bodega_checkColumnConstraints(p_bodega)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_bodega LIKE irtb00006.bodega
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00006_bodega_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00005_checkTableConstraints">}
-#+ Check constraints on the "irtb00005" table
-#+
-#+ @param p_data - a row data LIKE irtb00005.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00005_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE irtb00005.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_irtb00005_cod_mov_checkColumnConstraints(p_data.cod_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00005_descrip_mov_checkColumnConstraints(p_data.descrip_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00005_status_mov_checkColumnConstraints(p_data.status_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00005_cuenta_1_checkColumnConstraints(p_data.cuenta_1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00005_cuenta_2_checkColumnConstraints(p_data.cuenta_2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00005_cuenta_3_checkColumnConstraints(p_data.cuenta_3) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00005_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00005_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00005_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00005_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00005_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00005_checkTableConstraints
-
-{<BLOCK Name="fct.irtb00005_cod_mov_checkColumnConstraints">}
-#+ Check constraints on the "irtb00005.cod_mov" column
-#+
-#+ @param p_cod_mov - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00005_cod_mov_checkColumnConstraints(p_cod_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mov LIKE irtb00005.cod_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_mov IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_mov: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00005_cod_mov_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00005_descrip_mov_checkColumnConstraints">}
-#+ Check constraints on the "irtb00005.descrip_mov" column
-#+
-#+ @param p_descrip_mov - VARCHAR2(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00005_descrip_mov_checkColumnConstraints(p_descrip_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descrip_mov LIKE irtb00005.descrip_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00005_descrip_mov_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00005_status_mov_checkColumnConstraints">}
-#+ Check constraints on the "irtb00005.status_mov" column
-#+
-#+ @param p_status_mov - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00005_status_mov_checkColumnConstraints(p_status_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_mov LIKE irtb00005.status_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00005_status_mov_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00005_cuenta_1_checkColumnConstraints">}
-#+ Check constraints on the "irtb00005.cuenta_1" column
-#+
-#+ @param p_cuenta_1 - VARCHAR2(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00005_cuenta_1_checkColumnConstraints(p_cuenta_1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cuenta_1 LIKE irtb00005.cuenta_1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00005_cuenta_1_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00005_cuenta_2_checkColumnConstraints">}
-#+ Check constraints on the "irtb00005.cuenta_2" column
-#+
-#+ @param p_cuenta_2 - VARCHAR2(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00005_cuenta_2_checkColumnConstraints(p_cuenta_2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cuenta_2 LIKE irtb00005.cuenta_2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00005_cuenta_2_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00005_cuenta_3_checkColumnConstraints">}
-#+ Check constraints on the "irtb00005.cuenta_3" column
-#+
-#+ @param p_cuenta_3 - VARCHAR2(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00005_cuenta_3_checkColumnConstraints(p_cuenta_3)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cuenta_3 LIKE irtb00005.cuenta_3
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00005_cuenta_3_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00005_status_t_checkColumnConstraints">}
-#+ Check constraints on the "irtb00005.status_t" column
-#+
-#+ @param p_status_t - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00005_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE irtb00005.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00005_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00005_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "irtb00005.us_crea" column
-#+
-#+ @param p_us_crea - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00005_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE irtb00005.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00005_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00005_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "irtb00005.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00005_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE irtb00005.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00005_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00005_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "irtb00005.us_mod" column
-#+
-#+ @param p_us_mod - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00005_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE irtb00005.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00005_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00005_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "irtb00005.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00005_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE irtb00005.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00005_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00002_checkTableConstraints">}
-#+ Check constraints on the "irtb00002" table
-#+
-#+ @param p_data - a row data LIKE irtb00002.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00002_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE irtb00002.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_irtb00002_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00002_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00002_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00002_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00002_descrip_esp_checkColumnConstraints(p_data.descrip_esp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00002_descrip_ing_checkColumnConstraints(p_data.descrip_ing) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00002_unidad_med_checkColumnConstraints(p_data.unidad_med) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00002_existencia_checkColumnConstraints(p_data.existencia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00002_exist_min_checkColumnConstraints(p_data.exist_min) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00002_dia_llegada_checkColumnConstraints(p_data.dia_llegada) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00002_categoria_checkColumnConstraints(p_data.categoria) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00002_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00002_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00002_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00002_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00002_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- CALL smarmotech_dbxconstraints_irtb00002_pk_irtb00002_checkUniqueConstraint(p_forUpdate, p_data.cod_n, p_data.cod_grupo, p_data.cod_tipo, p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00002_checkTableConstraints
-
-{<BLOCK Name="fct.irtb00002_pk_irtb00002_checkUniqueConstraint">}
-#+ Check the primary key uniqueness constraint on the "irtb00002"
-#+
-#+ @param p_key - Primary Key
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00002_pk_irtb00002_checkUniqueConstraint(p_forUpdate, p_key)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_key
- RECORD
- irtb00002_cod_n LIKE irtb00002.cod_n,
- irtb00002_cod_grupo LIKE irtb00002.cod_grupo,
- irtb00002_cod_tipo LIKE irtb00002.cod_tipo,
- irtb00002_cod_sec LIKE irtb00002.cod_sec
- END RECORD
- DEFINE l_key
- RECORD
- irtb00002_cod_n LIKE irtb00002.cod_n,
- irtb00002_cod_grupo LIKE irtb00002.cod_grupo,
- irtb00002_cod_tipo LIKE irtb00002.cod_tipo,
- irtb00002_cod_sec LIKE irtb00002.cod_sec
- END RECORD
- DEFINE l_where STRING
- DEFINE l_sqlQuery STRING
- DEFINE l_count INTEGER
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- LET l_where = "WHERE irtb00002.cod_n = ?
- AND irtb00002.cod_grupo = ?
- AND irtb00002.cod_tipo = ?
- AND irtb00002.cod_sec = ? "
-
- let l_sqlQuery = "SELECT COUNT(*), cod_n, cod_grupo, cod_tipo, cod_sec FROM irtb00002 ", l_where, " GROUP BY cod_n, cod_grupo, cod_tipo, cod_sec"
-
- PREPARE cur_irtb00002_pk_irtb00002_checkUniqueConstraint FROM l_sqlQuery
- EXECUTE cur_irtb00002_pk_irtb00002_checkUniqueConstraint INTO l_count, l_key.* USING p_key.*
- FREE cur_irtb00002_pk_irtb00002_checkUniqueConstraint
- IF (NOT p_forUpdate AND l_count > 0) OR (p_forUpdate AND l_count > 0 AND p_key.* != l_key.*) THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_n + cod_grupo + cod_tipo + cod_sec: " || ERROR_BAM_00002) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00002_pk_irtb00002_checkUniqueConstraint
-
-{<BLOCK Name="fct.irtb00002_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "irtb00002.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00002_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE irtb00002.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_n IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_n: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00002_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00002_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "irtb00002.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00002_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE irtb00002.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_grupo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_grupo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00002_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00002_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "irtb00002.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00002_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE irtb00002.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_tipo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_tipo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00002_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00002_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "irtb00002.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00002_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE irtb00002.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_sec IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_sec: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00002_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00002_descrip_esp_checkColumnConstraints">}
-#+ Check constraints on the "irtb00002.descrip_esp" column
-#+
-#+ @param p_descrip_esp - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00002_descrip_esp_checkColumnConstraints(p_descrip_esp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descrip_esp LIKE irtb00002.descrip_esp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00002_descrip_esp_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00002_descrip_ing_checkColumnConstraints">}
-#+ Check constraints on the "irtb00002.descrip_ing" column
-#+
-#+ @param p_descrip_ing - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00002_descrip_ing_checkColumnConstraints(p_descrip_ing)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descrip_ing LIKE irtb00002.descrip_ing
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00002_descrip_ing_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00002_unidad_med_checkColumnConstraints">}
-#+ Check constraints on the "irtb00002.unidad_med" column
-#+
-#+ @param p_unidad_med - CHAR(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00002_unidad_med_checkColumnConstraints(p_unidad_med)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_unidad_med LIKE irtb00002.unidad_med
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00002_unidad_med_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00002_existencia_checkColumnConstraints">}
-#+ Check constraints on the "irtb00002.existencia" column
-#+
-#+ @param p_existencia - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00002_existencia_checkColumnConstraints(p_existencia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_existencia LIKE irtb00002.existencia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00002_existencia_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00002_exist_min_checkColumnConstraints">}
-#+ Check constraints on the "irtb00002.exist_min" column
-#+
-#+ @param p_exist_min - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00002_exist_min_checkColumnConstraints(p_exist_min)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_exist_min LIKE irtb00002.exist_min
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00002_exist_min_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00002_dia_llegada_checkColumnConstraints">}
-#+ Check constraints on the "irtb00002.dia_llegada" column
-#+
-#+ @param p_dia_llegada - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00002_dia_llegada_checkColumnConstraints(p_dia_llegada)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_dia_llegada LIKE irtb00002.dia_llegada
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00002_dia_llegada_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00002_categoria_checkColumnConstraints">}
-#+ Check constraints on the "irtb00002.categoria" column
-#+
-#+ @param p_categoria - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00002_categoria_checkColumnConstraints(p_categoria)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_categoria LIKE irtb00002.categoria
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00002_categoria_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00002_status_t_checkColumnConstraints">}
-#+ Check constraints on the "irtb00002.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00002_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE irtb00002.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00002_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00002_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "irtb00002.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00002_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE irtb00002.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00002_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00002_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "irtb00002.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00002_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE irtb00002.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00002_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00002_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "irtb00002.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00002_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE irtb00002.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00002_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00002_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "irtb00002.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00002_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE irtb00002.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00002_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00001_checkTableConstraints">}
-#+ Check constraints on the "irtb00001" table
-#+
-#+ @param p_data - a row data LIKE irtb00001.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00001_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE irtb00001.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_irtb00001_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00001_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00001_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00001_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00001_descrip_esp_checkColumnConstraints(p_data.descrip_esp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00001_descrip_ing_checkColumnConstraints(p_data.descrip_ing) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00001_unidad_med_checkColumnConstraints(p_data.unidad_med) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00001_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00001_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00001_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00001_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_irtb00001_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00001_checkTableConstraints
-
-{<BLOCK Name="fct.irtb00001_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "irtb00001.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00001_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE irtb00001.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_n IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_n: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00001_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00001_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "irtb00001.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00001_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE irtb00001.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_grupo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_grupo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00001_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00001_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "irtb00001.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00001_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE irtb00001.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_tipo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_tipo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00001_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00001_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "irtb00001.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00001_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE irtb00001.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_sec IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_sec: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00001_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00001_descrip_esp_checkColumnConstraints">}
-#+ Check constraints on the "irtb00001.descrip_esp" column
-#+
-#+ @param p_descrip_esp - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00001_descrip_esp_checkColumnConstraints(p_descrip_esp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descrip_esp LIKE irtb00001.descrip_esp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_descrip_esp IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- descrip_esp: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00001_descrip_esp_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00001_descrip_ing_checkColumnConstraints">}
-#+ Check constraints on the "irtb00001.descrip_ing" column
-#+
-#+ @param p_descrip_ing - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00001_descrip_ing_checkColumnConstraints(p_descrip_ing)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descrip_ing LIKE irtb00001.descrip_ing
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00001_descrip_ing_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00001_unidad_med_checkColumnConstraints">}
-#+ Check constraints on the "irtb00001.unidad_med" column
-#+
-#+ @param p_unidad_med - CHAR(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00001_unidad_med_checkColumnConstraints(p_unidad_med)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_unidad_med LIKE irtb00001.unidad_med
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00001_unidad_med_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00001_status_t_checkColumnConstraints">}
-#+ Check constraints on the "irtb00001.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00001_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE irtb00001.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00001_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00001_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "irtb00001.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00001_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE irtb00001.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00001_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00001_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "irtb00001.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00001_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE irtb00001.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00001_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00001_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "irtb00001.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00001_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE irtb00001.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00001_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.irtb00001_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "irtb00001.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_irtb00001_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE irtb00001.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.irtb00001_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.ircodigos_checkTableConstraints">}
-#+ Check constraints on the "ircodigos" table
-#+
-#+ @param p_data - a row data LIKE ircodigos.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_ircodigos_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE ircodigos.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_ircodigos_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ircodigos_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ircodigos_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ircodigos_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_ircodigos_cuenta_checkColumnConstraints(p_data.cuenta) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ircodigos_checkTableConstraints
-
-{<BLOCK Name="fct.ircodigos_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "ircodigos.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ircodigos_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE ircodigos.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ircodigos_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.ircodigos_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "ircodigos.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ircodigos_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE ircodigos.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ircodigos_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.ircodigos_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "ircodigos.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ircodigos_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE ircodigos.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ircodigos_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.ircodigos_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "ircodigos.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ircodigos_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE ircodigos.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ircodigos_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.ircodigos_cuenta_checkColumnConstraints">}
-#+ Check constraints on the "ircodigos.cuenta" column
-#+
-#+ @param p_cuenta - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_ircodigos_cuenta_checkColumnConstraints(p_cuenta)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cuenta LIKE ircodigos.cuenta
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.ircodigos_cuenta_checkColumnConstraints
-
-{<BLOCK Name="fct.iptbexistencia_checkTableConstraints">}
-#+ Check constraints on the "iptbexistencia" table
-#+
-#+ @param p_data - a row data LIKE iptbexistencia.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptbexistencia_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE iptbexistencia.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_iptbexistencia_id_checkColumnConstraints(p_data.id) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptbexistencia_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptbexistencia_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptbexistencia_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptbexistencia_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptbexistencia_num_doc_checkColumnConstraints(p_data.num_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptbexistencia_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptbexistencia_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptbexistencia_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptbexistencia_checkTableConstraints
-
-{<BLOCK Name="fct.iptbexistencia_id_checkColumnConstraints">}
-#+ Check constraints on the "iptbexistencia.id" column
-#+
-#+ @param p_id - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptbexistencia_id_checkColumnConstraints(p_id)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_id LIKE iptbexistencia.id
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptbexistencia_id_checkColumnConstraints
-
-{<BLOCK Name="fct.iptbexistencia_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "iptbexistencia.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptbexistencia_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE iptbexistencia.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptbexistencia_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.iptbexistencia_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "iptbexistencia.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptbexistencia_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE iptbexistencia.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptbexistencia_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.iptbexistencia_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "iptbexistencia.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptbexistencia_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE iptbexistencia.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptbexistencia_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.iptbexistencia_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "iptbexistencia.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptbexistencia_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE iptbexistencia.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptbexistencia_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.iptbexistencia_num_doc_checkColumnConstraints">}
-#+ Check constraints on the "iptbexistencia.num_doc" column
-#+
-#+ @param p_num_doc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptbexistencia_num_doc_checkColumnConstraints(p_num_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_doc LIKE iptbexistencia.num_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptbexistencia_num_doc_checkColumnConstraints
-
-{<BLOCK Name="fct.iptbexistencia_cantidad_checkColumnConstraints">}
-#+ Check constraints on the "iptbexistencia.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptbexistencia_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE iptbexistencia.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptbexistencia_cantidad_checkColumnConstraints
-
-{<BLOCK Name="fct.iptbexistencia_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "iptbexistencia.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptbexistencia_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE iptbexistencia.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptbexistencia_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.iptbexistencia_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "iptbexistencia.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptbexistencia_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE iptbexistencia.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptbexistencia_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb025_checkTableConstraints">}
-#+ Check constraints on the "iptb025" table
-#+
-#+ @param p_data - a row data LIKE iptb025.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb025_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE iptb025.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_iptb025_etiqueta_checkColumnConstraints(p_data.etiqueta) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb025_cod_mov_checkColumnConstraints(p_data.cod_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb025_num_doc_checkColumnConstraints(p_data.num_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb025_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb025_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb025_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb025_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb025_lado_1_checkColumnConstraints(p_data.lado_1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb025_lado_2_checkColumnConstraints(p_data.lado_2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb025_lado_3_checkColumnConstraints(p_data.lado_3) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb025_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb025_medida_checkColumnConstraints(p_data.medida) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb025_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb025_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb025_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb025_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb025_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb025_checkTableConstraints
-
-{<BLOCK Name="fct.iptb025_etiqueta_checkColumnConstraints">}
-#+ Check constraints on the "iptb025.etiqueta" column
-#+
-#+ @param p_etiqueta - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb025_etiqueta_checkColumnConstraints(p_etiqueta)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_etiqueta LIKE iptb025.etiqueta
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb025_etiqueta_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb025_cod_mov_checkColumnConstraints">}
-#+ Check constraints on the "iptb025.cod_mov" column
-#+
-#+ @param p_cod_mov - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb025_cod_mov_checkColumnConstraints(p_cod_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mov LIKE iptb025.cod_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb025_cod_mov_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb025_num_doc_checkColumnConstraints">}
-#+ Check constraints on the "iptb025.num_doc" column
-#+
-#+ @param p_num_doc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb025_num_doc_checkColumnConstraints(p_num_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_doc LIKE iptb025.num_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb025_num_doc_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb025_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "iptb025.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb025_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE iptb025.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb025_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb025_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "iptb025.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb025_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE iptb025.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb025_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb025_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "iptb025.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb025_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE iptb025.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb025_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb025_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "iptb025.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb025_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE iptb025.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb025_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb025_lado_1_checkColumnConstraints">}
-#+ Check constraints on the "iptb025.lado_1" column
-#+
-#+ @param p_lado_1 - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb025_lado_1_checkColumnConstraints(p_lado_1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_lado_1 LIKE iptb025.lado_1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb025_lado_1_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb025_lado_2_checkColumnConstraints">}
-#+ Check constraints on the "iptb025.lado_2" column
-#+
-#+ @param p_lado_2 - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb025_lado_2_checkColumnConstraints(p_lado_2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_lado_2 LIKE iptb025.lado_2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb025_lado_2_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb025_lado_3_checkColumnConstraints">}
-#+ Check constraints on the "iptb025.lado_3" column
-#+
-#+ @param p_lado_3 - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb025_lado_3_checkColumnConstraints(p_lado_3)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_lado_3 LIKE iptb025.lado_3
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb025_lado_3_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb025_cantidad_checkColumnConstraints">}
-#+ Check constraints on the "iptb025.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb025_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE iptb025.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb025_cantidad_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb025_medida_checkColumnConstraints">}
-#+ Check constraints on the "iptb025.medida" column
-#+
-#+ @param p_medida - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb025_medida_checkColumnConstraints(p_medida)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_medida LIKE iptb025.medida
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb025_medida_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb025_status_t_checkColumnConstraints">}
-#+ Check constraints on the "iptb025.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb025_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE iptb025.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb025_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb025_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "iptb025.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb025_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE iptb025.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb025_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb025_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "iptb025.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb025_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE iptb025.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb025_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb025_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "iptb025.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb025_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE iptb025.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb025_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb025_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "iptb025.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb025_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE iptb025.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb025_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00048_checkTableConstraints">}
-#+ Check constraints on the "iptb00048" table
-#+
-#+ @param p_data - a row data LIKE iptb00048.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00048_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE iptb00048.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_iptb00048_bodega_checkColumnConstraints(p_data.bodega) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00048_usuario_checkColumnConstraints(p_data.usuario) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00048_checkTableConstraints
-
-{<BLOCK Name="fct.iptb00048_bodega_checkColumnConstraints">}
-#+ Check constraints on the "iptb00048.bodega" column
-#+
-#+ @param p_bodega - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00048_bodega_checkColumnConstraints(p_bodega)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_bodega LIKE iptb00048.bodega
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00048_bodega_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00048_usuario_checkColumnConstraints">}
-#+ Check constraints on the "iptb00048.usuario" column
-#+
-#+ @param p_usuario - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00048_usuario_checkColumnConstraints(p_usuario)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_usuario LIKE iptb00048.usuario
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00048_usuario_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00047_checkTableConstraints">}
-#+ Check constraints on the "iptb00047" table
-#+
-#+ @param p_data - a row data LIKE iptb00047.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00047_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE iptb00047.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_iptb00047_id_ficha_checkColumnConstraints(p_data.id_ficha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00047_instalacion_checkColumnConstraints(p_data.instalacion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00047_secuencia_checkColumnConstraints(p_data.secuencia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00047_checkTableConstraints
-
-{<BLOCK Name="fct.iptb00047_id_ficha_checkColumnConstraints">}
-#+ Check constraints on the "iptb00047.id_ficha" column
-#+
-#+ @param p_id_ficha - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00047_id_ficha_checkColumnConstraints(p_id_ficha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_id_ficha LIKE iptb00047.id_ficha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00047_id_ficha_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00047_instalacion_checkColumnConstraints">}
-#+ Check constraints on the "iptb00047.instalacion" column
-#+
-#+ @param p_instalacion - TEXT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00047_instalacion_checkColumnConstraints(p_instalacion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_instalacion LIKE iptb00047.instalacion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00047_instalacion_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00047_secuencia_checkColumnConstraints">}
-#+ Check constraints on the "iptb00047.secuencia" column
-#+
-#+ @param p_secuencia - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00047_secuencia_checkColumnConstraints(p_secuencia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_secuencia LIKE iptb00047.secuencia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00047_secuencia_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00046_checkTableConstraints">}
-#+ Check constraints on the "iptb00046" table
-#+
-#+ @param p_data - a row data LIKE iptb00046.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00046_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE iptb00046.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_iptb00046_id_ficha_checkColumnConstraints(p_data.id_ficha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00046_foto_producto_checkColumnConstraints(p_data.foto_producto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00046_secuencia_checkColumnConstraints(p_data.secuencia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00046_checkTableConstraints
-
-{<BLOCK Name="fct.iptb00046_id_ficha_checkColumnConstraints">}
-#+ Check constraints on the "iptb00046.id_ficha" column
-#+
-#+ @param p_id_ficha - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00046_id_ficha_checkColumnConstraints(p_id_ficha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_id_ficha LIKE iptb00046.id_ficha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00046_id_ficha_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00046_foto_producto_checkColumnConstraints">}
-#+ Check constraints on the "iptb00046.foto_producto" column
-#+
-#+ @param p_foto_producto - CHAR(200) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00046_foto_producto_checkColumnConstraints(p_foto_producto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_foto_producto LIKE iptb00046.foto_producto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00046_foto_producto_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00046_secuencia_checkColumnConstraints">}
-#+ Check constraints on the "iptb00046.secuencia" column
-#+
-#+ @param p_secuencia - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00046_secuencia_checkColumnConstraints(p_secuencia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_secuencia LIKE iptb00046.secuencia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00046_secuencia_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00045_checkTableConstraints">}
-#+ Check constraints on the "iptb00045" table
-#+
-#+ @param p_data - a row data LIKE iptb00045.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00045_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE iptb00045.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_iptb00045_id_ficha_checkColumnConstraints(p_data.id_ficha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00045_caracteristicas_checkColumnConstraints(p_data.caracteristicas) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00045_secuencia_checkColumnConstraints(p_data.secuencia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00045_checkTableConstraints
-
-{<BLOCK Name="fct.iptb00045_id_ficha_checkColumnConstraints">}
-#+ Check constraints on the "iptb00045.id_ficha" column
-#+
-#+ @param p_id_ficha - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00045_id_ficha_checkColumnConstraints(p_id_ficha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_id_ficha LIKE iptb00045.id_ficha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00045_id_ficha_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00045_caracteristicas_checkColumnConstraints">}
-#+ Check constraints on the "iptb00045.caracteristicas" column
-#+
-#+ @param p_caracteristicas - BYTE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00045_caracteristicas_checkColumnConstraints(p_caracteristicas)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_caracteristicas LIKE iptb00045.caracteristicas
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00045_caracteristicas_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00045_secuencia_checkColumnConstraints">}
-#+ Check constraints on the "iptb00045.secuencia" column
-#+
-#+ @param p_secuencia - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00045_secuencia_checkColumnConstraints(p_secuencia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_secuencia LIKE iptb00045.secuencia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00045_secuencia_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00044_checkTableConstraints">}
-#+ Check constraints on the "iptb00044" table
-#+
-#+ @param p_data - a row data LIKE iptb00044.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00044_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE iptb00044.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_iptb00044_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00044_cod_provincia_checkColumnConstraints(p_data.cod_provincia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00044_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00044_tipo_checkColumnConstraints(p_data.tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00044_id_ficha_checkColumnConstraints(p_data.id_ficha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00044_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00044_us_crera_checkColumnConstraints(p_data.us_crera) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00044_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00044_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00044_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00044_checkTableConstraints
-
-{<BLOCK Name="fct.iptb00044_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "iptb00044.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00044_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE iptb00044.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00044_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00044_cod_provincia_checkColumnConstraints">}
-#+ Check constraints on the "iptb00044.cod_provincia" column
-#+
-#+ @param p_cod_provincia - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00044_cod_provincia_checkColumnConstraints(p_cod_provincia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_provincia LIKE iptb00044.cod_provincia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00044_cod_provincia_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00044_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "iptb00044.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00044_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE iptb00044.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00044_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00044_tipo_checkColumnConstraints">}
-#+ Check constraints on the "iptb00044.tipo" column
-#+
-#+ @param p_tipo - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00044_tipo_checkColumnConstraints(p_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo LIKE iptb00044.tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00044_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00044_id_ficha_checkColumnConstraints">}
-#+ Check constraints on the "iptb00044.id_ficha" column
-#+
-#+ @param p_id_ficha - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00044_id_ficha_checkColumnConstraints(p_id_ficha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_id_ficha LIKE iptb00044.id_ficha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00044_id_ficha_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00044_status_t_checkColumnConstraints">}
-#+ Check constraints on the "iptb00044.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00044_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE iptb00044.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00044_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00044_us_crera_checkColumnConstraints">}
-#+ Check constraints on the "iptb00044.us_crera" column
-#+
-#+ @param p_us_crera - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00044_us_crera_checkColumnConstraints(p_us_crera)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crera LIKE iptb00044.us_crera
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00044_us_crera_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00044_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "iptb00044.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00044_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE iptb00044.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00044_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00044_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "iptb00044.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00044_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE iptb00044.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00044_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00044_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "iptb00044.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00044_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE iptb00044.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00044_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00043_checkTableConstraints">}
-#+ Check constraints on the "iptb00043" table
-#+
-#+ @param p_data - a row data LIKE iptb00043.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00043_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE iptb00043.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_iptb00043_num_doc_checkColumnConstraints(p_data.num_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00043_usuario_checkColumnConstraints(p_data.usuario) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00043_checkTableConstraints
-
-{<BLOCK Name="fct.iptb00043_num_doc_checkColumnConstraints">}
-#+ Check constraints on the "iptb00043.num_doc" column
-#+
-#+ @param p_num_doc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00043_num_doc_checkColumnConstraints(p_num_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_doc LIKE iptb00043.num_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00043_num_doc_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00043_usuario_checkColumnConstraints">}
-#+ Check constraints on the "iptb00043.usuario" column
-#+
-#+ @param p_usuario - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00043_usuario_checkColumnConstraints(p_usuario)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_usuario LIKE iptb00043.usuario
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00043_usuario_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00042_checkTableConstraints">}
-#+ Check constraints on the "iptb00042" table
-#+
-#+ @param p_data - a row data LIKE iptb00042.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00042_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE iptb00042.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_iptb00042_num_doc_checkColumnConstraints(p_data.num_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00042_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00042_cod_mov_checkColumnConstraints(p_data.cod_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00042_bodega_checkColumnConstraints(p_data.bodega) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00042_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00042_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00042_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00042_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00042_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00042_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00042_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00042_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00042_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00042_checkTableConstraints
-
-{<BLOCK Name="fct.iptb00042_num_doc_checkColumnConstraints">}
-#+ Check constraints on the "iptb00042.num_doc" column
-#+
-#+ @param p_num_doc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00042_num_doc_checkColumnConstraints(p_num_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_doc LIKE iptb00042.num_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00042_num_doc_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00042_fecha_checkColumnConstraints">}
-#+ Check constraints on the "iptb00042.fecha" column
-#+
-#+ @param p_fecha - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00042_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE iptb00042.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00042_fecha_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00042_cod_mov_checkColumnConstraints">}
-#+ Check constraints on the "iptb00042.cod_mov" column
-#+
-#+ @param p_cod_mov - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00042_cod_mov_checkColumnConstraints(p_cod_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mov LIKE iptb00042.cod_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00042_cod_mov_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00042_bodega_checkColumnConstraints">}
-#+ Check constraints on the "iptb00042.bodega" column
-#+
-#+ @param p_bodega - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00042_bodega_checkColumnConstraints(p_bodega)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_bodega LIKE iptb00042.bodega
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00042_bodega_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00042_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "iptb00042.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00042_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE iptb00042.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00042_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00042_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "iptb00042.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00042_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE iptb00042.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00042_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00042_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "iptb00042.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00042_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE iptb00042.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00042_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00042_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "iptb00042.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00042_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE iptb00042.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00042_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00042_cantidad_checkColumnConstraints">}
-#+ Check constraints on the "iptb00042.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(18,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00042_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE iptb00042.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00042_cantidad_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00042_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "iptb00042.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00042_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE iptb00042.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00042_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00042_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "iptb00042.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00042_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE iptb00042.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00042_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00042_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "iptb00042.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00042_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE iptb00042.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00042_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00042_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "iptb00042.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00042_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE iptb00042.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00042_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00041_checkTableConstraints">}
-#+ Check constraints on the "iptb00041" table
-#+
-#+ @param p_data - a row data LIKE iptb00041.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00041_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE iptb00041.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_iptb00041_fecha_act_checkColumnConstraints(p_data.fecha_act) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00041_idtrx_checkColumnConstraints(p_data.idtrx) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00041_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00041_bodega_checkColumnConstraints(p_data.bodega) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00041_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00041_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00041_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00041_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00041_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00041_balance_checkColumnConstraints(p_data.balance) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00041_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00041_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00041_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00041_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00041_checkTableConstraints
-
-{<BLOCK Name="fct.iptb00041_fecha_act_checkColumnConstraints">}
-#+ Check constraints on the "iptb00041.fecha_act" column
-#+
-#+ @param p_fecha_act - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00041_fecha_act_checkColumnConstraints(p_fecha_act)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_act LIKE iptb00041.fecha_act
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00041_fecha_act_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00041_idtrx_checkColumnConstraints">}
-#+ Check constraints on the "iptb00041.idtrx" column
-#+
-#+ @param p_idtrx - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00041_idtrx_checkColumnConstraints(p_idtrx)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_idtrx LIKE iptb00041.idtrx
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00041_idtrx_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00041_fecha_checkColumnConstraints">}
-#+ Check constraints on the "iptb00041.fecha" column
-#+
-#+ @param p_fecha - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00041_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE iptb00041.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00041_fecha_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00041_bodega_checkColumnConstraints">}
-#+ Check constraints on the "iptb00041.bodega" column
-#+
-#+ @param p_bodega - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00041_bodega_checkColumnConstraints(p_bodega)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_bodega LIKE iptb00041.bodega
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00041_bodega_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00041_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "iptb00041.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00041_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE iptb00041.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00041_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00041_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "iptb00041.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00041_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE iptb00041.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00041_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00041_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "iptb00041.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00041_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE iptb00041.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00041_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00041_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "iptb00041.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00041_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE iptb00041.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00041_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00041_cantidad_checkColumnConstraints">}
-#+ Check constraints on the "iptb00041.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00041_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE iptb00041.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00041_cantidad_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00041_balance_checkColumnConstraints">}
-#+ Check constraints on the "iptb00041.balance" column
-#+
-#+ @param p_balance - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00041_balance_checkColumnConstraints(p_balance)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_balance LIKE iptb00041.balance
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00041_balance_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00041_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "iptb00041.us_crea" column
-#+
-#+ @param p_us_crea - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00041_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE iptb00041.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00041_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00041_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "iptb00041.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00041_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE iptb00041.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00041_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00041_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "iptb00041.us_mod" column
-#+
-#+ @param p_us_mod - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00041_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE iptb00041.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00041_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00041_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "iptb00041.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00041_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE iptb00041.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00041_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00040_checkTableConstraints">}
-#+ Check constraints on the "iptb00040" table
-#+
-#+ @param p_data - a row data LIKE iptb00040.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00040_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE iptb00040.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_iptb00040_fecha_act_checkColumnConstraints(p_data.fecha_act) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00040_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00040_bodega_checkColumnConstraints(p_data.bodega) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00040_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00040_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00040_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00040_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00040_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00040_balance_checkColumnConstraints(p_data.balance) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00040_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00040_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00040_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00040_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00040_checkTableConstraints
-
-{<BLOCK Name="fct.iptb00040_fecha_act_checkColumnConstraints">}
-#+ Check constraints on the "iptb00040.fecha_act" column
-#+
-#+ @param p_fecha_act - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00040_fecha_act_checkColumnConstraints(p_fecha_act)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_act LIKE iptb00040.fecha_act
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00040_fecha_act_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00040_fecha_checkColumnConstraints">}
-#+ Check constraints on the "iptb00040.fecha" column
-#+
-#+ @param p_fecha - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00040_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE iptb00040.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00040_fecha_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00040_bodega_checkColumnConstraints">}
-#+ Check constraints on the "iptb00040.bodega" column
-#+
-#+ @param p_bodega - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00040_bodega_checkColumnConstraints(p_bodega)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_bodega LIKE iptb00040.bodega
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00040_bodega_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00040_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "iptb00040.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00040_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE iptb00040.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00040_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00040_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "iptb00040.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00040_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE iptb00040.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00040_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00040_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "iptb00040.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00040_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE iptb00040.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00040_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00040_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "iptb00040.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00040_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE iptb00040.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00040_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00040_cantidad_checkColumnConstraints">}
-#+ Check constraints on the "iptb00040.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00040_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE iptb00040.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00040_cantidad_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00040_balance_checkColumnConstraints">}
-#+ Check constraints on the "iptb00040.balance" column
-#+
-#+ @param p_balance - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00040_balance_checkColumnConstraints(p_balance)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_balance LIKE iptb00040.balance
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00040_balance_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00040_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "iptb00040.us_crea" column
-#+
-#+ @param p_us_crea - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00040_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE iptb00040.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00040_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00040_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "iptb00040.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00040_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE iptb00040.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00040_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00040_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "iptb00040.us_mod" column
-#+
-#+ @param p_us_mod - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00040_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE iptb00040.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00040_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00040_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "iptb00040.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00040_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE iptb00040.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00040_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00034_checkTableConstraints">}
-#+ Check constraints on the "iptb00034" table
-#+
-#+ @param p_data - a row data LIKE iptb00034.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00034_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE iptb00034.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_iptb00034_id_kit_checkColumnConstraints(p_data.id_kit) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00034_num_doc_checkColumnConstraints(p_data.num_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00034_cod_mov_checkColumnConstraints(p_data.cod_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00034_area_checkColumnConstraints(p_data.area) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00034_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00034_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00034_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00034_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00034_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00034_precio_checkColumnConstraints(p_data.precio) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00034_checkTableConstraints
-
-{<BLOCK Name="fct.iptb00034_id_kit_checkColumnConstraints">}
-#+ Check constraints on the "iptb00034.id_kit" column
-#+
-#+ @param p_id_kit - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00034_id_kit_checkColumnConstraints(p_id_kit)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_id_kit LIKE iptb00034.id_kit
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00034_id_kit_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00034_num_doc_checkColumnConstraints">}
-#+ Check constraints on the "iptb00034.num_doc" column
-#+
-#+ @param p_num_doc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00034_num_doc_checkColumnConstraints(p_num_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_doc LIKE iptb00034.num_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00034_num_doc_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00034_cod_mov_checkColumnConstraints">}
-#+ Check constraints on the "iptb00034.cod_mov" column
-#+
-#+ @param p_cod_mov - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00034_cod_mov_checkColumnConstraints(p_cod_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mov LIKE iptb00034.cod_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00034_cod_mov_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00034_area_checkColumnConstraints">}
-#+ Check constraints on the "iptb00034.area" column
-#+
-#+ @param p_area - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00034_area_checkColumnConstraints(p_area)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_area LIKE iptb00034.area
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00034_area_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00034_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "iptb00034.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00034_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE iptb00034.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00034_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00034_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "iptb00034.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00034_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE iptb00034.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00034_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00034_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "iptb00034.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00034_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE iptb00034.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00034_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00034_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "iptb00034.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00034_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE iptb00034.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00034_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00034_cantidad_checkColumnConstraints">}
-#+ Check constraints on the "iptb00034.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00034_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE iptb00034.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00034_cantidad_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00034_precio_checkColumnConstraints">}
-#+ Check constraints on the "iptb00034.precio" column
-#+
-#+ @param p_precio - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00034_precio_checkColumnConstraints(p_precio)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_precio LIKE iptb00034.precio
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00034_precio_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00033_checkTableConstraints">}
-#+ Check constraints on the "iptb00033" table
-#+
-#+ @param p_data - a row data LIKE iptb00033.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00033_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE iptb00033.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_iptb00033_documento_checkColumnConstraints(p_data.documento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00033_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00033_codigo_checkColumnConstraints(p_data.codigo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00033_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00033_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00033_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00033_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00033_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00033_bodega_checkColumnConstraints(p_data.bodega) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00033_checkTableConstraints
-
-{<BLOCK Name="fct.iptb00033_documento_checkColumnConstraints">}
-#+ Check constraints on the "iptb00033.documento" column
-#+
-#+ @param p_documento - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00033_documento_checkColumnConstraints(p_documento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_documento LIKE iptb00033.documento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_documento IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- documento: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00033_documento_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00033_fecha_checkColumnConstraints">}
-#+ Check constraints on the "iptb00033.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00033_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE iptb00033.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_fecha IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- fecha: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00033_fecha_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00033_codigo_checkColumnConstraints">}
-#+ Check constraints on the "iptb00033.codigo" column
-#+
-#+ @param p_codigo - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00033_codigo_checkColumnConstraints(p_codigo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codigo LIKE iptb00033.codigo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_codigo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- codigo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00033_codigo_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00033_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "iptb00033.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00033_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE iptb00033.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_n IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_n: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00033_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00033_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "iptb00033.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00033_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE iptb00033.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_grupo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_grupo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00033_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00033_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "iptb00033.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00033_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE iptb00033.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_tipo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_tipo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00033_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00033_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "iptb00033.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00033_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE iptb00033.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_sec IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_sec: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00033_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00033_cantidad_checkColumnConstraints">}
-#+ Check constraints on the "iptb00033.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(18,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00033_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE iptb00033.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cantidad IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cantidad: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00033_cantidad_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00033_bodega_checkColumnConstraints">}
-#+ Check constraints on the "iptb00033.bodega" column
-#+
-#+ @param p_bodega - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00033_bodega_checkColumnConstraints(p_bodega)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_bodega LIKE iptb00033.bodega
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_bodega IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- bodega: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00033_bodega_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00032_checkTableConstraints">}
-#+ Check constraints on the "iptb00032" table
-#+
-#+ @param p_data - a row data LIKE iptb00032.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00032_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE iptb00032.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_iptb00032_documento_checkColumnConstraints(p_data.documento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00032_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00032_usuario_checkColumnConstraints(p_data.usuario) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- CALL smarmotech_dbxconstraints_iptb00032_pk_iptb00032_checkUniqueConstraint(p_forUpdate, p_data.documento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00032_checkTableConstraints
-
-{<BLOCK Name="fct.iptb00032_pk_iptb00032_checkUniqueConstraint">}
-#+ Check the primary key uniqueness constraint on the "iptb00032"
-#+
-#+ @param p_key - Primary Key
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00032_pk_iptb00032_checkUniqueConstraint(p_forUpdate, p_key)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_key
- RECORD
- iptb00032_documento LIKE iptb00032.documento
- END RECORD
- DEFINE l_key
- RECORD
- iptb00032_documento LIKE iptb00032.documento
- END RECORD
- DEFINE l_where STRING
- DEFINE l_sqlQuery STRING
- DEFINE l_count INTEGER
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- LET l_where = "WHERE iptb00032.documento = ? "
-
- let l_sqlQuery = "SELECT COUNT(*), documento FROM iptb00032 ", l_where, " GROUP BY documento"
-
- PREPARE cur_iptb00032_pk_iptb00032_checkUniqueConstraint FROM l_sqlQuery
- EXECUTE cur_iptb00032_pk_iptb00032_checkUniqueConstraint INTO l_count, l_key.* USING p_key.*
- FREE cur_iptb00032_pk_iptb00032_checkUniqueConstraint
- IF (NOT p_forUpdate AND l_count > 0) OR (p_forUpdate AND l_count > 0 AND p_key.* != l_key.*) THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- documento: " || ERROR_BAM_00002) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00032_pk_iptb00032_checkUniqueConstraint
-
-{<BLOCK Name="fct.iptb00032_documento_checkColumnConstraints">}
-#+ Check constraints on the "iptb00032.documento" column
-#+
-#+ @param p_documento - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00032_documento_checkColumnConstraints(p_documento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_documento LIKE iptb00032.documento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_documento IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- documento: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00032_documento_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00032_fecha_checkColumnConstraints">}
-#+ Check constraints on the "iptb00032.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00032_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE iptb00032.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_fecha IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- fecha: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00032_fecha_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00032_usuario_checkColumnConstraints">}
-#+ Check constraints on the "iptb00032.usuario" column
-#+
-#+ @param p_usuario - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00032_usuario_checkColumnConstraints(p_usuario)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_usuario LIKE iptb00032.usuario
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_usuario IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- usuario: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00032_usuario_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00031_checkTableConstraints">}
-#+ Check constraints on the "iptb00031" table
-#+
-#+ @param p_data - a row data LIKE iptb00031.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00031_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE iptb00031.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_iptb00031_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00031_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00031_checkTableConstraints
-
-{<BLOCK Name="fct.iptb00031_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "iptb00031.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00031_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE iptb00031.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00031_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00031_descripcion_checkColumnConstraints">}
-#+ Check constraints on the "iptb00031.descripcion" column
-#+
-#+ @param p_descripcion - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00031_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE iptb00031.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00031_descripcion_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00030_checkTableConstraints">}
-#+ Check constraints on the "iptb00030" table
-#+
-#+ @param p_data - a row data LIKE iptb00030.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00030_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE iptb00030.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_iptb00030_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00030_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00030_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00030_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00030_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00030_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00030_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00030_checkTableConstraints
-
-{<BLOCK Name="fct.iptb00030_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "iptb00030.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00030_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE iptb00030.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00030_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00030_descripcion_checkColumnConstraints">}
-#+ Check constraints on the "iptb00030.descripcion" column
-#+
-#+ @param p_descripcion - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00030_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE iptb00030.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00030_descripcion_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00030_status_t_checkColumnConstraints">}
-#+ Check constraints on the "iptb00030.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00030_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE iptb00030.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00030_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00030_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "iptb00030.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00030_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE iptb00030.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00030_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00030_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "iptb00030.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00030_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE iptb00030.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00030_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00030_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "iptb00030.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00030_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE iptb00030.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00030_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00030_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "iptb00030.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00030_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE iptb00030.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00030_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00029_checkTableConstraints">}
-#+ Check constraints on the "iptb00029" table
-#+
-#+ @param p_data - a row data LIKE iptb00029.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00029_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE iptb00029.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_iptb00029_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00029_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00029_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00029_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00029_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00029_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00029_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00029_checkTableConstraints
-
-{<BLOCK Name="fct.iptb00029_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "iptb00029.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00029_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE iptb00029.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00029_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00029_descripcion_checkColumnConstraints">}
-#+ Check constraints on the "iptb00029.descripcion" column
-#+
-#+ @param p_descripcion - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00029_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE iptb00029.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00029_descripcion_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00029_status_t_checkColumnConstraints">}
-#+ Check constraints on the "iptb00029.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00029_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE iptb00029.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00029_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00029_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "iptb00029.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00029_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE iptb00029.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00029_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00029_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "iptb00029.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00029_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE iptb00029.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00029_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00029_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "iptb00029.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00029_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE iptb00029.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00029_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00029_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "iptb00029.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00029_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE iptb00029.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00029_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00028_checkTableConstraints">}
-#+ Check constraints on the "iptb00028" table
-#+
-#+ @param p_data - a row data LIKE iptb00028.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00028_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE iptb00028.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_iptb00028_cod_mov_checkColumnConstraints(p_data.cod_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00028_num_doc_checkColumnConstraints(p_data.num_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00028_cod_mov1_checkColumnConstraints(p_data.cod_mov1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00028_entrada_checkColumnConstraints(p_data.entrada) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00028_bodega_checkColumnConstraints(p_data.bodega) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00028_checkTableConstraints
-
-{<BLOCK Name="fct.iptb00028_cod_mov_checkColumnConstraints">}
-#+ Check constraints on the "iptb00028.cod_mov" column
-#+
-#+ @param p_cod_mov - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00028_cod_mov_checkColumnConstraints(p_cod_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mov LIKE iptb00028.cod_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00028_cod_mov_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00028_num_doc_checkColumnConstraints">}
-#+ Check constraints on the "iptb00028.num_doc" column
-#+
-#+ @param p_num_doc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00028_num_doc_checkColumnConstraints(p_num_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_doc LIKE iptb00028.num_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00028_num_doc_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00028_cod_mov1_checkColumnConstraints">}
-#+ Check constraints on the "iptb00028.cod_mov1" column
-#+
-#+ @param p_cod_mov1 - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00028_cod_mov1_checkColumnConstraints(p_cod_mov1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mov1 LIKE iptb00028.cod_mov1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00028_cod_mov1_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00028_entrada_checkColumnConstraints">}
-#+ Check constraints on the "iptb00028.entrada" column
-#+
-#+ @param p_entrada - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00028_entrada_checkColumnConstraints(p_entrada)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_entrada LIKE iptb00028.entrada
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00028_entrada_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00028_bodega_checkColumnConstraints">}
-#+ Check constraints on the "iptb00028.bodega" column
-#+
-#+ @param p_bodega - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00028_bodega_checkColumnConstraints(p_bodega)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_bodega LIKE iptb00028.bodega
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00028_bodega_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00027_checkTableConstraints">}
-#+ Check constraints on the "iptb00027" table
-#+
-#+ @param p_data - a row data LIKE iptb00027.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00027_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE iptb00027.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_iptb00027_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00027_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00027_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00027_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00027_checkTableConstraints
-
-{<BLOCK Name="fct.iptb00027_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "iptb00027.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00027_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE iptb00027.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00027_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00027_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "iptb00027.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00027_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE iptb00027.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00027_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00027_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "iptb00027.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00027_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE iptb00027.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00027_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00027_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "iptb00027.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00027_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE iptb00027.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00027_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00026_checkTableConstraints">}
-#+ Check constraints on the "iptb00026" table
-#+
-#+ @param p_data - a row data LIKE iptb00026.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00026_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE iptb00026.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_iptb00026_cod_mov_checkColumnConstraints(p_data.cod_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00026_num_doc_checkColumnConstraints(p_data.num_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00026_departamento_checkColumnConstraints(p_data.departamento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00026_bodega_checkColumnConstraints(p_data.bodega) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00026_checkTableConstraints
-
-{<BLOCK Name="fct.iptb00026_cod_mov_checkColumnConstraints">}
-#+ Check constraints on the "iptb00026.cod_mov" column
-#+
-#+ @param p_cod_mov - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00026_cod_mov_checkColumnConstraints(p_cod_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mov LIKE iptb00026.cod_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00026_cod_mov_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00026_num_doc_checkColumnConstraints">}
-#+ Check constraints on the "iptb00026.num_doc" column
-#+
-#+ @param p_num_doc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00026_num_doc_checkColumnConstraints(p_num_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_doc LIKE iptb00026.num_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00026_num_doc_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00026_departamento_checkColumnConstraints">}
-#+ Check constraints on the "iptb00026.departamento" column
-#+
-#+ @param p_departamento - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00026_departamento_checkColumnConstraints(p_departamento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_departamento LIKE iptb00026.departamento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00026_departamento_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00026_bodega_checkColumnConstraints">}
-#+ Check constraints on the "iptb00026.bodega" column
-#+
-#+ @param p_bodega - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00026_bodega_checkColumnConstraints(p_bodega)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_bodega LIKE iptb00026.bodega
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00026_bodega_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00025_checkTableConstraints">}
-#+ Check constraints on the "iptb00025" table
-#+
-#+ @param p_data - a row data LIKE iptb00025.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00025_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE iptb00025.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_iptb00025_etiqueta_checkColumnConstraints(p_data.etiqueta) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00025_cod_mov_checkColumnConstraints(p_data.cod_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00025_num_doc_checkColumnConstraints(p_data.num_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00025_area_checkColumnConstraints(p_data.area) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00025_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00025_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00025_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00025_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00025_lado_1_checkColumnConstraints(p_data.lado_1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00025_lado_2_checkColumnConstraints(p_data.lado_2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00025_lado_3_checkColumnConstraints(p_data.lado_3) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00025_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00025_medida_checkColumnConstraints(p_data.medida) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00025_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00025_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00025_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00025_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00025_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00025_checkTableConstraints
-
-{<BLOCK Name="fct.iptb00025_etiqueta_checkColumnConstraints">}
-#+ Check constraints on the "iptb00025.etiqueta" column
-#+
-#+ @param p_etiqueta - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00025_etiqueta_checkColumnConstraints(p_etiqueta)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_etiqueta LIKE iptb00025.etiqueta
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00025_etiqueta_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00025_cod_mov_checkColumnConstraints">}
-#+ Check constraints on the "iptb00025.cod_mov" column
-#+
-#+ @param p_cod_mov - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00025_cod_mov_checkColumnConstraints(p_cod_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mov LIKE iptb00025.cod_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00025_cod_mov_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00025_num_doc_checkColumnConstraints">}
-#+ Check constraints on the "iptb00025.num_doc" column
-#+
-#+ @param p_num_doc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00025_num_doc_checkColumnConstraints(p_num_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_doc LIKE iptb00025.num_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00025_num_doc_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00025_area_checkColumnConstraints">}
-#+ Check constraints on the "iptb00025.area" column
-#+
-#+ @param p_area - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00025_area_checkColumnConstraints(p_area)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_area LIKE iptb00025.area
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00025_area_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00025_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "iptb00025.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00025_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE iptb00025.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00025_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00025_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "iptb00025.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00025_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE iptb00025.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00025_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00025_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "iptb00025.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00025_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE iptb00025.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00025_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00025_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "iptb00025.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00025_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE iptb00025.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00025_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00025_lado_1_checkColumnConstraints">}
-#+ Check constraints on the "iptb00025.lado_1" column
-#+
-#+ @param p_lado_1 - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00025_lado_1_checkColumnConstraints(p_lado_1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_lado_1 LIKE iptb00025.lado_1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00025_lado_1_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00025_lado_2_checkColumnConstraints">}
-#+ Check constraints on the "iptb00025.lado_2" column
-#+
-#+ @param p_lado_2 - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00025_lado_2_checkColumnConstraints(p_lado_2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_lado_2 LIKE iptb00025.lado_2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00025_lado_2_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00025_lado_3_checkColumnConstraints">}
-#+ Check constraints on the "iptb00025.lado_3" column
-#+
-#+ @param p_lado_3 - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00025_lado_3_checkColumnConstraints(p_lado_3)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_lado_3 LIKE iptb00025.lado_3
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00025_lado_3_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00025_cantidad_checkColumnConstraints">}
-#+ Check constraints on the "iptb00025.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00025_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE iptb00025.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00025_cantidad_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00025_medida_checkColumnConstraints">}
-#+ Check constraints on the "iptb00025.medida" column
-#+
-#+ @param p_medida - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00025_medida_checkColumnConstraints(p_medida)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_medida LIKE iptb00025.medida
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00025_medida_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00025_status_t_checkColumnConstraints">}
-#+ Check constraints on the "iptb00025.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00025_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE iptb00025.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00025_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00025_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "iptb00025.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00025_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE iptb00025.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00025_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00025_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "iptb00025.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00025_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE iptb00025.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00025_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00025_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "iptb00025.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00025_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE iptb00025.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00025_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00025_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "iptb00025.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00025_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE iptb00025.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00025_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00024_checkTableConstraints">}
-#+ Check constraints on the "iptb00024" table
-#+
-#+ @param p_data - a row data LIKE iptb00024.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00024_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE iptb00024.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_iptb00024_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00024_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00024_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00024_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00024_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00024_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00024_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00024_cod_inv_checkColumnConstraints(p_data.cod_inv) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- CALL smarmotech_dbxconstraints_iptb00024_pk_iptb00024_checkUniqueConstraint(p_forUpdate, p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00024_checkTableConstraints
-
-{<BLOCK Name="fct.iptb00024_pk_iptb00024_checkUniqueConstraint">}
-#+ Check the primary key uniqueness constraint on the "iptb00024"
-#+
-#+ @param p_key - Primary Key
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00024_pk_iptb00024_checkUniqueConstraint(p_forUpdate, p_key)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_key
- RECORD
- iptb00024_cod_tipo LIKE iptb00024.cod_tipo
- END RECORD
- DEFINE l_key
- RECORD
- iptb00024_cod_tipo LIKE iptb00024.cod_tipo
- END RECORD
- DEFINE l_where STRING
- DEFINE l_sqlQuery STRING
- DEFINE l_count INTEGER
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- LET l_where = "WHERE iptb00024.cod_tipo = ? "
-
- let l_sqlQuery = "SELECT COUNT(*), cod_tipo FROM iptb00024 ", l_where, " GROUP BY cod_tipo"
-
- PREPARE cur_iptb00024_pk_iptb00024_checkUniqueConstraint FROM l_sqlQuery
- EXECUTE cur_iptb00024_pk_iptb00024_checkUniqueConstraint INTO l_count, l_key.* USING p_key.*
- FREE cur_iptb00024_pk_iptb00024_checkUniqueConstraint
- IF (NOT p_forUpdate AND l_count > 0) OR (p_forUpdate AND l_count > 0 AND p_key.* != l_key.*) THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_tipo: " || ERROR_BAM_00002) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00024_pk_iptb00024_checkUniqueConstraint
-
-{<BLOCK Name="fct.iptb00024_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "iptb00024.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00024_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE iptb00024.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_tipo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_tipo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00024_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00024_descripcion_checkColumnConstraints">}
-#+ Check constraints on the "iptb00024.descripcion" column
-#+
-#+ @param p_descripcion - VARCHAR2(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00024_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE iptb00024.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00024_descripcion_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00024_status_t_checkColumnConstraints">}
-#+ Check constraints on the "iptb00024.status_t" column
-#+
-#+ @param p_status_t - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00024_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE iptb00024.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00024_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00024_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "iptb00024.us_crea" column
-#+
-#+ @param p_us_crea - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00024_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE iptb00024.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00024_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00024_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "iptb00024.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00024_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE iptb00024.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00024_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00024_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "iptb00024.us_mod" column
-#+
-#+ @param p_us_mod - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00024_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE iptb00024.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00024_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00024_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "iptb00024.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00024_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE iptb00024.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00024_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00024_cod_inv_checkColumnConstraints">}
-#+ Check constraints on the "iptb00024.cod_inv" column
-#+
-#+ @param p_cod_inv - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00024_cod_inv_checkColumnConstraints(p_cod_inv)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_inv LIKE iptb00024.cod_inv
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00024_cod_inv_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00022_checkTableConstraints">}
-#+ Check constraints on the "iptb00022" table
-#+
-#+ @param p_data - a row data LIKE iptb00022.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00022_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE iptb00022.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_iptb00022_cod_cia_checkColumnConstraints(p_data.cod_cia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00022_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00022_departamento_checkColumnConstraints(p_data.departamento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00022_cuenta_no_checkColumnConstraints(p_data.cuenta_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00022_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00022_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00022_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00022_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00022_checkTableConstraints
-
-{<BLOCK Name="fct.iptb00022_cod_cia_checkColumnConstraints">}
-#+ Check constraints on the "iptb00022.cod_cia" column
-#+
-#+ @param p_cod_cia - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00022_cod_cia_checkColumnConstraints(p_cod_cia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_cia LIKE iptb00022.cod_cia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00022_cod_cia_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00022_descripcion_checkColumnConstraints">}
-#+ Check constraints on the "iptb00022.descripcion" column
-#+
-#+ @param p_descripcion - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00022_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE iptb00022.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00022_descripcion_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00022_departamento_checkColumnConstraints">}
-#+ Check constraints on the "iptb00022.departamento" column
-#+
-#+ @param p_departamento - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00022_departamento_checkColumnConstraints(p_departamento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_departamento LIKE iptb00022.departamento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00022_departamento_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00022_cuenta_no_checkColumnConstraints">}
-#+ Check constraints on the "iptb00022.cuenta_no" column
-#+
-#+ @param p_cuenta_no - CHAR(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00022_cuenta_no_checkColumnConstraints(p_cuenta_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cuenta_no LIKE iptb00022.cuenta_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00022_cuenta_no_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00022_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "iptb00022.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00022_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE iptb00022.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00022_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00022_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "iptb00022.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00022_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE iptb00022.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00022_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00022_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "iptb00022.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00022_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE iptb00022.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00022_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00022_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "iptb00022.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00022_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE iptb00022.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00022_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00021_checkTableConstraints">}
-#+ Check constraints on the "iptb00021" table
-#+
-#+ @param p_data - a row data LIKE iptb00021.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00021_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE iptb00021.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_iptb00021_cod_cia_checkColumnConstraints(p_data.cod_cia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00021_nombre_cia_checkColumnConstraints(p_data.nombre_cia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00021_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00021_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00021_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00021_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00021_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00021_checkTableConstraints
-
-{<BLOCK Name="fct.iptb00021_cod_cia_checkColumnConstraints">}
-#+ Check constraints on the "iptb00021.cod_cia" column
-#+
-#+ @param p_cod_cia - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00021_cod_cia_checkColumnConstraints(p_cod_cia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_cia LIKE iptb00021.cod_cia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_cia IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_cia: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00021_cod_cia_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00021_nombre_cia_checkColumnConstraints">}
-#+ Check constraints on the "iptb00021.nombre_cia" column
-#+
-#+ @param p_nombre_cia - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00021_nombre_cia_checkColumnConstraints(p_nombre_cia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombre_cia LIKE iptb00021.nombre_cia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00021_nombre_cia_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00021_status_t_checkColumnConstraints">}
-#+ Check constraints on the "iptb00021.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00021_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE iptb00021.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00021_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00021_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "iptb00021.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00021_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE iptb00021.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00021_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00021_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "iptb00021.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00021_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE iptb00021.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00021_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00021_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "iptb00021.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00021_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE iptb00021.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00021_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00021_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "iptb00021.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00021_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE iptb00021.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00021_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00020_checkTableConstraints">}
-#+ Check constraints on the "iptb00020" table
-#+
-#+ @param p_data - a row data LIKE iptb00020.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00020_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE iptb00020.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_iptb00020_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00020_producto_checkColumnConstraints(p_data.producto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00020_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00020_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00020_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00020_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00020_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00020_cod_inv_checkColumnConstraints(p_data.cod_inv) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00020_comentario_checkColumnConstraints(p_data.comentario) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00020_checkTableConstraints
-
-{<BLOCK Name="fct.iptb00020_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "iptb00020.cod_n" column
-#+
-#+ @param p_cod_n - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00020_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE iptb00020.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_n IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_n: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00020_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00020_producto_checkColumnConstraints">}
-#+ Check constraints on the "iptb00020.producto" column
-#+
-#+ @param p_producto - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00020_producto_checkColumnConstraints(p_producto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_producto LIKE iptb00020.producto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00020_producto_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00020_status_t_checkColumnConstraints">}
-#+ Check constraints on the "iptb00020.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00020_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE iptb00020.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00020_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00020_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "iptb00020.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00020_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE iptb00020.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00020_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00020_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "iptb00020.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00020_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE iptb00020.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00020_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00020_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "iptb00020.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00020_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE iptb00020.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00020_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00020_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "iptb00020.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00020_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE iptb00020.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00020_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00020_cod_inv_checkColumnConstraints">}
-#+ Check constraints on the "iptb00020.cod_inv" column
-#+
-#+ @param p_cod_inv - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00020_cod_inv_checkColumnConstraints(p_cod_inv)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_inv LIKE iptb00020.cod_inv
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00020_cod_inv_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00020_comentario_checkColumnConstraints">}
-#+ Check constraints on the "iptb00020.comentario" column
-#+
-#+ @param p_comentario - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00020_comentario_checkColumnConstraints(p_comentario)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_comentario LIKE iptb00020.comentario
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00020_comentario_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00019_checkTableConstraints">}
-#+ Check constraints on the "iptb00019" table
-#+
-#+ @param p_data - a row data LIKE iptb00019.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00019_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE iptb00019.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_iptb00019_marca_checkColumnConstraints(p_data.marca) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00019_nombre_marca_checkColumnConstraints(p_data.nombre_marca) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00019_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00019_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00019_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00019_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00019_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00019_checkTableConstraints
-
-{<BLOCK Name="fct.iptb00019_marca_checkColumnConstraints">}
-#+ Check constraints on the "iptb00019.marca" column
-#+
-#+ @param p_marca - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00019_marca_checkColumnConstraints(p_marca)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_marca LIKE iptb00019.marca
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00019_marca_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00019_nombre_marca_checkColumnConstraints">}
-#+ Check constraints on the "iptb00019.nombre_marca" column
-#+
-#+ @param p_nombre_marca - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00019_nombre_marca_checkColumnConstraints(p_nombre_marca)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombre_marca LIKE iptb00019.nombre_marca
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00019_nombre_marca_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00019_status_t_checkColumnConstraints">}
-#+ Check constraints on the "iptb00019.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00019_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE iptb00019.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00019_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00019_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "iptb00019.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00019_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE iptb00019.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00019_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00019_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "iptb00019.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00019_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE iptb00019.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00019_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00019_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "iptb00019.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00019_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE iptb00019.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00019_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00019_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "iptb00019.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00019_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE iptb00019.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00019_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00017_checkTableConstraints">}
-#+ Check constraints on the "iptb00017" table
-#+
-#+ @param p_data - a row data LIKE iptb00017.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00017_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE iptb00017.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_iptb00017_cod_cia_checkColumnConstraints(p_data.cod_cia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00017_num_doc_checkColumnConstraints(p_data.num_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00017_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00017_fact_no_checkColumnConstraints(p_data.fact_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00017_conduce_no_checkColumnConstraints(p_data.conduce_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00017_tipo_checkColumnConstraints(p_data.tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00017_orden_compra_checkColumnConstraints(p_data.orden_compra) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00017_cod_sp_checkColumnConstraints(p_data.cod_sp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00017_cod_sp_sec_checkColumnConstraints(p_data.cod_sp_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00017_cod_transp_checkColumnConstraints(p_data.cod_transp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00017_sec_transp_checkColumnConstraints(p_data.sec_transp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00017_placa_checkColumnConstraints(p_data.placa) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00017_cod_tarifa_checkColumnConstraints(p_data.cod_tarifa) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00017_cod_mov_checkColumnConstraints(p_data.cod_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00017_detalle_checkColumnConstraints(p_data.detalle) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00017_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00017_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00017_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00017_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00017_cantidad_1_checkColumnConstraints(p_data.cantidad_1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00017_cantidad_2_checkColumnConstraints(p_data.cantidad_2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00017_cond_recep_checkColumnConstraints(p_data.cond_recep) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00017_uso_tiempo_checkColumnConstraints(p_data.uso_tiempo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00017_bodega_checkColumnConstraints(p_data.bodega) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00017_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00017_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00017_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00017_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00017_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00017_checkTableConstraints
-
-{<BLOCK Name="fct.iptb00017_cod_cia_checkColumnConstraints">}
-#+ Check constraints on the "iptb00017.cod_cia" column
-#+
-#+ @param p_cod_cia - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00017_cod_cia_checkColumnConstraints(p_cod_cia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_cia LIKE iptb00017.cod_cia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00017_cod_cia_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00017_num_doc_checkColumnConstraints">}
-#+ Check constraints on the "iptb00017.num_doc" column
-#+
-#+ @param p_num_doc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00017_num_doc_checkColumnConstraints(p_num_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_doc LIKE iptb00017.num_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_num_doc IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- num_doc: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00017_num_doc_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00017_fecha_checkColumnConstraints">}
-#+ Check constraints on the "iptb00017.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00017_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE iptb00017.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00017_fecha_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00017_fact_no_checkColumnConstraints">}
-#+ Check constraints on the "iptb00017.fact_no" column
-#+
-#+ @param p_fact_no - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00017_fact_no_checkColumnConstraints(p_fact_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fact_no LIKE iptb00017.fact_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00017_fact_no_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00017_conduce_no_checkColumnConstraints">}
-#+ Check constraints on the "iptb00017.conduce_no" column
-#+
-#+ @param p_conduce_no - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00017_conduce_no_checkColumnConstraints(p_conduce_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_conduce_no LIKE iptb00017.conduce_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00017_conduce_no_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00017_tipo_checkColumnConstraints">}
-#+ Check constraints on the "iptb00017.tipo" column
-#+
-#+ @param p_tipo - CHAR(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00017_tipo_checkColumnConstraints(p_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo LIKE iptb00017.tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00017_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00017_orden_compra_checkColumnConstraints">}
-#+ Check constraints on the "iptb00017.orden_compra" column
-#+
-#+ @param p_orden_compra - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00017_orden_compra_checkColumnConstraints(p_orden_compra)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_orden_compra LIKE iptb00017.orden_compra
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00017_orden_compra_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00017_cod_sp_checkColumnConstraints">}
-#+ Check constraints on the "iptb00017.cod_sp" column
-#+
-#+ @param p_cod_sp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00017_cod_sp_checkColumnConstraints(p_cod_sp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sp LIKE iptb00017.cod_sp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00017_cod_sp_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00017_cod_sp_sec_checkColumnConstraints">}
-#+ Check constraints on the "iptb00017.cod_sp_sec" column
-#+
-#+ @param p_cod_sp_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00017_cod_sp_sec_checkColumnConstraints(p_cod_sp_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sp_sec LIKE iptb00017.cod_sp_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00017_cod_sp_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00017_cod_transp_checkColumnConstraints">}
-#+ Check constraints on the "iptb00017.cod_transp" column
-#+
-#+ @param p_cod_transp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00017_cod_transp_checkColumnConstraints(p_cod_transp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_transp LIKE iptb00017.cod_transp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00017_cod_transp_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00017_sec_transp_checkColumnConstraints">}
-#+ Check constraints on the "iptb00017.sec_transp" column
-#+
-#+ @param p_sec_transp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00017_sec_transp_checkColumnConstraints(p_sec_transp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_transp LIKE iptb00017.sec_transp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00017_sec_transp_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00017_placa_checkColumnConstraints">}
-#+ Check constraints on the "iptb00017.placa" column
-#+
-#+ @param p_placa - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00017_placa_checkColumnConstraints(p_placa)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_placa LIKE iptb00017.placa
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00017_placa_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00017_cod_tarifa_checkColumnConstraints">}
-#+ Check constraints on the "iptb00017.cod_tarifa" column
-#+
-#+ @param p_cod_tarifa - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00017_cod_tarifa_checkColumnConstraints(p_cod_tarifa)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tarifa LIKE iptb00017.cod_tarifa
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00017_cod_tarifa_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00017_cod_mov_checkColumnConstraints">}
-#+ Check constraints on the "iptb00017.cod_mov" column
-#+
-#+ @param p_cod_mov - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00017_cod_mov_checkColumnConstraints(p_cod_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mov LIKE iptb00017.cod_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00017_cod_mov_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00017_detalle_checkColumnConstraints">}
-#+ Check constraints on the "iptb00017.detalle" column
-#+
-#+ @param p_detalle - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00017_detalle_checkColumnConstraints(p_detalle)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_detalle LIKE iptb00017.detalle
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00017_detalle_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00017_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "iptb00017.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00017_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE iptb00017.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00017_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00017_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "iptb00017.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00017_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE iptb00017.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00017_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00017_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "iptb00017.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00017_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE iptb00017.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00017_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00017_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "iptb00017.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00017_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE iptb00017.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00017_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00017_cantidad_1_checkColumnConstraints">}
-#+ Check constraints on the "iptb00017.cantidad_1" column
-#+
-#+ @param p_cantidad_1 - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00017_cantidad_1_checkColumnConstraints(p_cantidad_1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad_1 LIKE iptb00017.cantidad_1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00017_cantidad_1_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00017_cantidad_2_checkColumnConstraints">}
-#+ Check constraints on the "iptb00017.cantidad_2" column
-#+
-#+ @param p_cantidad_2 - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00017_cantidad_2_checkColumnConstraints(p_cantidad_2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad_2 LIKE iptb00017.cantidad_2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00017_cantidad_2_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00017_cond_recep_checkColumnConstraints">}
-#+ Check constraints on the "iptb00017.cond_recep" column
-#+
-#+ @param p_cond_recep - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00017_cond_recep_checkColumnConstraints(p_cond_recep)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cond_recep LIKE iptb00017.cond_recep
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00017_cond_recep_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00017_uso_tiempo_checkColumnConstraints">}
-#+ Check constraints on the "iptb00017.uso_tiempo" column
-#+
-#+ @param p_uso_tiempo - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00017_uso_tiempo_checkColumnConstraints(p_uso_tiempo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_uso_tiempo LIKE iptb00017.uso_tiempo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00017_uso_tiempo_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00017_bodega_checkColumnConstraints">}
-#+ Check constraints on the "iptb00017.bodega" column
-#+
-#+ @param p_bodega - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00017_bodega_checkColumnConstraints(p_bodega)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_bodega LIKE iptb00017.bodega
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00017_bodega_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00017_status_t_checkColumnConstraints">}
-#+ Check constraints on the "iptb00017.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00017_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE iptb00017.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00017_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00017_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "iptb00017.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00017_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE iptb00017.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00017_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00017_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "iptb00017.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00017_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE iptb00017.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00017_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00017_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "iptb00017.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00017_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE iptb00017.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00017_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00017_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "iptb00017.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00017_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE iptb00017.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00017_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00015_checkTableConstraints">}
-#+ Check constraints on the "iptb00015" table
-#+
-#+ @param p_data - a row data LIKE iptb00015.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00015_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE iptb00015.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_iptb00015_fecha_conteo_checkColumnConstraints(p_data.fecha_conteo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00015_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00015_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00015_checkTableConstraints
-
-{<BLOCK Name="fct.iptb00015_fecha_conteo_checkColumnConstraints">}
-#+ Check constraints on the "iptb00015.fecha_conteo" column
-#+
-#+ @param p_fecha_conteo - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00015_fecha_conteo_checkColumnConstraints(p_fecha_conteo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_conteo LIKE iptb00015.fecha_conteo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00015_fecha_conteo_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00015_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "iptb00015.us_mod" column
-#+
-#+ @param p_us_mod - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00015_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE iptb00015.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00015_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00015_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "iptb00015.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00015_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE iptb00015.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00015_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00014_checkTableConstraints">}
-#+ Check constraints on the "iptb00014" table
-#+
-#+ @param p_data - a row data LIKE iptb00014.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00014_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE iptb00014.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_iptb00014_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00014_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00014_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00014_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00014_precio_min_checkColumnConstraints(p_data.precio_min) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00014_precio_lista_checkColumnConstraints(p_data.precio_lista) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00014_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00014_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00014_fecha_crea_checkColumnConstraints(p_data.fecha_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00014_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00014_fecha_mod_checkColumnConstraints(p_data.fecha_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00014_checkTableConstraints
-
-{<BLOCK Name="fct.iptb00014_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "iptb00014.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00014_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE iptb00014.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_n IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_n: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00014_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00014_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "iptb00014.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00014_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE iptb00014.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_grupo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_grupo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00014_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00014_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "iptb00014.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00014_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE iptb00014.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_tipo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_tipo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00014_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00014_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "iptb00014.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00014_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE iptb00014.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_sec IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_sec: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00014_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00014_precio_min_checkColumnConstraints">}
-#+ Check constraints on the "iptb00014.precio_min" column
-#+
-#+ @param p_precio_min - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00014_precio_min_checkColumnConstraints(p_precio_min)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_precio_min LIKE iptb00014.precio_min
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00014_precio_min_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00014_precio_lista_checkColumnConstraints">}
-#+ Check constraints on the "iptb00014.precio_lista" column
-#+
-#+ @param p_precio_lista - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00014_precio_lista_checkColumnConstraints(p_precio_lista)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_precio_lista LIKE iptb00014.precio_lista
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00014_precio_lista_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00014_status_t_checkColumnConstraints">}
-#+ Check constraints on the "iptb00014.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00014_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE iptb00014.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00014_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00014_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "iptb00014.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00014_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE iptb00014.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00014_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00014_fecha_crea_checkColumnConstraints">}
-#+ Check constraints on the "iptb00014.fecha_crea" column
-#+
-#+ @param p_fecha_crea - VARCHAR2(27) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00014_fecha_crea_checkColumnConstraints(p_fecha_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_crea LIKE iptb00014.fecha_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00014_fecha_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00014_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "iptb00014.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00014_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE iptb00014.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00014_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00014_fecha_mod_checkColumnConstraints">}
-#+ Check constraints on the "iptb00014.fecha_mod" column
-#+
-#+ @param p_fecha_mod - VARCHAR2(27) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00014_fecha_mod_checkColumnConstraints(p_fecha_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_mod LIKE iptb00014.fecha_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00014_fecha_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00013_checkTableConstraints">}
-#+ Check constraints on the "iptb00013" table
-#+
-#+ @param p_data - a row data LIKE iptb00013.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00013_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE iptb00013.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_iptb00013_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00013_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00013_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00013_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00013_tipo_prod_checkColumnConstraints(p_data.tipo_prod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00013_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00013_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00013_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00013_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00013_checkTableConstraints
-
-{<BLOCK Name="fct.iptb00013_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "iptb00013.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00013_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE iptb00013.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00013_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00013_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "iptb00013.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00013_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE iptb00013.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00013_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00013_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "iptb00013.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00013_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE iptb00013.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00013_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00013_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "iptb00013.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00013_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE iptb00013.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00013_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00013_tipo_prod_checkColumnConstraints">}
-#+ Check constraints on the "iptb00013.tipo_prod" column
-#+
-#+ @param p_tipo_prod - CHAR(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00013_tipo_prod_checkColumnConstraints(p_tipo_prod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_prod LIKE iptb00013.tipo_prod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00013_tipo_prod_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00013_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "iptb00013.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00013_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE iptb00013.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00013_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00013_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "iptb00013.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00013_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE iptb00013.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00013_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00013_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "iptb00013.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00013_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE iptb00013.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00013_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00013_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "iptb00013.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00013_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE iptb00013.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00013_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00012_checkTableConstraints">}
-#+ Check constraints on the "iptb00012" table
-#+
-#+ @param p_data - a row data LIKE iptb00012.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00012_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE iptb00012.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_iptb00012_idtrx_checkColumnConstraints(p_data.idtrx) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00012_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00012_bodega_checkColumnConstraints(p_data.bodega) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00012_cod_seccion_checkColumnConstraints(p_data.cod_seccion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00012_cod_tramo_checkColumnConstraints(p_data.cod_tramo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00012_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00012_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00012_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00012_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00012_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00012_balance_checkColumnConstraints(p_data.balance) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00012_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00012_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00012_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00012_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00012_lado_1_checkColumnConstraints(p_data.lado_1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00012_lado_2_checkColumnConstraints(p_data.lado_2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00012_lado_3_checkColumnConstraints(p_data.lado_3) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00012_checkTableConstraints
-
-{<BLOCK Name="fct.iptb00012_idtrx_checkColumnConstraints">}
-#+ Check constraints on the "iptb00012.idtrx" column
-#+
-#+ @param p_idtrx - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00012_idtrx_checkColumnConstraints(p_idtrx)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_idtrx LIKE iptb00012.idtrx
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00012_idtrx_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00012_fecha_checkColumnConstraints">}
-#+ Check constraints on the "iptb00012.fecha" column
-#+
-#+ @param p_fecha - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00012_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE iptb00012.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00012_fecha_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00012_bodega_checkColumnConstraints">}
-#+ Check constraints on the "iptb00012.bodega" column
-#+
-#+ @param p_bodega - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00012_bodega_checkColumnConstraints(p_bodega)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_bodega LIKE iptb00012.bodega
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00012_bodega_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00012_cod_seccion_checkColumnConstraints">}
-#+ Check constraints on the "iptb00012.cod_seccion" column
-#+
-#+ @param p_cod_seccion - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00012_cod_seccion_checkColumnConstraints(p_cod_seccion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_seccion LIKE iptb00012.cod_seccion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00012_cod_seccion_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00012_cod_tramo_checkColumnConstraints">}
-#+ Check constraints on the "iptb00012.cod_tramo" column
-#+
-#+ @param p_cod_tramo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00012_cod_tramo_checkColumnConstraints(p_cod_tramo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tramo LIKE iptb00012.cod_tramo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00012_cod_tramo_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00012_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "iptb00012.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00012_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE iptb00012.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00012_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00012_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "iptb00012.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00012_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE iptb00012.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00012_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00012_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "iptb00012.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00012_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE iptb00012.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00012_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00012_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "iptb00012.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00012_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE iptb00012.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00012_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00012_cantidad_checkColumnConstraints">}
-#+ Check constraints on the "iptb00012.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00012_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE iptb00012.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00012_cantidad_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00012_balance_checkColumnConstraints">}
-#+ Check constraints on the "iptb00012.balance" column
-#+
-#+ @param p_balance - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00012_balance_checkColumnConstraints(p_balance)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_balance LIKE iptb00012.balance
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00012_balance_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00012_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "iptb00012.us_crea" column
-#+
-#+ @param p_us_crea - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00012_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE iptb00012.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00012_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00012_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "iptb00012.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00012_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE iptb00012.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00012_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00012_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "iptb00012.us_mod" column
-#+
-#+ @param p_us_mod - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00012_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE iptb00012.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00012_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00012_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "iptb00012.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00012_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE iptb00012.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00012_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00012_lado_1_checkColumnConstraints">}
-#+ Check constraints on the "iptb00012.lado_1" column
-#+
-#+ @param p_lado_1 - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00012_lado_1_checkColumnConstraints(p_lado_1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_lado_1 LIKE iptb00012.lado_1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00012_lado_1_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00012_lado_2_checkColumnConstraints">}
-#+ Check constraints on the "iptb00012.lado_2" column
-#+
-#+ @param p_lado_2 - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00012_lado_2_checkColumnConstraints(p_lado_2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_lado_2 LIKE iptb00012.lado_2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00012_lado_2_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00012_lado_3_checkColumnConstraints">}
-#+ Check constraints on the "iptb00012.lado_3" column
-#+
-#+ @param p_lado_3 - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00012_lado_3_checkColumnConstraints(p_lado_3)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_lado_3 LIKE iptb00012.lado_3
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00012_lado_3_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00011_checkTableConstraints">}
-#+ Check constraints on the "iptb00011" table
-#+
-#+ @param p_data - a row data LIKE iptb00011.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00011_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE iptb00011.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_iptb00011_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00011_bodega_checkColumnConstraints(p_data.bodega) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00011_cod_seccion_checkColumnConstraints(p_data.cod_seccion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00011_cod_tramo_checkColumnConstraints(p_data.cod_tramo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00011_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00011_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00011_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00011_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00011_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00011_balance_checkColumnConstraints(p_data.balance) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00011_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00011_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00011_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00011_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00011_checkTableConstraints
-
-{<BLOCK Name="fct.iptb00011_fecha_checkColumnConstraints">}
-#+ Check constraints on the "iptb00011.fecha" column
-#+
-#+ @param p_fecha - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00011_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE iptb00011.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_fecha IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- fecha: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00011_fecha_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00011_bodega_checkColumnConstraints">}
-#+ Check constraints on the "iptb00011.bodega" column
-#+
-#+ @param p_bodega - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00011_bodega_checkColumnConstraints(p_bodega)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_bodega LIKE iptb00011.bodega
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_bodega IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- bodega: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00011_bodega_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00011_cod_seccion_checkColumnConstraints">}
-#+ Check constraints on the "iptb00011.cod_seccion" column
-#+
-#+ @param p_cod_seccion - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00011_cod_seccion_checkColumnConstraints(p_cod_seccion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_seccion LIKE iptb00011.cod_seccion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_seccion IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_seccion: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00011_cod_seccion_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00011_cod_tramo_checkColumnConstraints">}
-#+ Check constraints on the "iptb00011.cod_tramo" column
-#+
-#+ @param p_cod_tramo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00011_cod_tramo_checkColumnConstraints(p_cod_tramo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tramo LIKE iptb00011.cod_tramo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_tramo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_tramo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00011_cod_tramo_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00011_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "iptb00011.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00011_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE iptb00011.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_n IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_n: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00011_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00011_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "iptb00011.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00011_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE iptb00011.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_grupo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_grupo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00011_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00011_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "iptb00011.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00011_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE iptb00011.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_tipo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_tipo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00011_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00011_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "iptb00011.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00011_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE iptb00011.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_sec IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_sec: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00011_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00011_cantidad_checkColumnConstraints">}
-#+ Check constraints on the "iptb00011.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00011_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE iptb00011.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cantidad IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cantidad: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00011_cantidad_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00011_balance_checkColumnConstraints">}
-#+ Check constraints on the "iptb00011.balance" column
-#+
-#+ @param p_balance - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00011_balance_checkColumnConstraints(p_balance)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_balance LIKE iptb00011.balance
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00011_balance_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00011_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "iptb00011.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00011_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE iptb00011.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00011_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00011_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "iptb00011.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00011_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE iptb00011.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00011_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00011_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "iptb00011.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00011_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE iptb00011.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00011_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00011_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "iptb00011.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00011_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE iptb00011.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00011_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00010_checkTableConstraints">}
-#+ Check constraints on the "iptb00010" table
-#+
-#+ @param p_data - a row data LIKE iptb00010.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00010_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE iptb00010.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_iptb00010_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00010_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00010_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00010_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00010_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00010_cod_barra1_checkColumnConstraints(p_data.cod_barra1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00010_cod_barra2_checkColumnConstraints(p_data.cod_barra2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00010_conversion_checkColumnConstraints(p_data.conversion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00010_cod_dumm1_checkColumnConstraints(p_data.cod_dumm1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00010_cod_dumm2_checkColumnConstraints(p_data.cod_dumm2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00010_cod_dumm3_checkColumnConstraints(p_data.cod_dumm3) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00010_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00010_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00010_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00010_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00010_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00010_checkTableConstraints
-
-{<BLOCK Name="fct.iptb00010_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "iptb00010.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00010_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE iptb00010.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00010_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00010_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "iptb00010.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00010_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE iptb00010.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00010_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00010_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "iptb00010.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00010_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE iptb00010.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00010_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00010_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "iptb00010.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00010_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE iptb00010.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00010_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00010_descripcion_checkColumnConstraints">}
-#+ Check constraints on the "iptb00010.descripcion" column
-#+
-#+ @param p_descripcion - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00010_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE iptb00010.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00010_descripcion_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00010_cod_barra1_checkColumnConstraints">}
-#+ Check constraints on the "iptb00010.cod_barra1" column
-#+
-#+ @param p_cod_barra1 - CHAR(13) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00010_cod_barra1_checkColumnConstraints(p_cod_barra1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_barra1 LIKE iptb00010.cod_barra1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00010_cod_barra1_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00010_cod_barra2_checkColumnConstraints">}
-#+ Check constraints on the "iptb00010.cod_barra2" column
-#+
-#+ @param p_cod_barra2 - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00010_cod_barra2_checkColumnConstraints(p_cod_barra2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_barra2 LIKE iptb00010.cod_barra2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00010_cod_barra2_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00010_conversion_checkColumnConstraints">}
-#+ Check constraints on the "iptb00010.conversion" column
-#+
-#+ @param p_conversion - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00010_conversion_checkColumnConstraints(p_conversion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_conversion LIKE iptb00010.conversion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00010_conversion_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00010_cod_dumm1_checkColumnConstraints">}
-#+ Check constraints on the "iptb00010.cod_dumm1" column
-#+
-#+ @param p_cod_dumm1 - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00010_cod_dumm1_checkColumnConstraints(p_cod_dumm1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_dumm1 LIKE iptb00010.cod_dumm1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00010_cod_dumm1_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00010_cod_dumm2_checkColumnConstraints">}
-#+ Check constraints on the "iptb00010.cod_dumm2" column
-#+
-#+ @param p_cod_dumm2 - CHAR(12) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00010_cod_dumm2_checkColumnConstraints(p_cod_dumm2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_dumm2 LIKE iptb00010.cod_dumm2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00010_cod_dumm2_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00010_cod_dumm3_checkColumnConstraints">}
-#+ Check constraints on the "iptb00010.cod_dumm3" column
-#+
-#+ @param p_cod_dumm3 - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00010_cod_dumm3_checkColumnConstraints(p_cod_dumm3)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_dumm3 LIKE iptb00010.cod_dumm3
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00010_cod_dumm3_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00010_status_t_checkColumnConstraints">}
-#+ Check constraints on the "iptb00010.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00010_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE iptb00010.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00010_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00010_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "iptb00010.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00010_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE iptb00010.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00010_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00010_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "iptb00010.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00010_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE iptb00010.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00010_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00010_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "iptb00010.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00010_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE iptb00010.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00010_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00010_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "iptb00010.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00010_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE iptb00010.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00010_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00008_checkTableConstraints">}
-#+ Check constraints on the "iptb00008" table
-#+
-#+ @param p_data - a row data LIKE iptb00008.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00008_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE iptb00008.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_iptb00008_cod_cia_checkColumnConstraints(p_data.cod_cia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00008_num_doc_checkColumnConstraints(p_data.num_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00008_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00008_fact_no_checkColumnConstraints(p_data.fact_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00008_conduce_no_checkColumnConstraints(p_data.conduce_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00008_tipo_checkColumnConstraints(p_data.tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00008_orden_compra_checkColumnConstraints(p_data.orden_compra) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00008_cod_sp_checkColumnConstraints(p_data.cod_sp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00008_cod_sp_sec_checkColumnConstraints(p_data.cod_sp_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00008_cod_transp_checkColumnConstraints(p_data.cod_transp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00008_sec_transp_checkColumnConstraints(p_data.sec_transp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00008_placa_checkColumnConstraints(p_data.placa) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00008_cod_tarifa_checkColumnConstraints(p_data.cod_tarifa) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00008_cod_mov_checkColumnConstraints(p_data.cod_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00008_detalle_checkColumnConstraints(p_data.detalle) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00008_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00008_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00008_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00008_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00008_cantidad_1_checkColumnConstraints(p_data.cantidad_1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00008_cantidad_2_checkColumnConstraints(p_data.cantidad_2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00008_cond_recep_checkColumnConstraints(p_data.cond_recep) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00008_uso_tiempo_checkColumnConstraints(p_data.uso_tiempo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00008_bodega_checkColumnConstraints(p_data.bodega) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00008_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00008_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00008_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00008_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00008_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00008_checkTableConstraints
-
-{<BLOCK Name="fct.iptb00008_cod_cia_checkColumnConstraints">}
-#+ Check constraints on the "iptb00008.cod_cia" column
-#+
-#+ @param p_cod_cia - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00008_cod_cia_checkColumnConstraints(p_cod_cia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_cia LIKE iptb00008.cod_cia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00008_cod_cia_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00008_num_doc_checkColumnConstraints">}
-#+ Check constraints on the "iptb00008.num_doc" column
-#+
-#+ @param p_num_doc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00008_num_doc_checkColumnConstraints(p_num_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_doc LIKE iptb00008.num_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_num_doc IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- num_doc: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00008_num_doc_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00008_fecha_checkColumnConstraints">}
-#+ Check constraints on the "iptb00008.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00008_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE iptb00008.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00008_fecha_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00008_fact_no_checkColumnConstraints">}
-#+ Check constraints on the "iptb00008.fact_no" column
-#+
-#+ @param p_fact_no - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00008_fact_no_checkColumnConstraints(p_fact_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fact_no LIKE iptb00008.fact_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00008_fact_no_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00008_conduce_no_checkColumnConstraints">}
-#+ Check constraints on the "iptb00008.conduce_no" column
-#+
-#+ @param p_conduce_no - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00008_conduce_no_checkColumnConstraints(p_conduce_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_conduce_no LIKE iptb00008.conduce_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00008_conduce_no_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00008_tipo_checkColumnConstraints">}
-#+ Check constraints on the "iptb00008.tipo" column
-#+
-#+ @param p_tipo - CHAR(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00008_tipo_checkColumnConstraints(p_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo LIKE iptb00008.tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00008_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00008_orden_compra_checkColumnConstraints">}
-#+ Check constraints on the "iptb00008.orden_compra" column
-#+
-#+ @param p_orden_compra - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00008_orden_compra_checkColumnConstraints(p_orden_compra)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_orden_compra LIKE iptb00008.orden_compra
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00008_orden_compra_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00008_cod_sp_checkColumnConstraints">}
-#+ Check constraints on the "iptb00008.cod_sp" column
-#+
-#+ @param p_cod_sp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00008_cod_sp_checkColumnConstraints(p_cod_sp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sp LIKE iptb00008.cod_sp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00008_cod_sp_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00008_cod_sp_sec_checkColumnConstraints">}
-#+ Check constraints on the "iptb00008.cod_sp_sec" column
-#+
-#+ @param p_cod_sp_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00008_cod_sp_sec_checkColumnConstraints(p_cod_sp_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sp_sec LIKE iptb00008.cod_sp_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00008_cod_sp_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00008_cod_transp_checkColumnConstraints">}
-#+ Check constraints on the "iptb00008.cod_transp" column
-#+
-#+ @param p_cod_transp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00008_cod_transp_checkColumnConstraints(p_cod_transp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_transp LIKE iptb00008.cod_transp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00008_cod_transp_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00008_sec_transp_checkColumnConstraints">}
-#+ Check constraints on the "iptb00008.sec_transp" column
-#+
-#+ @param p_sec_transp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00008_sec_transp_checkColumnConstraints(p_sec_transp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_transp LIKE iptb00008.sec_transp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00008_sec_transp_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00008_placa_checkColumnConstraints">}
-#+ Check constraints on the "iptb00008.placa" column
-#+
-#+ @param p_placa - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00008_placa_checkColumnConstraints(p_placa)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_placa LIKE iptb00008.placa
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00008_placa_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00008_cod_tarifa_checkColumnConstraints">}
-#+ Check constraints on the "iptb00008.cod_tarifa" column
-#+
-#+ @param p_cod_tarifa - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00008_cod_tarifa_checkColumnConstraints(p_cod_tarifa)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tarifa LIKE iptb00008.cod_tarifa
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00008_cod_tarifa_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00008_cod_mov_checkColumnConstraints">}
-#+ Check constraints on the "iptb00008.cod_mov" column
-#+
-#+ @param p_cod_mov - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00008_cod_mov_checkColumnConstraints(p_cod_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mov LIKE iptb00008.cod_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_mov IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_mov: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00008_cod_mov_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00008_detalle_checkColumnConstraints">}
-#+ Check constraints on the "iptb00008.detalle" column
-#+
-#+ @param p_detalle - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00008_detalle_checkColumnConstraints(p_detalle)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_detalle LIKE iptb00008.detalle
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00008_detalle_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00008_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "iptb00008.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00008_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE iptb00008.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00008_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00008_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "iptb00008.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00008_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE iptb00008.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00008_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00008_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "iptb00008.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00008_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE iptb00008.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00008_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00008_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "iptb00008.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00008_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE iptb00008.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00008_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00008_cantidad_1_checkColumnConstraints">}
-#+ Check constraints on the "iptb00008.cantidad_1" column
-#+
-#+ @param p_cantidad_1 - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00008_cantidad_1_checkColumnConstraints(p_cantidad_1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad_1 LIKE iptb00008.cantidad_1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00008_cantidad_1_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00008_cantidad_2_checkColumnConstraints">}
-#+ Check constraints on the "iptb00008.cantidad_2" column
-#+
-#+ @param p_cantidad_2 - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00008_cantidad_2_checkColumnConstraints(p_cantidad_2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad_2 LIKE iptb00008.cantidad_2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cantidad_2 IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cantidad_2: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00008_cantidad_2_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00008_cond_recep_checkColumnConstraints">}
-#+ Check constraints on the "iptb00008.cond_recep" column
-#+
-#+ @param p_cond_recep - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00008_cond_recep_checkColumnConstraints(p_cond_recep)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cond_recep LIKE iptb00008.cond_recep
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00008_cond_recep_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00008_uso_tiempo_checkColumnConstraints">}
-#+ Check constraints on the "iptb00008.uso_tiempo" column
-#+
-#+ @param p_uso_tiempo - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00008_uso_tiempo_checkColumnConstraints(p_uso_tiempo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_uso_tiempo LIKE iptb00008.uso_tiempo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00008_uso_tiempo_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00008_bodega_checkColumnConstraints">}
-#+ Check constraints on the "iptb00008.bodega" column
-#+
-#+ @param p_bodega - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00008_bodega_checkColumnConstraints(p_bodega)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_bodega LIKE iptb00008.bodega
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00008_bodega_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00008_status_t_checkColumnConstraints">}
-#+ Check constraints on the "iptb00008.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00008_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE iptb00008.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00008_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00008_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "iptb00008.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00008_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE iptb00008.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00008_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00008_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "iptb00008.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00008_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE iptb00008.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00008_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00008_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "iptb00008.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00008_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE iptb00008.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00008_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00008_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "iptb00008.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00008_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE iptb00008.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00008_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00007_checkTableConstraints">}
-#+ Check constraints on the "iptb00007" table
-#+
-#+ @param p_data - a row data LIKE iptb00007.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00007_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE iptb00007.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_iptb00007_num_doc_checkColumnConstraints(p_data.num_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00007_cod_mov_checkColumnConstraints(p_data.cod_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00007_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00007_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00007_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00007_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00007_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00007_bodega_checkColumnConstraints(p_data.bodega) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00007_checkTableConstraints
-
-{<BLOCK Name="fct.iptb00007_num_doc_checkColumnConstraints">}
-#+ Check constraints on the "iptb00007.num_doc" column
-#+
-#+ @param p_num_doc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00007_num_doc_checkColumnConstraints(p_num_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_doc LIKE iptb00007.num_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_num_doc IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- num_doc: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00007_num_doc_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00007_cod_mov_checkColumnConstraints">}
-#+ Check constraints on the "iptb00007.cod_mov" column
-#+
-#+ @param p_cod_mov - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00007_cod_mov_checkColumnConstraints(p_cod_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mov LIKE iptb00007.cod_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00007_cod_mov_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00007_status_t_checkColumnConstraints">}
-#+ Check constraints on the "iptb00007.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00007_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE iptb00007.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00007_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00007_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "iptb00007.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00007_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE iptb00007.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00007_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00007_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "iptb00007.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00007_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE iptb00007.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00007_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00007_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "iptb00007.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00007_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE iptb00007.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00007_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00007_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "iptb00007.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00007_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE iptb00007.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00007_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00007_bodega_checkColumnConstraints">}
-#+ Check constraints on the "iptb00007.bodega" column
-#+
-#+ @param p_bodega - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00007_bodega_checkColumnConstraints(p_bodega)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_bodega LIKE iptb00007.bodega
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00007_bodega_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00006_checkTableConstraints">}
-#+ Check constraints on the "iptb00006" table
-#+
-#+ @param p_data - a row data LIKE iptb00006.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00006_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE iptb00006.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_iptb00006_cod_cia_checkColumnConstraints(p_data.cod_cia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00006_num_doc_checkColumnConstraints(p_data.num_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00006_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00006_fact_no_checkColumnConstraints(p_data.fact_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00006_conduce_no_checkColumnConstraints(p_data.conduce_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00006_tipo_checkColumnConstraints(p_data.tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00006_orden_compra_checkColumnConstraints(p_data.orden_compra) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00006_cod_sp_checkColumnConstraints(p_data.cod_sp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00006_cod_sp_sec_checkColumnConstraints(p_data.cod_sp_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00006_cod_transp_checkColumnConstraints(p_data.cod_transp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00006_sec_transp_checkColumnConstraints(p_data.sec_transp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00006_placa_checkColumnConstraints(p_data.placa) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00006_cod_tarifa_checkColumnConstraints(p_data.cod_tarifa) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00006_cod_mov_checkColumnConstraints(p_data.cod_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00006_detalle_checkColumnConstraints(p_data.detalle) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00006_area_checkColumnConstraints(p_data.area) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00006_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00006_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00006_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00006_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00006_cantidad_1_checkColumnConstraints(p_data.cantidad_1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00006_cantidad_2_checkColumnConstraints(p_data.cantidad_2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00006_cond_recep_checkColumnConstraints(p_data.cond_recep) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00006_uso_tiempo_checkColumnConstraints(p_data.uso_tiempo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00006_bodega_checkColumnConstraints(p_data.bodega) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00006_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00006_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00006_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00006_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00006_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00006_num_req_checkColumnConstraints(p_data.num_req) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00006_codigo_bloque_checkColumnConstraints(p_data.codigo_bloque) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00006_sec_vend_checkColumnConstraints(p_data.sec_vend) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00006_direccion_checkColumnConstraints(p_data.direccion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00006_num_oc_checkColumnConstraints(p_data.num_oc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00006_bodega_d_checkColumnConstraints(p_data.bodega_d) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00006_checkTableConstraints
-
-{<BLOCK Name="fct.iptb00006_cod_cia_checkColumnConstraints">}
-#+ Check constraints on the "iptb00006.cod_cia" column
-#+
-#+ @param p_cod_cia - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00006_cod_cia_checkColumnConstraints(p_cod_cia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_cia LIKE iptb00006.cod_cia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00006_cod_cia_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00006_num_doc_checkColumnConstraints">}
-#+ Check constraints on the "iptb00006.num_doc" column
-#+
-#+ @param p_num_doc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00006_num_doc_checkColumnConstraints(p_num_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_doc LIKE iptb00006.num_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_num_doc IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- num_doc: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00006_num_doc_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00006_fecha_checkColumnConstraints">}
-#+ Check constraints on the "iptb00006.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00006_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE iptb00006.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_fecha IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- fecha: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00006_fecha_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00006_fact_no_checkColumnConstraints">}
-#+ Check constraints on the "iptb00006.fact_no" column
-#+
-#+ @param p_fact_no - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00006_fact_no_checkColumnConstraints(p_fact_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fact_no LIKE iptb00006.fact_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00006_fact_no_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00006_conduce_no_checkColumnConstraints">}
-#+ Check constraints on the "iptb00006.conduce_no" column
-#+
-#+ @param p_conduce_no - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00006_conduce_no_checkColumnConstraints(p_conduce_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_conduce_no LIKE iptb00006.conduce_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00006_conduce_no_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00006_tipo_checkColumnConstraints">}
-#+ Check constraints on the "iptb00006.tipo" column
-#+
-#+ @param p_tipo - CHAR(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00006_tipo_checkColumnConstraints(p_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo LIKE iptb00006.tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00006_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00006_orden_compra_checkColumnConstraints">}
-#+ Check constraints on the "iptb00006.orden_compra" column
-#+
-#+ @param p_orden_compra - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00006_orden_compra_checkColumnConstraints(p_orden_compra)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_orden_compra LIKE iptb00006.orden_compra
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00006_orden_compra_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00006_cod_sp_checkColumnConstraints">}
-#+ Check constraints on the "iptb00006.cod_sp" column
-#+
-#+ @param p_cod_sp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00006_cod_sp_checkColumnConstraints(p_cod_sp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sp LIKE iptb00006.cod_sp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00006_cod_sp_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00006_cod_sp_sec_checkColumnConstraints">}
-#+ Check constraints on the "iptb00006.cod_sp_sec" column
-#+
-#+ @param p_cod_sp_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00006_cod_sp_sec_checkColumnConstraints(p_cod_sp_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sp_sec LIKE iptb00006.cod_sp_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00006_cod_sp_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00006_cod_transp_checkColumnConstraints">}
-#+ Check constraints on the "iptb00006.cod_transp" column
-#+
-#+ @param p_cod_transp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00006_cod_transp_checkColumnConstraints(p_cod_transp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_transp LIKE iptb00006.cod_transp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00006_cod_transp_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00006_sec_transp_checkColumnConstraints">}
-#+ Check constraints on the "iptb00006.sec_transp" column
-#+
-#+ @param p_sec_transp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00006_sec_transp_checkColumnConstraints(p_sec_transp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_transp LIKE iptb00006.sec_transp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00006_sec_transp_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00006_placa_checkColumnConstraints">}
-#+ Check constraints on the "iptb00006.placa" column
-#+
-#+ @param p_placa - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00006_placa_checkColumnConstraints(p_placa)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_placa LIKE iptb00006.placa
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00006_placa_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00006_cod_tarifa_checkColumnConstraints">}
-#+ Check constraints on the "iptb00006.cod_tarifa" column
-#+
-#+ @param p_cod_tarifa - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00006_cod_tarifa_checkColumnConstraints(p_cod_tarifa)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tarifa LIKE iptb00006.cod_tarifa
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00006_cod_tarifa_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00006_cod_mov_checkColumnConstraints">}
-#+ Check constraints on the "iptb00006.cod_mov" column
-#+
-#+ @param p_cod_mov - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00006_cod_mov_checkColumnConstraints(p_cod_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mov LIKE iptb00006.cod_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_mov IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_mov: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00006_cod_mov_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00006_detalle_checkColumnConstraints">}
-#+ Check constraints on the "iptb00006.detalle" column
-#+
-#+ @param p_detalle - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00006_detalle_checkColumnConstraints(p_detalle)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_detalle LIKE iptb00006.detalle
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00006_detalle_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00006_area_checkColumnConstraints">}
-#+ Check constraints on the "iptb00006.area" column
-#+
-#+ @param p_area - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00006_area_checkColumnConstraints(p_area)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_area LIKE iptb00006.area
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00006_area_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00006_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "iptb00006.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00006_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE iptb00006.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_n IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_n: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00006_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00006_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "iptb00006.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00006_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE iptb00006.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_grupo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_grupo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00006_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00006_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "iptb00006.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00006_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE iptb00006.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_tipo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_tipo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00006_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00006_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "iptb00006.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00006_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE iptb00006.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_sec IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_sec: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00006_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00006_cantidad_1_checkColumnConstraints">}
-#+ Check constraints on the "iptb00006.cantidad_1" column
-#+
-#+ @param p_cantidad_1 - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00006_cantidad_1_checkColumnConstraints(p_cantidad_1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad_1 LIKE iptb00006.cantidad_1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00006_cantidad_1_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00006_cantidad_2_checkColumnConstraints">}
-#+ Check constraints on the "iptb00006.cantidad_2" column
-#+
-#+ @param p_cantidad_2 - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00006_cantidad_2_checkColumnConstraints(p_cantidad_2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad_2 LIKE iptb00006.cantidad_2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cantidad_2 IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cantidad_2: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00006_cantidad_2_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00006_cond_recep_checkColumnConstraints">}
-#+ Check constraints on the "iptb00006.cond_recep" column
-#+
-#+ @param p_cond_recep - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00006_cond_recep_checkColumnConstraints(p_cond_recep)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cond_recep LIKE iptb00006.cond_recep
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00006_cond_recep_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00006_uso_tiempo_checkColumnConstraints">}
-#+ Check constraints on the "iptb00006.uso_tiempo" column
-#+
-#+ @param p_uso_tiempo - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00006_uso_tiempo_checkColumnConstraints(p_uso_tiempo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_uso_tiempo LIKE iptb00006.uso_tiempo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00006_uso_tiempo_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00006_bodega_checkColumnConstraints">}
-#+ Check constraints on the "iptb00006.bodega" column
-#+
-#+ @param p_bodega - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00006_bodega_checkColumnConstraints(p_bodega)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_bodega LIKE iptb00006.bodega
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00006_bodega_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00006_status_t_checkColumnConstraints">}
-#+ Check constraints on the "iptb00006.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00006_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE iptb00006.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00006_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00006_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "iptb00006.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00006_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE iptb00006.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00006_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00006_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "iptb00006.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00006_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE iptb00006.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00006_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00006_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "iptb00006.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00006_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE iptb00006.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00006_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00006_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "iptb00006.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00006_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE iptb00006.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00006_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00006_num_req_checkColumnConstraints">}
-#+ Check constraints on the "iptb00006.num_req" column
-#+
-#+ @param p_num_req - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00006_num_req_checkColumnConstraints(p_num_req)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_req LIKE iptb00006.num_req
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00006_num_req_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00006_codigo_bloque_checkColumnConstraints">}
-#+ Check constraints on the "iptb00006.codigo_bloque" column
-#+
-#+ @param p_codigo_bloque - CHAR(25) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00006_codigo_bloque_checkColumnConstraints(p_codigo_bloque)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codigo_bloque LIKE iptb00006.codigo_bloque
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00006_codigo_bloque_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00006_sec_vend_checkColumnConstraints">}
-#+ Check constraints on the "iptb00006.sec_vend" column
-#+
-#+ @param p_sec_vend - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00006_sec_vend_checkColumnConstraints(p_sec_vend)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_vend LIKE iptb00006.sec_vend
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00006_sec_vend_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00006_direccion_checkColumnConstraints">}
-#+ Check constraints on the "iptb00006.direccion" column
-#+
-#+ @param p_direccion - CHAR(500) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00006_direccion_checkColumnConstraints(p_direccion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_direccion LIKE iptb00006.direccion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00006_direccion_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00006_num_oc_checkColumnConstraints">}
-#+ Check constraints on the "iptb00006.num_oc" column
-#+
-#+ @param p_num_oc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00006_num_oc_checkColumnConstraints(p_num_oc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_oc LIKE iptb00006.num_oc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00006_num_oc_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00006_bodega_d_checkColumnConstraints">}
-#+ Check constraints on the "iptb00006.bodega_d" column
-#+
-#+ @param p_bodega_d - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00006_bodega_d_checkColumnConstraints(p_bodega_d)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_bodega_d LIKE iptb00006.bodega_d
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00006_bodega_d_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00005_checkTableConstraints">}
-#+ Check constraints on the "iptb00005" table
-#+
-#+ @param p_data - a row data LIKE iptb00005.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00005_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE iptb00005.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_iptb00005_cod_mov_checkColumnConstraints(p_data.cod_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00005_descrip_mov_checkColumnConstraints(p_data.descrip_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00005_status_mov_checkColumnConstraints(p_data.status_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00005_cuenta_1_checkColumnConstraints(p_data.cuenta_1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00005_cuenta_2_checkColumnConstraints(p_data.cuenta_2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00005_cuenta_3_checkColumnConstraints(p_data.cuenta_3) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00005_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00005_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00005_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00005_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00005_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00005_control_clientes_checkColumnConstraints(p_data.control_clientes) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00005_control_despacho_checkColumnConstraints(p_data.control_despacho) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00005_control_devolucion_checkColumnConstraints(p_data.control_devolucion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00005_control_transferencia_checkColumnConstraints(p_data.control_transferencia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00005_checkTableConstraints
-
-{<BLOCK Name="fct.iptb00005_cod_mov_checkColumnConstraints">}
-#+ Check constraints on the "iptb00005.cod_mov" column
-#+
-#+ @param p_cod_mov - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00005_cod_mov_checkColumnConstraints(p_cod_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mov LIKE iptb00005.cod_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_mov IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_mov: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00005_cod_mov_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00005_descrip_mov_checkColumnConstraints">}
-#+ Check constraints on the "iptb00005.descrip_mov" column
-#+
-#+ @param p_descrip_mov - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00005_descrip_mov_checkColumnConstraints(p_descrip_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descrip_mov LIKE iptb00005.descrip_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00005_descrip_mov_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00005_status_mov_checkColumnConstraints">}
-#+ Check constraints on the "iptb00005.status_mov" column
-#+
-#+ @param p_status_mov - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00005_status_mov_checkColumnConstraints(p_status_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_mov LIKE iptb00005.status_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00005_status_mov_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00005_cuenta_1_checkColumnConstraints">}
-#+ Check constraints on the "iptb00005.cuenta_1" column
-#+
-#+ @param p_cuenta_1 - CHAR(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00005_cuenta_1_checkColumnConstraints(p_cuenta_1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cuenta_1 LIKE iptb00005.cuenta_1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00005_cuenta_1_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00005_cuenta_2_checkColumnConstraints">}
-#+ Check constraints on the "iptb00005.cuenta_2" column
-#+
-#+ @param p_cuenta_2 - CHAR(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00005_cuenta_2_checkColumnConstraints(p_cuenta_2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cuenta_2 LIKE iptb00005.cuenta_2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00005_cuenta_2_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00005_cuenta_3_checkColumnConstraints">}
-#+ Check constraints on the "iptb00005.cuenta_3" column
-#+
-#+ @param p_cuenta_3 - CHAR(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00005_cuenta_3_checkColumnConstraints(p_cuenta_3)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cuenta_3 LIKE iptb00005.cuenta_3
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00005_cuenta_3_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00005_status_t_checkColumnConstraints">}
-#+ Check constraints on the "iptb00005.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00005_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE iptb00005.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00005_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00005_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "iptb00005.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00005_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE iptb00005.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00005_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00005_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "iptb00005.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00005_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE iptb00005.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00005_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00005_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "iptb00005.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00005_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE iptb00005.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00005_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00005_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "iptb00005.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00005_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE iptb00005.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00005_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00005_control_clientes_checkColumnConstraints">}
-#+ Check constraints on the "iptb00005.control_clientes" column
-#+
-#+ @param p_control_clientes - CHAR(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00005_control_clientes_checkColumnConstraints(p_control_clientes)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_control_clientes LIKE iptb00005.control_clientes
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_control_clientes IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- control_clientes: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00005_control_clientes_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00005_control_despacho_checkColumnConstraints">}
-#+ Check constraints on the "iptb00005.control_despacho" column
-#+
-#+ @param p_control_despacho - CHAR(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00005_control_despacho_checkColumnConstraints(p_control_despacho)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_control_despacho LIKE iptb00005.control_despacho
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00005_control_despacho_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00005_control_devolucion_checkColumnConstraints">}
-#+ Check constraints on the "iptb00005.control_devolucion" column
-#+
-#+ @param p_control_devolucion - CHAR(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00005_control_devolucion_checkColumnConstraints(p_control_devolucion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_control_devolucion LIKE iptb00005.control_devolucion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00005_control_devolucion_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00005_control_transferencia_checkColumnConstraints">}
-#+ Check constraints on the "iptb00005.control_transferencia" column
-#+
-#+ @param p_control_transferencia - CHAR(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00005_control_transferencia_checkColumnConstraints(p_control_transferencia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_control_transferencia LIKE iptb00005.control_transferencia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00005_control_transferencia_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00004_checkTableConstraints">}
-#+ Check constraints on the "iptb00004" table
-#+
-#+ @param p_data - a row data LIKE iptb00004.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00004_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE iptb00004.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_iptb00004_ventas_checkColumnConstraints(p_data.ventas) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00004_mes_ini_checkColumnConstraints(p_data.mes_ini) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00004_mes_fin_checkColumnConstraints(p_data.mes_fin) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00004_ano_checkColumnConstraints(p_data.ano) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00004_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00004_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00004_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00004_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00004_material_checkColumnConstraints(p_data.material) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00004_labor_checkColumnConstraints(p_data.labor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00004_gastos_checkColumnConstraints(p_data.gastos) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00004_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00004_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00004_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00004_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00004_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- CALL smarmotech_dbxconstraints_iptb00004_pk_iptb00004_checkUniqueConstraint(p_forUpdate, p_data.ano, p_data.cod_n, p_data.cod_grupo, p_data.cod_tipo, p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00004_checkTableConstraints
-
-{<BLOCK Name="fct.iptb00004_pk_iptb00004_checkUniqueConstraint">}
-#+ Check the primary key uniqueness constraint on the "iptb00004"
-#+
-#+ @param p_key - Primary Key
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00004_pk_iptb00004_checkUniqueConstraint(p_forUpdate, p_key)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_key
- RECORD
- iptb00004_ano LIKE iptb00004.ano,
- iptb00004_cod_n LIKE iptb00004.cod_n,
- iptb00004_cod_grupo LIKE iptb00004.cod_grupo,
- iptb00004_cod_tipo LIKE iptb00004.cod_tipo,
- iptb00004_cod_sec LIKE iptb00004.cod_sec
- END RECORD
- DEFINE l_key
- RECORD
- iptb00004_ano LIKE iptb00004.ano,
- iptb00004_cod_n LIKE iptb00004.cod_n,
- iptb00004_cod_grupo LIKE iptb00004.cod_grupo,
- iptb00004_cod_tipo LIKE iptb00004.cod_tipo,
- iptb00004_cod_sec LIKE iptb00004.cod_sec
- END RECORD
- DEFINE l_where STRING
- DEFINE l_sqlQuery STRING
- DEFINE l_count INTEGER
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- LET l_where = "WHERE iptb00004.ano = ?
- AND iptb00004.cod_n = ?
- AND iptb00004.cod_grupo = ?
- AND iptb00004.cod_tipo = ?
- AND iptb00004.cod_sec = ? "
-
- let l_sqlQuery = "SELECT COUNT(*), ano, cod_n, cod_grupo, cod_tipo, cod_sec FROM iptb00004 ", l_where, " GROUP BY ano, cod_n, cod_grupo, cod_tipo, cod_sec"
-
- PREPARE cur_iptb00004_pk_iptb00004_checkUniqueConstraint FROM l_sqlQuery
- EXECUTE cur_iptb00004_pk_iptb00004_checkUniqueConstraint INTO l_count, l_key.* USING p_key.*
- FREE cur_iptb00004_pk_iptb00004_checkUniqueConstraint
- IF (NOT p_forUpdate AND l_count > 0) OR (p_forUpdate AND l_count > 0 AND p_key.* != l_key.*) THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- ano + cod_n + cod_grupo + cod_tipo + cod_sec: " || ERROR_BAM_00002) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00004_pk_iptb00004_checkUniqueConstraint
-
-{<BLOCK Name="fct.iptb00004_ventas_checkColumnConstraints">}
-#+ Check constraints on the "iptb00004.ventas" column
-#+
-#+ @param p_ventas - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00004_ventas_checkColumnConstraints(p_ventas)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ventas LIKE iptb00004.ventas
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00004_ventas_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00004_mes_ini_checkColumnConstraints">}
-#+ Check constraints on the "iptb00004.mes_ini" column
-#+
-#+ @param p_mes_ini - CHAR(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00004_mes_ini_checkColumnConstraints(p_mes_ini)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mes_ini LIKE iptb00004.mes_ini
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00004_mes_ini_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00004_mes_fin_checkColumnConstraints">}
-#+ Check constraints on the "iptb00004.mes_fin" column
-#+
-#+ @param p_mes_fin - CHAR(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00004_mes_fin_checkColumnConstraints(p_mes_fin)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mes_fin LIKE iptb00004.mes_fin
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00004_mes_fin_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00004_ano_checkColumnConstraints">}
-#+ Check constraints on the "iptb00004.ano" column
-#+
-#+ @param p_ano - CHAR(4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00004_ano_checkColumnConstraints(p_ano)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ano LIKE iptb00004.ano
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_ano IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- ano: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00004_ano_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00004_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "iptb00004.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00004_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE iptb00004.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_n IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_n: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00004_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00004_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "iptb00004.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00004_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE iptb00004.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_grupo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_grupo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00004_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00004_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "iptb00004.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00004_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE iptb00004.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_tipo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_tipo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00004_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00004_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "iptb00004.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00004_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE iptb00004.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_sec IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_sec: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00004_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00004_material_checkColumnConstraints">}
-#+ Check constraints on the "iptb00004.material" column
-#+
-#+ @param p_material - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00004_material_checkColumnConstraints(p_material)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_material LIKE iptb00004.material
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00004_material_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00004_labor_checkColumnConstraints">}
-#+ Check constraints on the "iptb00004.labor" column
-#+
-#+ @param p_labor - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00004_labor_checkColumnConstraints(p_labor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_labor LIKE iptb00004.labor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00004_labor_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00004_gastos_checkColumnConstraints">}
-#+ Check constraints on the "iptb00004.gastos" column
-#+
-#+ @param p_gastos - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00004_gastos_checkColumnConstraints(p_gastos)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_gastos LIKE iptb00004.gastos
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00004_gastos_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00004_status_t_checkColumnConstraints">}
-#+ Check constraints on the "iptb00004.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00004_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE iptb00004.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00004_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00004_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "iptb00004.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00004_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE iptb00004.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00004_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00004_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "iptb00004.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00004_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE iptb00004.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00004_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00004_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "iptb00004.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00004_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE iptb00004.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00004_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00004_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "iptb00004.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00004_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE iptb00004.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00004_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00003_checkTableConstraints">}
-#+ Check constraints on the "iptb00003" table
-#+
-#+ @param p_data - a row data LIKE iptb00003.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00003_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE iptb00003.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_iptb00003_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00003_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00003_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00003_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00003_presentacion_checkColumnConstraints(p_data.presentacion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00003_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00003_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00003_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00003_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00003_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00003_checkTableConstraints
-
-{<BLOCK Name="fct.iptb00003_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "iptb00003.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00003_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE iptb00003.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00003_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00003_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "iptb00003.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00003_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE iptb00003.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00003_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00003_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "iptb00003.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00003_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE iptb00003.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00003_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00003_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "iptb00003.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00003_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE iptb00003.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00003_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00003_presentacion_checkColumnConstraints">}
-#+ Check constraints on the "iptb00003.presentacion" column
-#+
-#+ @param p_presentacion - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00003_presentacion_checkColumnConstraints(p_presentacion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_presentacion LIKE iptb00003.presentacion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00003_presentacion_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00003_status_t_checkColumnConstraints">}
-#+ Check constraints on the "iptb00003.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00003_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE iptb00003.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00003_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00003_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "iptb00003.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00003_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE iptb00003.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00003_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00003_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "iptb00003.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00003_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE iptb00003.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00003_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00003_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "iptb00003.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00003_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE iptb00003.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00003_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00003_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "iptb00003.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00003_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE iptb00003.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00003_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00002_checkTableConstraints">}
-#+ Check constraints on the "iptb00002" table
-#+
-#+ @param p_data - a row data LIKE iptb00002.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00002_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE iptb00002.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_iptb00002_cod_cia_checkColumnConstraints(p_data.cod_cia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00002_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00002_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00002_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00002_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00002_descrip_esp_checkColumnConstraints(p_data.descrip_esp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00002_descrip_ing_checkColumnConstraints(p_data.descrip_ing) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00002_unidad_med_checkColumnConstraints(p_data.unidad_med) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00002_nomenclatura_checkColumnConstraints(p_data.nomenclatura) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00002_bodega_checkColumnConstraints(p_data.bodega) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00002_exist_max_checkColumnConstraints(p_data.exist_max) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00002_exist_min_checkColumnConstraints(p_data.exist_min) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00002_dia_llegada_checkColumnConstraints(p_data.dia_llegada) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00002_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00002_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00002_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00002_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00002_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00002_control_existencia_checkColumnConstraints(p_data.control_existencia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00002_control_itbis_checkColumnConstraints(p_data.control_itbis) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00002_codid_checkColumnConstraints(p_data.codid) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00002_foto_producto_checkColumnConstraints(p_data.foto_producto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00002_porc_desc_checkColumnConstraints(p_data.porc_desc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00002_fecha_desc_checkColumnConstraints(p_data.fecha_desc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00002_checkTableConstraints
-
-{<BLOCK Name="fct.iptb00002_cod_cia_checkColumnConstraints">}
-#+ Check constraints on the "iptb00002.cod_cia" column
-#+
-#+ @param p_cod_cia - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00002_cod_cia_checkColumnConstraints(p_cod_cia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_cia LIKE iptb00002.cod_cia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_cia IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_cia: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00002_cod_cia_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00002_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "iptb00002.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00002_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE iptb00002.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_n IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_n: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00002_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00002_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "iptb00002.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00002_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE iptb00002.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_grupo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_grupo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00002_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00002_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "iptb00002.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00002_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE iptb00002.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_tipo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_tipo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00002_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00002_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "iptb00002.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00002_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE iptb00002.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_sec IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_sec: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00002_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00002_descrip_esp_checkColumnConstraints">}
-#+ Check constraints on the "iptb00002.descrip_esp" column
-#+
-#+ @param p_descrip_esp - CHAR(180) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00002_descrip_esp_checkColumnConstraints(p_descrip_esp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descrip_esp LIKE iptb00002.descrip_esp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_descrip_esp IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- descrip_esp: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00002_descrip_esp_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00002_descrip_ing_checkColumnConstraints">}
-#+ Check constraints on the "iptb00002.descrip_ing" column
-#+
-#+ @param p_descrip_ing - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00002_descrip_ing_checkColumnConstraints(p_descrip_ing)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descrip_ing LIKE iptb00002.descrip_ing
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00002_descrip_ing_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00002_unidad_med_checkColumnConstraints">}
-#+ Check constraints on the "iptb00002.unidad_med" column
-#+
-#+ @param p_unidad_med - CHAR(4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00002_unidad_med_checkColumnConstraints(p_unidad_med)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_unidad_med LIKE iptb00002.unidad_med
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00002_unidad_med_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00002_nomenclatura_checkColumnConstraints">}
-#+ Check constraints on the "iptb00002.nomenclatura" column
-#+
-#+ @param p_nomenclatura - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00002_nomenclatura_checkColumnConstraints(p_nomenclatura)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nomenclatura LIKE iptb00002.nomenclatura
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00002_nomenclatura_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00002_bodega_checkColumnConstraints">}
-#+ Check constraints on the "iptb00002.bodega" column
-#+
-#+ @param p_bodega - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00002_bodega_checkColumnConstraints(p_bodega)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_bodega LIKE iptb00002.bodega
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00002_bodega_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00002_exist_max_checkColumnConstraints">}
-#+ Check constraints on the "iptb00002.exist_max" column
-#+
-#+ @param p_exist_max - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00002_exist_max_checkColumnConstraints(p_exist_max)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_exist_max LIKE iptb00002.exist_max
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00002_exist_max_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00002_exist_min_checkColumnConstraints">}
-#+ Check constraints on the "iptb00002.exist_min" column
-#+
-#+ @param p_exist_min - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00002_exist_min_checkColumnConstraints(p_exist_min)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_exist_min LIKE iptb00002.exist_min
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00002_exist_min_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00002_dia_llegada_checkColumnConstraints">}
-#+ Check constraints on the "iptb00002.dia_llegada" column
-#+
-#+ @param p_dia_llegada - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00002_dia_llegada_checkColumnConstraints(p_dia_llegada)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_dia_llegada LIKE iptb00002.dia_llegada
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00002_dia_llegada_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00002_status_t_checkColumnConstraints">}
-#+ Check constraints on the "iptb00002.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00002_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE iptb00002.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00002_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00002_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "iptb00002.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00002_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE iptb00002.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00002_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00002_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "iptb00002.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00002_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE iptb00002.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00002_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00002_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "iptb00002.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00002_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE iptb00002.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00002_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00002_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "iptb00002.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00002_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE iptb00002.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00002_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00002_control_existencia_checkColumnConstraints">}
-#+ Check constraints on the "iptb00002.control_existencia" column
-#+
-#+ @param p_control_existencia - VARCHAR2(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00002_control_existencia_checkColumnConstraints(p_control_existencia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_control_existencia LIKE iptb00002.control_existencia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00002_control_existencia_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00002_control_itbis_checkColumnConstraints">}
-#+ Check constraints on the "iptb00002.control_itbis" column
-#+
-#+ @param p_control_itbis - VARCHAR2(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00002_control_itbis_checkColumnConstraints(p_control_itbis)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_control_itbis LIKE iptb00002.control_itbis
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00002_control_itbis_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00002_codid_checkColumnConstraints">}
-#+ Check constraints on the "iptb00002.codid" column
-#+
-#+ @param p_codid - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00002_codid_checkColumnConstraints(p_codid)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codid LIKE iptb00002.codid
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_codid IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- codid: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00002_codid_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00002_foto_producto_checkColumnConstraints">}
-#+ Check constraints on the "iptb00002.foto_producto" column
-#+
-#+ @param p_foto_producto - CHAR(200) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00002_foto_producto_checkColumnConstraints(p_foto_producto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_foto_producto LIKE iptb00002.foto_producto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00002_foto_producto_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00002_porc_desc_checkColumnConstraints">}
-#+ Check constraints on the "iptb00002.porc_desc" column
-#+
-#+ @param p_porc_desc - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00002_porc_desc_checkColumnConstraints(p_porc_desc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_porc_desc LIKE iptb00002.porc_desc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00002_porc_desc_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00002_fecha_desc_checkColumnConstraints">}
-#+ Check constraints on the "iptb00002.fecha_desc" column
-#+
-#+ @param p_fecha_desc - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00002_fecha_desc_checkColumnConstraints(p_fecha_desc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_desc LIKE iptb00002.fecha_desc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00002_fecha_desc_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00001_checkTableConstraints">}
-#+ Check constraints on the "iptb00001" table
-#+
-#+ @param p_data - a row data LIKE iptb00001.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00001_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE iptb00001.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_iptb00001_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00001_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00001_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00001_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00001_unidad_checkColumnConstraints(p_data.unidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00001_factor_conv_checkColumnConstraints(p_data.factor_conv) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00001_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00001_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00001_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00001_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00001_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_iptb00001_factor_ad_checkColumnConstraints(p_data.factor_ad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00001_checkTableConstraints
-
-{<BLOCK Name="fct.iptb00001_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "iptb00001.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00001_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE iptb00001.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_n IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_n: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00001_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00001_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "iptb00001.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00001_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE iptb00001.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_grupo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_grupo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00001_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00001_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "iptb00001.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00001_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE iptb00001.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_tipo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_tipo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00001_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00001_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "iptb00001.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00001_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE iptb00001.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_sec IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_sec: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00001_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00001_unidad_checkColumnConstraints">}
-#+ Check constraints on the "iptb00001.unidad" column
-#+
-#+ @param p_unidad - CHAR(5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00001_unidad_checkColumnConstraints(p_unidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_unidad LIKE iptb00001.unidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00001_unidad_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00001_factor_conv_checkColumnConstraints">}
-#+ Check constraints on the "iptb00001.factor_conv" column
-#+
-#+ @param p_factor_conv - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00001_factor_conv_checkColumnConstraints(p_factor_conv)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_factor_conv LIKE iptb00001.factor_conv
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00001_factor_conv_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00001_status_t_checkColumnConstraints">}
-#+ Check constraints on the "iptb00001.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00001_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE iptb00001.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00001_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00001_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "iptb00001.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00001_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE iptb00001.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00001_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00001_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "iptb00001.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00001_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE iptb00001.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00001_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00001_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "iptb00001.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00001_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE iptb00001.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00001_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00001_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "iptb00001.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00001_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE iptb00001.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00001_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.iptb00001_factor_ad_checkColumnConstraints">}
-#+ Check constraints on the "iptb00001.factor_ad" column
-#+
-#+ @param p_factor_ad - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_iptb00001_factor_ad_checkColumnConstraints(p_factor_ad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_factor_ad LIKE iptb00001.factor_ad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.iptb00001_factor_ad_checkColumnConstraints
-
-{<BLOCK Name="fct.inventory_checkTableConstraints">}
-#+ Check constraints on the "inventory" table
-#+
-#+ @param p_data - a row data LIKE inventory.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_inventory_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE inventory.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_inventory_itemid_checkColumnConstraints(p_data.itemid) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_inventory_qty_checkColumnConstraints(p_data.qty) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.inventory_checkTableConstraints
-
-{<BLOCK Name="fct.inventory_itemid_checkColumnConstraints">}
-#+ Check constraints on the "inventory.itemid" column
-#+
-#+ @param p_itemid - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_inventory_itemid_checkColumnConstraints(p_itemid)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_itemid LIKE inventory.itemid
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_itemid IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- itemid: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.inventory_itemid_checkColumnConstraints
-
-{<BLOCK Name="fct.inventory_qty_checkColumnConstraints">}
-#+ Check constraints on the "inventory.qty" column
-#+
-#+ @param p_qty - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_inventory_qty_checkColumnConstraints(p_qty)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_qty LIKE inventory.qty
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_qty IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- qty: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.inventory_qty_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00043a_checkTableConstraints">}
-#+ Check constraints on the "intb00043a" table
-#+
-#+ @param p_data - a row data LIKE intb00043a.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00043a_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE intb00043a.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_intb00043a_cod_bodega_checkColumnConstraints(p_data.cod_bodega) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00043a_cod_seccion_checkColumnConstraints(p_data.cod_seccion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00043a_cod_tramo_checkColumnConstraints(p_data.cod_tramo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00043a_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00043a_checkTableConstraints
-
-{<BLOCK Name="fct.intb00043a_cod_bodega_checkColumnConstraints">}
-#+ Check constraints on the "intb00043a.cod_bodega" column
-#+
-#+ @param p_cod_bodega - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00043a_cod_bodega_checkColumnConstraints(p_cod_bodega)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_bodega LIKE intb00043a.cod_bodega
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_bodega IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_bodega: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00043a_cod_bodega_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00043a_cod_seccion_checkColumnConstraints">}
-#+ Check constraints on the "intb00043a.cod_seccion" column
-#+
-#+ @param p_cod_seccion - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00043a_cod_seccion_checkColumnConstraints(p_cod_seccion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_seccion LIKE intb00043a.cod_seccion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_seccion IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_seccion: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00043a_cod_seccion_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00043a_cod_tramo_checkColumnConstraints">}
-#+ Check constraints on the "intb00043a.cod_tramo" column
-#+
-#+ @param p_cod_tramo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00043a_cod_tramo_checkColumnConstraints(p_cod_tramo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tramo LIKE intb00043a.cod_tramo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_tramo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_tramo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00043a_cod_tramo_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00043a_descripcion_checkColumnConstraints">}
-#+ Check constraints on the "intb00043a.descripcion" column
-#+
-#+ @param p_descripcion - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00043a_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE intb00043a.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00043a_descripcion_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00043$_checkTableConstraints">}
-#+ Check constraints on the "intb00043$" table
-#+
-#+ @param p_data - a row data LIKE intb00043$.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00043$_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE intb00043$.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_intb00043$_cod_bodega_checkColumnConstraints(p_data.cod_bodega) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00043$_cod_seccion_checkColumnConstraints(p_data.cod_seccion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00043$_cod_tramo_checkColumnConstraints(p_data.cod_tramo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00043$_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00043$_checkTableConstraints
-
-{<BLOCK Name="fct.intb00043$_cod_bodega_checkColumnConstraints">}
-#+ Check constraints on the "intb00043$.cod_bodega" column
-#+
-#+ @param p_cod_bodega - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00043$_cod_bodega_checkColumnConstraints(p_cod_bodega)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_bodega LIKE intb00043$.cod_bodega
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00043$_cod_bodega_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00043$_cod_seccion_checkColumnConstraints">}
-#+ Check constraints on the "intb00043$.cod_seccion" column
-#+
-#+ @param p_cod_seccion - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00043$_cod_seccion_checkColumnConstraints(p_cod_seccion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_seccion LIKE intb00043$.cod_seccion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00043$_cod_seccion_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00043$_cod_tramo_checkColumnConstraints">}
-#+ Check constraints on the "intb00043$.cod_tramo" column
-#+
-#+ @param p_cod_tramo - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00043$_cod_tramo_checkColumnConstraints(p_cod_tramo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tramo LIKE intb00043$.cod_tramo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00043$_cod_tramo_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00043$_descripcion_checkColumnConstraints">}
-#+ Check constraints on the "intb00043$.descripcion" column
-#+
-#+ @param p_descripcion - VARCHAR2(255) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00043$_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE intb00043$.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00043$_descripcion_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00043_checkTableConstraints">}
-#+ Check constraints on the "intb00043" table
-#+
-#+ @param p_data - a row data LIKE intb00043.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00043_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE intb00043.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_intb00043_cod_bodega_checkColumnConstraints(p_data.cod_bodega) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00043_cod_seccion_checkColumnConstraints(p_data.cod_seccion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00043_cod_tramo_checkColumnConstraints(p_data.cod_tramo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00043_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00043_checkTableConstraints
-
-{<BLOCK Name="fct.intb00043_cod_bodega_checkColumnConstraints">}
-#+ Check constraints on the "intb00043.cod_bodega" column
-#+
-#+ @param p_cod_bodega - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00043_cod_bodega_checkColumnConstraints(p_cod_bodega)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_bodega LIKE intb00043.cod_bodega
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00043_cod_bodega_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00043_cod_seccion_checkColumnConstraints">}
-#+ Check constraints on the "intb00043.cod_seccion" column
-#+
-#+ @param p_cod_seccion - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00043_cod_seccion_checkColumnConstraints(p_cod_seccion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_seccion LIKE intb00043.cod_seccion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00043_cod_seccion_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00043_cod_tramo_checkColumnConstraints">}
-#+ Check constraints on the "intb00043.cod_tramo" column
-#+
-#+ @param p_cod_tramo - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00043_cod_tramo_checkColumnConstraints(p_cod_tramo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tramo LIKE intb00043.cod_tramo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00043_cod_tramo_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00043_descripcion_checkColumnConstraints">}
-#+ Check constraints on the "intb00043.descripcion" column
-#+
-#+ @param p_descripcion - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00043_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE intb00043.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00043_descripcion_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00042_checkTableConstraints">}
-#+ Check constraints on the "intb00042" table
-#+
-#+ @param p_data - a row data LIKE intb00042.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00042_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE intb00042.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_intb00042_num_doc_checkColumnConstraints(p_data.num_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00042_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00042_cod_mov_checkColumnConstraints(p_data.cod_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00042_bodega_checkColumnConstraints(p_data.bodega) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00042_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00042_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00042_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00042_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00042_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00042_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00042_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00042_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00042_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00042_checkTableConstraints
-
-{<BLOCK Name="fct.intb00042_num_doc_checkColumnConstraints">}
-#+ Check constraints on the "intb00042.num_doc" column
-#+
-#+ @param p_num_doc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00042_num_doc_checkColumnConstraints(p_num_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_doc LIKE intb00042.num_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00042_num_doc_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00042_fecha_checkColumnConstraints">}
-#+ Check constraints on the "intb00042.fecha" column
-#+
-#+ @param p_fecha - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00042_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE intb00042.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00042_fecha_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00042_cod_mov_checkColumnConstraints">}
-#+ Check constraints on the "intb00042.cod_mov" column
-#+
-#+ @param p_cod_mov - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00042_cod_mov_checkColumnConstraints(p_cod_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mov LIKE intb00042.cod_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00042_cod_mov_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00042_bodega_checkColumnConstraints">}
-#+ Check constraints on the "intb00042.bodega" column
-#+
-#+ @param p_bodega - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00042_bodega_checkColumnConstraints(p_bodega)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_bodega LIKE intb00042.bodega
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00042_bodega_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00042_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "intb00042.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00042_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE intb00042.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00042_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00042_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "intb00042.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00042_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE intb00042.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00042_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00042_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "intb00042.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00042_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE intb00042.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00042_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00042_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "intb00042.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00042_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE intb00042.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00042_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00042_cantidad_checkColumnConstraints">}
-#+ Check constraints on the "intb00042.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(18,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00042_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE intb00042.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00042_cantidad_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00042_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "intb00042.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00042_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE intb00042.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00042_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00042_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "intb00042.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00042_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE intb00042.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00042_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00042_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "intb00042.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00042_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE intb00042.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00042_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00042_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "intb00042.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00042_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE intb00042.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00042_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00041_checkTableConstraints">}
-#+ Check constraints on the "intb00041" table
-#+
-#+ @param p_data - a row data LIKE intb00041.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00041_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE intb00041.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_intb00041_fecha_act_checkColumnConstraints(p_data.fecha_act) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00041_idtrx_checkColumnConstraints(p_data.idtrx) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00041_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00041_bodega_checkColumnConstraints(p_data.bodega) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00041_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00041_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00041_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00041_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00041_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00041_balance_checkColumnConstraints(p_data.balance) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00041_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00041_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00041_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00041_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00041_checkTableConstraints
-
-{<BLOCK Name="fct.intb00041_fecha_act_checkColumnConstraints">}
-#+ Check constraints on the "intb00041.fecha_act" column
-#+
-#+ @param p_fecha_act - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00041_fecha_act_checkColumnConstraints(p_fecha_act)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_act LIKE intb00041.fecha_act
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00041_fecha_act_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00041_idtrx_checkColumnConstraints">}
-#+ Check constraints on the "intb00041.idtrx" column
-#+
-#+ @param p_idtrx - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00041_idtrx_checkColumnConstraints(p_idtrx)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_idtrx LIKE intb00041.idtrx
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00041_idtrx_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00041_fecha_checkColumnConstraints">}
-#+ Check constraints on the "intb00041.fecha" column
-#+
-#+ @param p_fecha - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00041_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE intb00041.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00041_fecha_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00041_bodega_checkColumnConstraints">}
-#+ Check constraints on the "intb00041.bodega" column
-#+
-#+ @param p_bodega - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00041_bodega_checkColumnConstraints(p_bodega)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_bodega LIKE intb00041.bodega
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00041_bodega_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00041_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "intb00041.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00041_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE intb00041.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00041_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00041_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "intb00041.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00041_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE intb00041.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00041_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00041_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "intb00041.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00041_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE intb00041.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00041_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00041_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "intb00041.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00041_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE intb00041.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00041_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00041_cantidad_checkColumnConstraints">}
-#+ Check constraints on the "intb00041.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00041_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE intb00041.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00041_cantidad_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00041_balance_checkColumnConstraints">}
-#+ Check constraints on the "intb00041.balance" column
-#+
-#+ @param p_balance - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00041_balance_checkColumnConstraints(p_balance)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_balance LIKE intb00041.balance
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00041_balance_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00041_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "intb00041.us_crea" column
-#+
-#+ @param p_us_crea - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00041_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE intb00041.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00041_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00041_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "intb00041.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00041_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE intb00041.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00041_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00041_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "intb00041.us_mod" column
-#+
-#+ @param p_us_mod - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00041_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE intb00041.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00041_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00041_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "intb00041.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00041_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE intb00041.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00041_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00040_checkTableConstraints">}
-#+ Check constraints on the "intb00040" table
-#+
-#+ @param p_data - a row data LIKE intb00040.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00040_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE intb00040.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_intb00040_fecha_act_checkColumnConstraints(p_data.fecha_act) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00040_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00040_bodega_checkColumnConstraints(p_data.bodega) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00040_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00040_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00040_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00040_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00040_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00040_balance_checkColumnConstraints(p_data.balance) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00040_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00040_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00040_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00040_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00040_checkTableConstraints
-
-{<BLOCK Name="fct.intb00040_fecha_act_checkColumnConstraints">}
-#+ Check constraints on the "intb00040.fecha_act" column
-#+
-#+ @param p_fecha_act - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00040_fecha_act_checkColumnConstraints(p_fecha_act)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_act LIKE intb00040.fecha_act
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00040_fecha_act_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00040_fecha_checkColumnConstraints">}
-#+ Check constraints on the "intb00040.fecha" column
-#+
-#+ @param p_fecha - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00040_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE intb00040.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00040_fecha_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00040_bodega_checkColumnConstraints">}
-#+ Check constraints on the "intb00040.bodega" column
-#+
-#+ @param p_bodega - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00040_bodega_checkColumnConstraints(p_bodega)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_bodega LIKE intb00040.bodega
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00040_bodega_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00040_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "intb00040.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00040_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE intb00040.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00040_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00040_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "intb00040.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00040_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE intb00040.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00040_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00040_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "intb00040.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00040_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE intb00040.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00040_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00040_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "intb00040.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00040_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE intb00040.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00040_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00040_cantidad_checkColumnConstraints">}
-#+ Check constraints on the "intb00040.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00040_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE intb00040.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00040_cantidad_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00040_balance_checkColumnConstraints">}
-#+ Check constraints on the "intb00040.balance" column
-#+
-#+ @param p_balance - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00040_balance_checkColumnConstraints(p_balance)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_balance LIKE intb00040.balance
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00040_balance_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00040_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "intb00040.us_crea" column
-#+
-#+ @param p_us_crea - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00040_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE intb00040.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00040_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00040_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "intb00040.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00040_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE intb00040.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00040_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00040_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "intb00040.us_mod" column
-#+
-#+ @param p_us_mod - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00040_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE intb00040.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00040_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00040_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "intb00040.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00040_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE intb00040.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00040_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00026_checkTableConstraints">}
-#+ Check constraints on the "intb00026" table
-#+
-#+ @param p_data - a row data LIKE intb00026.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00026_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE intb00026.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_intb00026_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00026_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00026_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00026_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00026_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00026_cantidad_a_checkColumnConstraints(p_data.cantidad_a) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00026_cantidad_b_checkColumnConstraints(p_data.cantidad_b) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00026_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00026_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00026_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00026_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00026_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00026_checkTableConstraints
-
-{<BLOCK Name="fct.intb00026_fecha_checkColumnConstraints">}
-#+ Check constraints on the "intb00026.fecha" column
-#+
-#+ @param p_fecha - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00026_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE intb00026.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00026_fecha_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00026_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "intb00026.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00026_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE intb00026.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00026_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00026_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "intb00026.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00026_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE intb00026.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00026_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00026_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "intb00026.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00026_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE intb00026.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00026_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00026_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "intb00026.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00026_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE intb00026.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00026_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00026_cantidad_a_checkColumnConstraints">}
-#+ Check constraints on the "intb00026.cantidad_a" column
-#+
-#+ @param p_cantidad_a - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00026_cantidad_a_checkColumnConstraints(p_cantidad_a)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad_a LIKE intb00026.cantidad_a
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00026_cantidad_a_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00026_cantidad_b_checkColumnConstraints">}
-#+ Check constraints on the "intb00026.cantidad_b" column
-#+
-#+ @param p_cantidad_b - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00026_cantidad_b_checkColumnConstraints(p_cantidad_b)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad_b LIKE intb00026.cantidad_b
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00026_cantidad_b_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00026_status_t_checkColumnConstraints">}
-#+ Check constraints on the "intb00026.status_t" column
-#+
-#+ @param p_status_t - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00026_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE intb00026.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00026_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00026_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "intb00026.us_crea" column
-#+
-#+ @param p_us_crea - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00026_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE intb00026.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00026_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00026_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "intb00026.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00026_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE intb00026.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00026_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00026_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "intb00026.us_mod" column
-#+
-#+ @param p_us_mod - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00026_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE intb00026.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00026_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00026_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "intb00026.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00026_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE intb00026.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00026_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00023_checkTableConstraints">}
-#+ Check constraints on the "intb00023" table
-#+
-#+ @param p_data - a row data LIKE intb00023.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00023_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE intb00023.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_intb00023_num_doc_checkColumnConstraints(p_data.num_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00023_cod_mov_checkColumnConstraints(p_data.cod_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00023_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00023_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00023_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00023_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00023_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00023_checkTableConstraints
-
-{<BLOCK Name="fct.intb00023_num_doc_checkColumnConstraints">}
-#+ Check constraints on the "intb00023.num_doc" column
-#+
-#+ @param p_num_doc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00023_num_doc_checkColumnConstraints(p_num_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_doc LIKE intb00023.num_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_num_doc IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- num_doc: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00023_num_doc_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00023_cod_mov_checkColumnConstraints">}
-#+ Check constraints on the "intb00023.cod_mov" column
-#+
-#+ @param p_cod_mov - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00023_cod_mov_checkColumnConstraints(p_cod_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mov LIKE intb00023.cod_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00023_cod_mov_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00023_status_t_checkColumnConstraints">}
-#+ Check constraints on the "intb00023.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00023_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE intb00023.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00023_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00023_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "intb00023.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00023_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE intb00023.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00023_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00023_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "intb00023.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00023_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE intb00023.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00023_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00023_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "intb00023.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00023_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE intb00023.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00023_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00023_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "intb00023.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00023_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE intb00023.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00023_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00022_checkTableConstraints">}
-#+ Check constraints on the "intb00022" table
-#+
-#+ @param p_data - a row data LIKE intb00022.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00022_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE intb00022.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_intb00022_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00022_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00022_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00022_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00022_descrip_esp_checkColumnConstraints(p_data.descrip_esp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00022_descrip_ing_checkColumnConstraints(p_data.descrip_ing) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00022_unidad_med_checkColumnConstraints(p_data.unidad_med) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00022_costo_real_ci_checkColumnConstraints(p_data.costo_real_ci) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00022_costo_real_si_checkColumnConstraints(p_data.costo_real_si) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00022_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00022_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00022_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00022_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00022_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00022_checkTableConstraints
-
-{<BLOCK Name="fct.intb00022_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "intb00022.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00022_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE intb00022.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_n IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_n: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00022_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00022_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "intb00022.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00022_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE intb00022.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_grupo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_grupo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00022_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00022_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "intb00022.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00022_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE intb00022.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_tipo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_tipo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00022_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00022_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "intb00022.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00022_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE intb00022.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_sec IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_sec: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00022_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00022_descrip_esp_checkColumnConstraints">}
-#+ Check constraints on the "intb00022.descrip_esp" column
-#+
-#+ @param p_descrip_esp - VARCHAR2(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00022_descrip_esp_checkColumnConstraints(p_descrip_esp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descrip_esp LIKE intb00022.descrip_esp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00022_descrip_esp_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00022_descrip_ing_checkColumnConstraints">}
-#+ Check constraints on the "intb00022.descrip_ing" column
-#+
-#+ @param p_descrip_ing - VARCHAR2(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00022_descrip_ing_checkColumnConstraints(p_descrip_ing)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descrip_ing LIKE intb00022.descrip_ing
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00022_descrip_ing_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00022_unidad_med_checkColumnConstraints">}
-#+ Check constraints on the "intb00022.unidad_med" column
-#+
-#+ @param p_unidad_med - VARCHAR2(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00022_unidad_med_checkColumnConstraints(p_unidad_med)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_unidad_med LIKE intb00022.unidad_med
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00022_unidad_med_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00022_costo_real_ci_checkColumnConstraints">}
-#+ Check constraints on the "intb00022.costo_real_ci" column
-#+
-#+ @param p_costo_real_ci - DECIMAL(9,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00022_costo_real_ci_checkColumnConstraints(p_costo_real_ci)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_costo_real_ci LIKE intb00022.costo_real_ci
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00022_costo_real_ci_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00022_costo_real_si_checkColumnConstraints">}
-#+ Check constraints on the "intb00022.costo_real_si" column
-#+
-#+ @param p_costo_real_si - DECIMAL(9,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00022_costo_real_si_checkColumnConstraints(p_costo_real_si)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_costo_real_si LIKE intb00022.costo_real_si
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00022_costo_real_si_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00022_status_t_checkColumnConstraints">}
-#+ Check constraints on the "intb00022.status_t" column
-#+
-#+ @param p_status_t - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00022_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE intb00022.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00022_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00022_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "intb00022.us_crea" column
-#+
-#+ @param p_us_crea - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00022_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE intb00022.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00022_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00022_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "intb00022.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00022_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE intb00022.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00022_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00022_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "intb00022.us_mod" column
-#+
-#+ @param p_us_mod - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00022_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE intb00022.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00022_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00022_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "intb00022.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00022_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE intb00022.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00022_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00020_checkTableConstraints">}
-#+ Check constraints on the "intb00020" table
-#+
-#+ @param p_data - a row data LIKE intb00020.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00020_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE intb00020.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_intb00020_tipo_doc_checkColumnConstraints(p_data.tipo_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00020_num_fianza_checkColumnConstraints(p_data.num_fianza) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00020_num_res_checkColumnConstraints(p_data.num_res) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00020_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00020_nom_buque_checkColumnConstraints(p_data.nom_buque) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00020_fecha_ent_checkColumnConstraints(p_data.fecha_ent) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00020_cod_sp_checkColumnConstraints(p_data.cod_sp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00020_cod_sp_sec_checkColumnConstraints(p_data.cod_sp_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00020_cod_pais_checkColumnConstraints(p_data.cod_pais) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00020_cant_bulto_checkColumnConstraints(p_data.cant_bulto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00020_num_oc_checkColumnConstraints(p_data.num_oc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00020_num_emb_checkColumnConstraints(p_data.num_emb) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00020_valor_merc_checkColumnConstraints(p_data.valor_merc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00020_cod_ca_checkColumnConstraints(p_data.cod_ca) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00020_poliza_checkColumnConstraints(p_data.poliza) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00020_prima_checkColumnConstraints(p_data.prima) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00020_porc_prima_checkColumnConstraints(p_data.porc_prima) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00020_valor_desm_checkColumnConstraints(p_data.valor_desm) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00020_valor_gar_checkColumnConstraints(p_data.valor_gar) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00020_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00020_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00020_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00020_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00020_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00020_cantidad_c_checkColumnConstraints(p_data.cantidad_c) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00020_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00020_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00020_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00020_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00020_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00020_checkTableConstraints
-
-{<BLOCK Name="fct.intb00020_tipo_doc_checkColumnConstraints">}
-#+ Check constraints on the "intb00020.tipo_doc" column
-#+
-#+ @param p_tipo_doc - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00020_tipo_doc_checkColumnConstraints(p_tipo_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_doc LIKE intb00020.tipo_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00020_tipo_doc_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00020_num_fianza_checkColumnConstraints">}
-#+ Check constraints on the "intb00020.num_fianza" column
-#+
-#+ @param p_num_fianza - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00020_num_fianza_checkColumnConstraints(p_num_fianza)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_fianza LIKE intb00020.num_fianza
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00020_num_fianza_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00020_num_res_checkColumnConstraints">}
-#+ Check constraints on the "intb00020.num_res" column
-#+
-#+ @param p_num_res - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00020_num_res_checkColumnConstraints(p_num_res)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_res LIKE intb00020.num_res
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00020_num_res_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00020_fecha_checkColumnConstraints">}
-#+ Check constraints on the "intb00020.fecha" column
-#+
-#+ @param p_fecha - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00020_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE intb00020.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00020_fecha_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00020_nom_buque_checkColumnConstraints">}
-#+ Check constraints on the "intb00020.nom_buque" column
-#+
-#+ @param p_nom_buque - VARCHAR2(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00020_nom_buque_checkColumnConstraints(p_nom_buque)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nom_buque LIKE intb00020.nom_buque
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00020_nom_buque_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00020_fecha_ent_checkColumnConstraints">}
-#+ Check constraints on the "intb00020.fecha_ent" column
-#+
-#+ @param p_fecha_ent - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00020_fecha_ent_checkColumnConstraints(p_fecha_ent)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_ent LIKE intb00020.fecha_ent
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00020_fecha_ent_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00020_cod_sp_checkColumnConstraints">}
-#+ Check constraints on the "intb00020.cod_sp" column
-#+
-#+ @param p_cod_sp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00020_cod_sp_checkColumnConstraints(p_cod_sp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sp LIKE intb00020.cod_sp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00020_cod_sp_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00020_cod_sp_sec_checkColumnConstraints">}
-#+ Check constraints on the "intb00020.cod_sp_sec" column
-#+
-#+ @param p_cod_sp_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00020_cod_sp_sec_checkColumnConstraints(p_cod_sp_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sp_sec LIKE intb00020.cod_sp_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00020_cod_sp_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00020_cod_pais_checkColumnConstraints">}
-#+ Check constraints on the "intb00020.cod_pais" column
-#+
-#+ @param p_cod_pais - VARCHAR2(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00020_cod_pais_checkColumnConstraints(p_cod_pais)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_pais LIKE intb00020.cod_pais
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00020_cod_pais_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00020_cant_bulto_checkColumnConstraints">}
-#+ Check constraints on the "intb00020.cant_bulto" column
-#+
-#+ @param p_cant_bulto - VARCHAR2(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00020_cant_bulto_checkColumnConstraints(p_cant_bulto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cant_bulto LIKE intb00020.cant_bulto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00020_cant_bulto_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00020_num_oc_checkColumnConstraints">}
-#+ Check constraints on the "intb00020.num_oc" column
-#+
-#+ @param p_num_oc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00020_num_oc_checkColumnConstraints(p_num_oc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_oc LIKE intb00020.num_oc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00020_num_oc_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00020_num_emb_checkColumnConstraints">}
-#+ Check constraints on the "intb00020.num_emb" column
-#+
-#+ @param p_num_emb - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00020_num_emb_checkColumnConstraints(p_num_emb)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_emb LIKE intb00020.num_emb
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00020_num_emb_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00020_valor_merc_checkColumnConstraints">}
-#+ Check constraints on the "intb00020.valor_merc" column
-#+
-#+ @param p_valor_merc - DECIMAL(13,3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00020_valor_merc_checkColumnConstraints(p_valor_merc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valor_merc LIKE intb00020.valor_merc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00020_valor_merc_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00020_cod_ca_checkColumnConstraints">}
-#+ Check constraints on the "intb00020.cod_ca" column
-#+
-#+ @param p_cod_ca - VARCHAR2(4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00020_cod_ca_checkColumnConstraints(p_cod_ca)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_ca LIKE intb00020.cod_ca
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00020_cod_ca_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00020_poliza_checkColumnConstraints">}
-#+ Check constraints on the "intb00020.poliza" column
-#+
-#+ @param p_poliza - VARCHAR2(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00020_poliza_checkColumnConstraints(p_poliza)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_poliza LIKE intb00020.poliza
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00020_poliza_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00020_prima_checkColumnConstraints">}
-#+ Check constraints on the "intb00020.prima" column
-#+
-#+ @param p_prima - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00020_prima_checkColumnConstraints(p_prima)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_prima LIKE intb00020.prima
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00020_prima_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00020_porc_prima_checkColumnConstraints">}
-#+ Check constraints on the "intb00020.porc_prima" column
-#+
-#+ @param p_porc_prima - DECIMAL(7,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00020_porc_prima_checkColumnConstraints(p_porc_prima)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_porc_prima LIKE intb00020.porc_prima
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00020_porc_prima_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00020_valor_desm_checkColumnConstraints">}
-#+ Check constraints on the "intb00020.valor_desm" column
-#+
-#+ @param p_valor_desm - DECIMAL(7,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00020_valor_desm_checkColumnConstraints(p_valor_desm)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valor_desm LIKE intb00020.valor_desm
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00020_valor_desm_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00020_valor_gar_checkColumnConstraints">}
-#+ Check constraints on the "intb00020.valor_gar" column
-#+
-#+ @param p_valor_gar - DECIMAL(13,3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00020_valor_gar_checkColumnConstraints(p_valor_gar)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valor_gar LIKE intb00020.valor_gar
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00020_valor_gar_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00020_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "intb00020.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00020_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE intb00020.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00020_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00020_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "intb00020.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00020_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE intb00020.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00020_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00020_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "intb00020.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00020_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE intb00020.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00020_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00020_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "intb00020.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00020_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE intb00020.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00020_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00020_cantidad_checkColumnConstraints">}
-#+ Check constraints on the "intb00020.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(13,3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00020_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE intb00020.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00020_cantidad_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00020_cantidad_c_checkColumnConstraints">}
-#+ Check constraints on the "intb00020.cantidad_c" column
-#+
-#+ @param p_cantidad_c - DECIMAL(13,3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00020_cantidad_c_checkColumnConstraints(p_cantidad_c)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad_c LIKE intb00020.cantidad_c
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00020_cantidad_c_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00020_status_t_checkColumnConstraints">}
-#+ Check constraints on the "intb00020.status_t" column
-#+
-#+ @param p_status_t - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00020_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE intb00020.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00020_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00020_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "intb00020.us_crea" column
-#+
-#+ @param p_us_crea - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00020_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE intb00020.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00020_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00020_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "intb00020.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00020_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE intb00020.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00020_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00020_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "intb00020.us_mod" column
-#+
-#+ @param p_us_mod - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00020_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE intb00020.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00020_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00020_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "intb00020.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00020_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE intb00020.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00020_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00019_checkTableConstraints">}
-#+ Check constraints on the "intb00019" table
-#+
-#+ @param p_data - a row data LIKE intb00019.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00019_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE intb00019.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_intb00019_cod_inv_checkColumnConstraints(p_data.cod_inv) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00019_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00019_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00019_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00019_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00019_cod_sp_checkColumnConstraints(p_data.cod_sp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00019_cod_sp_sec_checkColumnConstraints(p_data.cod_sp_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00019_unidad_med_checkColumnConstraints(p_data.unidad_med) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00019_conversion_checkColumnConstraints(p_data.conversion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00019_precio_checkColumnConstraints(p_data.precio) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00019_precio_s_checkColumnConstraints(p_data.precio_s) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00019_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00019_referencia_checkColumnConstraints(p_data.referencia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00019_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00019_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00019_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00019_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00019_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- CALL smarmotech_dbxconstraints_intb00019_pk_intb00019_checkUniqueConstraint(p_forUpdate, p_data.cod_n, p_data.cod_grupo, p_data.cod_tipo, p_data.cod_sec, p_data.cod_sp, p_data.cod_sp_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00019_checkTableConstraints
-
-{<BLOCK Name="fct.intb00019_pk_intb00019_checkUniqueConstraint">}
-#+ Check the primary key uniqueness constraint on the "intb00019"
-#+
-#+ @param p_key - Primary Key
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00019_pk_intb00019_checkUniqueConstraint(p_forUpdate, p_key)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_key
- RECORD
- intb00019_cod_n LIKE intb00019.cod_n,
- intb00019_cod_grupo LIKE intb00019.cod_grupo,
- intb00019_cod_tipo LIKE intb00019.cod_tipo,
- intb00019_cod_sec LIKE intb00019.cod_sec,
- intb00019_cod_sp LIKE intb00019.cod_sp,
- intb00019_cod_sp_sec LIKE intb00019.cod_sp_sec
- END RECORD
- DEFINE l_key
- RECORD
- intb00019_cod_n LIKE intb00019.cod_n,
- intb00019_cod_grupo LIKE intb00019.cod_grupo,
- intb00019_cod_tipo LIKE intb00019.cod_tipo,
- intb00019_cod_sec LIKE intb00019.cod_sec,
- intb00019_cod_sp LIKE intb00019.cod_sp,
- intb00019_cod_sp_sec LIKE intb00019.cod_sp_sec
- END RECORD
- DEFINE l_where STRING
- DEFINE l_sqlQuery STRING
- DEFINE l_count INTEGER
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- LET l_where = "WHERE intb00019.cod_n = ?
- AND intb00019.cod_grupo = ?
- AND intb00019.cod_tipo = ?
- AND intb00019.cod_sec = ?
- AND intb00019.cod_sp = ?
- AND intb00019.cod_sp_sec = ? "
-
- let l_sqlQuery = "SELECT COUNT(*), cod_n, cod_grupo, cod_tipo, cod_sec, cod_sp, cod_sp_sec FROM intb00019 ", l_where, " GROUP BY cod_n, cod_grupo, cod_tipo, cod_sec, cod_sp, cod_sp_sec"
-
- PREPARE cur_intb00019_pk_intb00019_checkUniqueConstraint FROM l_sqlQuery
- EXECUTE cur_intb00019_pk_intb00019_checkUniqueConstraint INTO l_count, l_key.* USING p_key.*
- FREE cur_intb00019_pk_intb00019_checkUniqueConstraint
- IF (NOT p_forUpdate AND l_count > 0) OR (p_forUpdate AND l_count > 0 AND p_key.* != l_key.*) THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_n + cod_grupo + cod_tipo + cod_sec + cod_sp + cod_sp_sec: " || ERROR_BAM_00002) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00019_pk_intb00019_checkUniqueConstraint
-
-{<BLOCK Name="fct.intb00019_cod_inv_checkColumnConstraints">}
-#+ Check constraints on the "intb00019.cod_inv" column
-#+
-#+ @param p_cod_inv - CHAR(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00019_cod_inv_checkColumnConstraints(p_cod_inv)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_inv LIKE intb00019.cod_inv
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00019_cod_inv_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00019_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "intb00019.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00019_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE intb00019.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_n IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_n: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00019_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00019_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "intb00019.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00019_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE intb00019.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_grupo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_grupo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00019_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00019_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "intb00019.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00019_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE intb00019.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_tipo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_tipo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00019_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00019_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "intb00019.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00019_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE intb00019.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_sec IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_sec: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00019_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00019_cod_sp_checkColumnConstraints">}
-#+ Check constraints on the "intb00019.cod_sp" column
-#+
-#+ @param p_cod_sp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00019_cod_sp_checkColumnConstraints(p_cod_sp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sp LIKE intb00019.cod_sp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_sp IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_sp: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00019_cod_sp_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00019_cod_sp_sec_checkColumnConstraints">}
-#+ Check constraints on the "intb00019.cod_sp_sec" column
-#+
-#+ @param p_cod_sp_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00019_cod_sp_sec_checkColumnConstraints(p_cod_sp_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sp_sec LIKE intb00019.cod_sp_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_sp_sec IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_sp_sec: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00019_cod_sp_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00019_unidad_med_checkColumnConstraints">}
-#+ Check constraints on the "intb00019.unidad_med" column
-#+
-#+ @param p_unidad_med - CHAR(4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00019_unidad_med_checkColumnConstraints(p_unidad_med)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_unidad_med LIKE intb00019.unidad_med
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00019_unidad_med_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00019_conversion_checkColumnConstraints">}
-#+ Check constraints on the "intb00019.conversion" column
-#+
-#+ @param p_conversion - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00019_conversion_checkColumnConstraints(p_conversion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_conversion LIKE intb00019.conversion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00019_conversion_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00019_precio_checkColumnConstraints">}
-#+ Check constraints on the "intb00019.precio" column
-#+
-#+ @param p_precio - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00019_precio_checkColumnConstraints(p_precio)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_precio LIKE intb00019.precio
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00019_precio_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00019_precio_s_checkColumnConstraints">}
-#+ Check constraints on the "intb00019.precio_s" column
-#+
-#+ @param p_precio_s - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00019_precio_s_checkColumnConstraints(p_precio_s)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_precio_s LIKE intb00019.precio_s
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00019_precio_s_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00019_descripcion_checkColumnConstraints">}
-#+ Check constraints on the "intb00019.descripcion" column
-#+
-#+ @param p_descripcion - CHAR(100) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00019_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE intb00019.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00019_descripcion_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00019_referencia_checkColumnConstraints">}
-#+ Check constraints on the "intb00019.referencia" column
-#+
-#+ @param p_referencia - CHAR(25) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00019_referencia_checkColumnConstraints(p_referencia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_referencia LIKE intb00019.referencia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00019_referencia_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00019_status_t_checkColumnConstraints">}
-#+ Check constraints on the "intb00019.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00019_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE intb00019.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00019_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00019_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "intb00019.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00019_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE intb00019.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00019_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00019_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "intb00019.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00019_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE intb00019.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00019_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00019_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "intb00019.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00019_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE intb00019.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00019_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00019_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "intb00019.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00019_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE intb00019.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00019_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00018_checkTableConstraints">}
-#+ Check constraints on the "intb00018" table
-#+
-#+ @param p_data - a row data LIKE intb00018.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00018_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE intb00018.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_intb00018_documento_checkColumnConstraints(p_data.documento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00018_cod_mov_checkColumnConstraints(p_data.cod_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00018_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00018_codigo_bloque_checkColumnConstraints(p_data.codigo_bloque) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00018_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00018_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00018_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00018_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00018_ancho1_checkColumnConstraints(p_data.ancho1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00018_largo1_checkColumnConstraints(p_data.largo1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00018_espesor1_checkColumnConstraints(p_data.espesor1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00018_medida1_checkColumnConstraints(p_data.medida1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00018_ancho2_checkColumnConstraints(p_data.ancho2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00018_largo2_checkColumnConstraints(p_data.largo2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00018_espesor2_checkColumnConstraints(p_data.espesor2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00018_medida2_checkColumnConstraints(p_data.medida2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00018_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00018_checkTableConstraints
-
-{<BLOCK Name="fct.intb00018_documento_checkColumnConstraints">}
-#+ Check constraints on the "intb00018.documento" column
-#+
-#+ @param p_documento - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00018_documento_checkColumnConstraints(p_documento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_documento LIKE intb00018.documento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00018_documento_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00018_cod_mov_checkColumnConstraints">}
-#+ Check constraints on the "intb00018.cod_mov" column
-#+
-#+ @param p_cod_mov - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00018_cod_mov_checkColumnConstraints(p_cod_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mov LIKE intb00018.cod_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00018_cod_mov_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00018_fecha_checkColumnConstraints">}
-#+ Check constraints on the "intb00018.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00018_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE intb00018.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00018_fecha_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00018_codigo_bloque_checkColumnConstraints">}
-#+ Check constraints on the "intb00018.codigo_bloque" column
-#+
-#+ @param p_codigo_bloque - CHAR(25) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00018_codigo_bloque_checkColumnConstraints(p_codigo_bloque)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codigo_bloque LIKE intb00018.codigo_bloque
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00018_codigo_bloque_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00018_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "intb00018.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00018_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE intb00018.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00018_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00018_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "intb00018.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00018_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE intb00018.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00018_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00018_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "intb00018.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00018_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE intb00018.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00018_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00018_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "intb00018.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00018_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE intb00018.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00018_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00018_ancho1_checkColumnConstraints">}
-#+ Check constraints on the "intb00018.ancho1" column
-#+
-#+ @param p_ancho1 - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00018_ancho1_checkColumnConstraints(p_ancho1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ancho1 LIKE intb00018.ancho1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00018_ancho1_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00018_largo1_checkColumnConstraints">}
-#+ Check constraints on the "intb00018.largo1" column
-#+
-#+ @param p_largo1 - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00018_largo1_checkColumnConstraints(p_largo1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_largo1 LIKE intb00018.largo1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00018_largo1_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00018_espesor1_checkColumnConstraints">}
-#+ Check constraints on the "intb00018.espesor1" column
-#+
-#+ @param p_espesor1 - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00018_espesor1_checkColumnConstraints(p_espesor1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_espesor1 LIKE intb00018.espesor1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00018_espesor1_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00018_medida1_checkColumnConstraints">}
-#+ Check constraints on the "intb00018.medida1" column
-#+
-#+ @param p_medida1 - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00018_medida1_checkColumnConstraints(p_medida1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_medida1 LIKE intb00018.medida1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00018_medida1_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00018_ancho2_checkColumnConstraints">}
-#+ Check constraints on the "intb00018.ancho2" column
-#+
-#+ @param p_ancho2 - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00018_ancho2_checkColumnConstraints(p_ancho2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ancho2 LIKE intb00018.ancho2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00018_ancho2_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00018_largo2_checkColumnConstraints">}
-#+ Check constraints on the "intb00018.largo2" column
-#+
-#+ @param p_largo2 - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00018_largo2_checkColumnConstraints(p_largo2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_largo2 LIKE intb00018.largo2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00018_largo2_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00018_espesor2_checkColumnConstraints">}
-#+ Check constraints on the "intb00018.espesor2" column
-#+
-#+ @param p_espesor2 - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00018_espesor2_checkColumnConstraints(p_espesor2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_espesor2 LIKE intb00018.espesor2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00018_espesor2_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00018_medida2_checkColumnConstraints">}
-#+ Check constraints on the "intb00018.medida2" column
-#+
-#+ @param p_medida2 - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00018_medida2_checkColumnConstraints(p_medida2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_medida2 LIKE intb00018.medida2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00018_medida2_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00018_cantidad_checkColumnConstraints">}
-#+ Check constraints on the "intb00018.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00018_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE intb00018.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00018_cantidad_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00015_checkTableConstraints">}
-#+ Check constraints on the "intb00015" table
-#+
-#+ @param p_data - a row data LIKE intb00015.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00015_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE intb00015.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_intb00015_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00015_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00015_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00015_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00015_semana_del_checkColumnConstraints(p_data.semana_del) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00015_semana_al_checkColumnConstraints(p_data.semana_al) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00015_exis_act_checkColumnConstraints(p_data.exis_act) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00015_exis_fisica_checkColumnConstraints(p_data.exis_fisica) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00015_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00015_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00015_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00015_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00015_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00015_checkTableConstraints
-
-{<BLOCK Name="fct.intb00015_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "intb00015.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00015_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE intb00015.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00015_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00015_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "intb00015.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00015_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE intb00015.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00015_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00015_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "intb00015.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00015_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE intb00015.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00015_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00015_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "intb00015.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00015_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE intb00015.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00015_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00015_semana_del_checkColumnConstraints">}
-#+ Check constraints on the "intb00015.semana_del" column
-#+
-#+ @param p_semana_del - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00015_semana_del_checkColumnConstraints(p_semana_del)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_semana_del LIKE intb00015.semana_del
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00015_semana_del_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00015_semana_al_checkColumnConstraints">}
-#+ Check constraints on the "intb00015.semana_al" column
-#+
-#+ @param p_semana_al - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00015_semana_al_checkColumnConstraints(p_semana_al)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_semana_al LIKE intb00015.semana_al
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00015_semana_al_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00015_exis_act_checkColumnConstraints">}
-#+ Check constraints on the "intb00015.exis_act" column
-#+
-#+ @param p_exis_act - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00015_exis_act_checkColumnConstraints(p_exis_act)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_exis_act LIKE intb00015.exis_act
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00015_exis_act_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00015_exis_fisica_checkColumnConstraints">}
-#+ Check constraints on the "intb00015.exis_fisica" column
-#+
-#+ @param p_exis_fisica - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00015_exis_fisica_checkColumnConstraints(p_exis_fisica)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_exis_fisica LIKE intb00015.exis_fisica
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00015_exis_fisica_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00015_status_t_checkColumnConstraints">}
-#+ Check constraints on the "intb00015.status_t" column
-#+
-#+ @param p_status_t - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00015_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE intb00015.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00015_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00015_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "intb00015.us_crea" column
-#+
-#+ @param p_us_crea - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00015_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE intb00015.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00015_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00015_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "intb00015.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00015_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE intb00015.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00015_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00015_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "intb00015.us_mod" column
-#+
-#+ @param p_us_mod - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00015_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE intb00015.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00015_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00015_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "intb00015.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00015_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE intb00015.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00015_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00014_checkTableConstraints">}
-#+ Check constraints on the "intb00014" table
-#+
-#+ @param p_data - a row data LIKE intb00014.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00014_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE intb00014.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_intb00014_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00014_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00014_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00014_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00014_categoria_checkColumnConstraints(p_data.categoria) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00014_mes_ch_checkColumnConstraints(p_data.mes_ch) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00014_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00014_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00014_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00014_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00014_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00014_checkTableConstraints
-
-{<BLOCK Name="fct.intb00014_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "intb00014.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00014_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE intb00014.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00014_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00014_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "intb00014.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00014_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE intb00014.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00014_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00014_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "intb00014.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00014_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE intb00014.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00014_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00014_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "intb00014.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00014_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE intb00014.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00014_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00014_categoria_checkColumnConstraints">}
-#+ Check constraints on the "intb00014.categoria" column
-#+
-#+ @param p_categoria - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00014_categoria_checkColumnConstraints(p_categoria)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_categoria LIKE intb00014.categoria
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00014_categoria_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00014_mes_ch_checkColumnConstraints">}
-#+ Check constraints on the "intb00014.mes_ch" column
-#+
-#+ @param p_mes_ch - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00014_mes_ch_checkColumnConstraints(p_mes_ch)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mes_ch LIKE intb00014.mes_ch
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00014_mes_ch_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00014_status_t_checkColumnConstraints">}
-#+ Check constraints on the "intb00014.status_t" column
-#+
-#+ @param p_status_t - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00014_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE intb00014.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00014_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00014_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "intb00014.us_crea" column
-#+
-#+ @param p_us_crea - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00014_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE intb00014.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00014_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00014_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "intb00014.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00014_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE intb00014.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00014_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00014_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "intb00014.us_mod" column
-#+
-#+ @param p_us_mod - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00014_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE intb00014.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00014_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00014_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "intb00014.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00014_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE intb00014.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00014_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00013_checkTableConstraints">}
-#+ Check constraints on the "intb00013" table
-#+
-#+ @param p_data - a row data LIKE intb00013.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00013_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE intb00013.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_intb00013_mes_ini_checkColumnConstraints(p_data.mes_ini) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00013_mes_fin_checkColumnConstraints(p_data.mes_fin) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00013_ano_checkColumnConstraints(p_data.ano) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00013_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00013_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00013_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00013_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00013_costo_st_checkColumnConstraints(p_data.costo_st) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00013_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00013_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00013_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00013_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00013_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- CALL smarmotech_dbxconstraints_intb00013_pk_intb00013_checkUniqueConstraint(p_forUpdate, p_data.ano, p_data.cod_n, p_data.cod_grupo, p_data.cod_tipo, p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00013_checkTableConstraints
-
-{<BLOCK Name="fct.intb00013_pk_intb00013_checkUniqueConstraint">}
-#+ Check the primary key uniqueness constraint on the "intb00013"
-#+
-#+ @param p_key - Primary Key
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00013_pk_intb00013_checkUniqueConstraint(p_forUpdate, p_key)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_key
- RECORD
- intb00013_ano LIKE intb00013.ano,
- intb00013_cod_n LIKE intb00013.cod_n,
- intb00013_cod_grupo LIKE intb00013.cod_grupo,
- intb00013_cod_tipo LIKE intb00013.cod_tipo,
- intb00013_cod_sec LIKE intb00013.cod_sec
- END RECORD
- DEFINE l_key
- RECORD
- intb00013_ano LIKE intb00013.ano,
- intb00013_cod_n LIKE intb00013.cod_n,
- intb00013_cod_grupo LIKE intb00013.cod_grupo,
- intb00013_cod_tipo LIKE intb00013.cod_tipo,
- intb00013_cod_sec LIKE intb00013.cod_sec
- END RECORD
- DEFINE l_where STRING
- DEFINE l_sqlQuery STRING
- DEFINE l_count INTEGER
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- LET l_where = "WHERE intb00013.ano = ?
- AND intb00013.cod_n = ?
- AND intb00013.cod_grupo = ?
- AND intb00013.cod_tipo = ?
- AND intb00013.cod_sec = ? "
-
- let l_sqlQuery = "SELECT COUNT(*), ano, cod_n, cod_grupo, cod_tipo, cod_sec FROM intb00013 ", l_where, " GROUP BY ano, cod_n, cod_grupo, cod_tipo, cod_sec"
-
- PREPARE cur_intb00013_pk_intb00013_checkUniqueConstraint FROM l_sqlQuery
- EXECUTE cur_intb00013_pk_intb00013_checkUniqueConstraint INTO l_count, l_key.* USING p_key.*
- FREE cur_intb00013_pk_intb00013_checkUniqueConstraint
- IF (NOT p_forUpdate AND l_count > 0) OR (p_forUpdate AND l_count > 0 AND p_key.* != l_key.*) THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- ano + cod_n + cod_grupo + cod_tipo + cod_sec: " || ERROR_BAM_00002) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00013_pk_intb00013_checkUniqueConstraint
-
-{<BLOCK Name="fct.intb00013_mes_ini_checkColumnConstraints">}
-#+ Check constraints on the "intb00013.mes_ini" column
-#+
-#+ @param p_mes_ini - VARCHAR2(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00013_mes_ini_checkColumnConstraints(p_mes_ini)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mes_ini LIKE intb00013.mes_ini
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00013_mes_ini_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00013_mes_fin_checkColumnConstraints">}
-#+ Check constraints on the "intb00013.mes_fin" column
-#+
-#+ @param p_mes_fin - VARCHAR2(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00013_mes_fin_checkColumnConstraints(p_mes_fin)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mes_fin LIKE intb00013.mes_fin
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00013_mes_fin_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00013_ano_checkColumnConstraints">}
-#+ Check constraints on the "intb00013.ano" column
-#+
-#+ @param p_ano - VARCHAR2(4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00013_ano_checkColumnConstraints(p_ano)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ano LIKE intb00013.ano
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_ano IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- ano: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00013_ano_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00013_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "intb00013.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00013_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE intb00013.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_n IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_n: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00013_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00013_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "intb00013.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00013_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE intb00013.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_grupo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_grupo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00013_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00013_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "intb00013.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00013_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE intb00013.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_tipo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_tipo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00013_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00013_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "intb00013.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00013_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE intb00013.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_sec IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_sec: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00013_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00013_costo_st_checkColumnConstraints">}
-#+ Check constraints on the "intb00013.costo_st" column
-#+
-#+ @param p_costo_st - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00013_costo_st_checkColumnConstraints(p_costo_st)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_costo_st LIKE intb00013.costo_st
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00013_costo_st_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00013_status_t_checkColumnConstraints">}
-#+ Check constraints on the "intb00013.status_t" column
-#+
-#+ @param p_status_t - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00013_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE intb00013.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00013_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00013_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "intb00013.us_crea" column
-#+
-#+ @param p_us_crea - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00013_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE intb00013.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00013_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00013_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "intb00013.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00013_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE intb00013.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00013_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00013_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "intb00013.us_mod" column
-#+
-#+ @param p_us_mod - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00013_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE intb00013.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00013_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00013_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "intb00013.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00013_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE intb00013.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00013_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00012_checkTableConstraints">}
-#+ Check constraints on the "intb00012" table
-#+
-#+ @param p_data - a row data LIKE intb00012.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00012_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE intb00012.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_intb00012_idtrx_checkColumnConstraints(p_data.idtrx) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00012_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00012_bodega_checkColumnConstraints(p_data.bodega) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00012_cod_seccion_checkColumnConstraints(p_data.cod_seccion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00012_cod_tramo_checkColumnConstraints(p_data.cod_tramo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00012_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00012_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00012_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00012_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00012_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00012_balance_checkColumnConstraints(p_data.balance) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00012_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00012_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00012_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00012_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00012_checkTableConstraints
-
-{<BLOCK Name="fct.intb00012_idtrx_checkColumnConstraints">}
-#+ Check constraints on the "intb00012.idtrx" column
-#+
-#+ @param p_idtrx - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00012_idtrx_checkColumnConstraints(p_idtrx)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_idtrx LIKE intb00012.idtrx
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00012_idtrx_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00012_fecha_checkColumnConstraints">}
-#+ Check constraints on the "intb00012.fecha" column
-#+
-#+ @param p_fecha - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00012_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE intb00012.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00012_fecha_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00012_bodega_checkColumnConstraints">}
-#+ Check constraints on the "intb00012.bodega" column
-#+
-#+ @param p_bodega - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00012_bodega_checkColumnConstraints(p_bodega)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_bodega LIKE intb00012.bodega
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00012_bodega_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00012_cod_seccion_checkColumnConstraints">}
-#+ Check constraints on the "intb00012.cod_seccion" column
-#+
-#+ @param p_cod_seccion - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00012_cod_seccion_checkColumnConstraints(p_cod_seccion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_seccion LIKE intb00012.cod_seccion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00012_cod_seccion_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00012_cod_tramo_checkColumnConstraints">}
-#+ Check constraints on the "intb00012.cod_tramo" column
-#+
-#+ @param p_cod_tramo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00012_cod_tramo_checkColumnConstraints(p_cod_tramo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tramo LIKE intb00012.cod_tramo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00012_cod_tramo_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00012_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "intb00012.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00012_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE intb00012.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00012_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00012_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "intb00012.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00012_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE intb00012.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00012_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00012_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "intb00012.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00012_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE intb00012.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00012_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00012_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "intb00012.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00012_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE intb00012.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00012_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00012_cantidad_checkColumnConstraints">}
-#+ Check constraints on the "intb00012.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00012_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE intb00012.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00012_cantidad_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00012_balance_checkColumnConstraints">}
-#+ Check constraints on the "intb00012.balance" column
-#+
-#+ @param p_balance - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00012_balance_checkColumnConstraints(p_balance)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_balance LIKE intb00012.balance
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00012_balance_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00012_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "intb00012.us_crea" column
-#+
-#+ @param p_us_crea - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00012_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE intb00012.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00012_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00012_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "intb00012.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00012_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE intb00012.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00012_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00012_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "intb00012.us_mod" column
-#+
-#+ @param p_us_mod - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00012_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE intb00012.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00012_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00012_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "intb00012.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00012_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE intb00012.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00012_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00011_checkTableConstraints">}
-#+ Check constraints on the "intb00011" table
-#+
-#+ @param p_data - a row data LIKE intb00011.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00011_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE intb00011.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_intb00011_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00011_bodega_checkColumnConstraints(p_data.bodega) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00011_cod_seccion_checkColumnConstraints(p_data.cod_seccion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00011_cod_tramo_checkColumnConstraints(p_data.cod_tramo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00011_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00011_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00011_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00011_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00011_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00011_balance_checkColumnConstraints(p_data.balance) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00011_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00011_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00011_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00011_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00011_checkTableConstraints
-
-{<BLOCK Name="fct.intb00011_fecha_checkColumnConstraints">}
-#+ Check constraints on the "intb00011.fecha" column
-#+
-#+ @param p_fecha - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00011_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE intb00011.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_fecha IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- fecha: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00011_fecha_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00011_bodega_checkColumnConstraints">}
-#+ Check constraints on the "intb00011.bodega" column
-#+
-#+ @param p_bodega - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00011_bodega_checkColumnConstraints(p_bodega)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_bodega LIKE intb00011.bodega
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_bodega IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- bodega: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00011_bodega_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00011_cod_seccion_checkColumnConstraints">}
-#+ Check constraints on the "intb00011.cod_seccion" column
-#+
-#+ @param p_cod_seccion - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00011_cod_seccion_checkColumnConstraints(p_cod_seccion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_seccion LIKE intb00011.cod_seccion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00011_cod_seccion_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00011_cod_tramo_checkColumnConstraints">}
-#+ Check constraints on the "intb00011.cod_tramo" column
-#+
-#+ @param p_cod_tramo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00011_cod_tramo_checkColumnConstraints(p_cod_tramo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tramo LIKE intb00011.cod_tramo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00011_cod_tramo_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00011_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "intb00011.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00011_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE intb00011.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_n IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_n: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00011_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00011_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "intb00011.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00011_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE intb00011.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_grupo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_grupo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00011_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00011_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "intb00011.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00011_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE intb00011.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_tipo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_tipo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00011_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00011_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "intb00011.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00011_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE intb00011.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_sec IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_sec: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00011_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00011_cantidad_checkColumnConstraints">}
-#+ Check constraints on the "intb00011.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00011_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE intb00011.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cantidad IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cantidad: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00011_cantidad_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00011_balance_checkColumnConstraints">}
-#+ Check constraints on the "intb00011.balance" column
-#+
-#+ @param p_balance - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00011_balance_checkColumnConstraints(p_balance)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_balance LIKE intb00011.balance
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00011_balance_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00011_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "intb00011.us_crea" column
-#+
-#+ @param p_us_crea - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00011_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE intb00011.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00011_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00011_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "intb00011.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00011_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE intb00011.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00011_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00011_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "intb00011.us_mod" column
-#+
-#+ @param p_us_mod - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00011_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE intb00011.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00011_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00011_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "intb00011.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00011_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE intb00011.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00011_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00010_checkTableConstraints">}
-#+ Check constraints on the "intb00010" table
-#+
-#+ @param p_data - a row data LIKE intb00010.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00010_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE intb00010.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_intb00010_cod_bodega_checkColumnConstraints(p_data.cod_bodega) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00010_cod_seccion_checkColumnConstraints(p_data.cod_seccion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00010_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- CALL smarmotech_dbxconstraints_intb00010_pk_intb00010_checkUniqueConstraint(p_forUpdate, p_data.cod_bodega, p_data.cod_seccion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00010_checkTableConstraints
-
-{<BLOCK Name="fct.intb00010_pk_intb00010_checkUniqueConstraint">}
-#+ Check the primary key uniqueness constraint on the "intb00010"
-#+
-#+ @param p_key - Primary Key
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00010_pk_intb00010_checkUniqueConstraint(p_forUpdate, p_key)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_key
- RECORD
- intb00010_cod_bodega LIKE intb00010.cod_bodega,
- intb00010_cod_seccion LIKE intb00010.cod_seccion
- END RECORD
- DEFINE l_key
- RECORD
- intb00010_cod_bodega LIKE intb00010.cod_bodega,
- intb00010_cod_seccion LIKE intb00010.cod_seccion
- END RECORD
- DEFINE l_where STRING
- DEFINE l_sqlQuery STRING
- DEFINE l_count INTEGER
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- LET l_where = "WHERE intb00010.cod_bodega = ?
- AND intb00010.cod_seccion = ? "
-
- let l_sqlQuery = "SELECT COUNT(*), cod_bodega, cod_seccion FROM intb00010 ", l_where, " GROUP BY cod_bodega, cod_seccion"
-
- PREPARE cur_intb00010_pk_intb00010_checkUniqueConstraint FROM l_sqlQuery
- EXECUTE cur_intb00010_pk_intb00010_checkUniqueConstraint INTO l_count, l_key.* USING p_key.*
- FREE cur_intb00010_pk_intb00010_checkUniqueConstraint
- IF (NOT p_forUpdate AND l_count > 0) OR (p_forUpdate AND l_count > 0 AND p_key.* != l_key.*) THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_bodega + cod_seccion: " || ERROR_BAM_00002) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00010_pk_intb00010_checkUniqueConstraint
-
-{<BLOCK Name="fct.intb00010_cod_bodega_checkColumnConstraints">}
-#+ Check constraints on the "intb00010.cod_bodega" column
-#+
-#+ @param p_cod_bodega - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00010_cod_bodega_checkColumnConstraints(p_cod_bodega)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_bodega LIKE intb00010.cod_bodega
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_bodega IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_bodega: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00010_cod_bodega_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00010_cod_seccion_checkColumnConstraints">}
-#+ Check constraints on the "intb00010.cod_seccion" column
-#+
-#+ @param p_cod_seccion - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00010_cod_seccion_checkColumnConstraints(p_cod_seccion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_seccion LIKE intb00010.cod_seccion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_seccion IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_seccion: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00010_cod_seccion_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00010_descripcion_checkColumnConstraints">}
-#+ Check constraints on the "intb00010.descripcion" column
-#+
-#+ @param p_descripcion - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00010_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE intb00010.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00010_descripcion_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00009_checkTableConstraints">}
-#+ Check constraints on the "intb00009" table
-#+
-#+ @param p_data - a row data LIKE intb00009.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00009_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE intb00009.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_intb00009_cod_bodega_checkColumnConstraints(p_data.cod_bodega) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00009_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- CALL smarmotech_dbxconstraints_intb00009_pk_intb00009_checkUniqueConstraint(p_forUpdate, p_data.cod_bodega) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00009_checkTableConstraints
-
-{<BLOCK Name="fct.intb00009_pk_intb00009_checkUniqueConstraint">}
-#+ Check the primary key uniqueness constraint on the "intb00009"
-#+
-#+ @param p_key - Primary Key
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00009_pk_intb00009_checkUniqueConstraint(p_forUpdate, p_key)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_key
- RECORD
- intb00009_cod_bodega LIKE intb00009.cod_bodega
- END RECORD
- DEFINE l_key
- RECORD
- intb00009_cod_bodega LIKE intb00009.cod_bodega
- END RECORD
- DEFINE l_where STRING
- DEFINE l_sqlQuery STRING
- DEFINE l_count INTEGER
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- LET l_where = "WHERE intb00009.cod_bodega = ? "
-
- let l_sqlQuery = "SELECT COUNT(*), cod_bodega FROM intb00009 ", l_where, " GROUP BY cod_bodega"
-
- PREPARE cur_intb00009_pk_intb00009_checkUniqueConstraint FROM l_sqlQuery
- EXECUTE cur_intb00009_pk_intb00009_checkUniqueConstraint INTO l_count, l_key.* USING p_key.*
- FREE cur_intb00009_pk_intb00009_checkUniqueConstraint
- IF (NOT p_forUpdate AND l_count > 0) OR (p_forUpdate AND l_count > 0 AND p_key.* != l_key.*) THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_bodega: " || ERROR_BAM_00002) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00009_pk_intb00009_checkUniqueConstraint
-
-{<BLOCK Name="fct.intb00009_cod_bodega_checkColumnConstraints">}
-#+ Check constraints on the "intb00009.cod_bodega" column
-#+
-#+ @param p_cod_bodega - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00009_cod_bodega_checkColumnConstraints(p_cod_bodega)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_bodega LIKE intb00009.cod_bodega
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_bodega IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_bodega: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00009_cod_bodega_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00009_descripcion_checkColumnConstraints">}
-#+ Check constraints on the "intb00009.descripcion" column
-#+
-#+ @param p_descripcion - VARCHAR2(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00009_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE intb00009.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00009_descripcion_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00008_checkTableConstraints">}
-#+ Check constraints on the "intb00008" table
-#+
-#+ @param p_data - a row data LIKE intb00008.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00008_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE intb00008.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_intb00008_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00008_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00008_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00008_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00008_cod_sp_checkColumnConstraints(p_data.cod_sp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00008_cod_sp_sec_checkColumnConstraints(p_data.cod_sp_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00008_precio_checkColumnConstraints(p_data.precio) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00008_fecha_act_checkColumnConstraints(p_data.fecha_act) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00008_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00008_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00008_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00008_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00008_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00008_checkTableConstraints
-
-{<BLOCK Name="fct.intb00008_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "intb00008.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00008_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE intb00008.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_n IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_n: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00008_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00008_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "intb00008.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00008_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE intb00008.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_grupo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_grupo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00008_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00008_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "intb00008.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00008_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE intb00008.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_tipo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_tipo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00008_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00008_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "intb00008.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00008_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE intb00008.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_sec IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_sec: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00008_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00008_cod_sp_checkColumnConstraints">}
-#+ Check constraints on the "intb00008.cod_sp" column
-#+
-#+ @param p_cod_sp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00008_cod_sp_checkColumnConstraints(p_cod_sp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sp LIKE intb00008.cod_sp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_sp IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_sp: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00008_cod_sp_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00008_cod_sp_sec_checkColumnConstraints">}
-#+ Check constraints on the "intb00008.cod_sp_sec" column
-#+
-#+ @param p_cod_sp_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00008_cod_sp_sec_checkColumnConstraints(p_cod_sp_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sp_sec LIKE intb00008.cod_sp_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_sp_sec IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_sp_sec: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00008_cod_sp_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00008_precio_checkColumnConstraints">}
-#+ Check constraints on the "intb00008.precio" column
-#+
-#+ @param p_precio - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00008_precio_checkColumnConstraints(p_precio)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_precio LIKE intb00008.precio
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00008_precio_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00008_fecha_act_checkColumnConstraints">}
-#+ Check constraints on the "intb00008.fecha_act" column
-#+
-#+ @param p_fecha_act - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00008_fecha_act_checkColumnConstraints(p_fecha_act)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_act LIKE intb00008.fecha_act
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00008_fecha_act_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00008_status_t_checkColumnConstraints">}
-#+ Check constraints on the "intb00008.status_t" column
-#+
-#+ @param p_status_t - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00008_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE intb00008.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00008_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00008_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "intb00008.us_crea" column
-#+
-#+ @param p_us_crea - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00008_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE intb00008.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00008_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00008_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "intb00008.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00008_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE intb00008.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00008_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00008_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "intb00008.us_mod" column
-#+
-#+ @param p_us_mod - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00008_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE intb00008.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00008_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00008_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "intb00008.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00008_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE intb00008.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00008_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00007_checkTableConstraints">}
-#+ Check constraints on the "intb00007" table
-#+
-#+ @param p_data - a row data LIKE intb00007.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00007_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE intb00007.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_intb00007_codigo_unidad_checkColumnConstraints(p_data.codigo_unidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00007_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00007_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00007_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00007_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00007_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00007_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00007_checkTableConstraints
-
-{<BLOCK Name="fct.intb00007_codigo_unidad_checkColumnConstraints">}
-#+ Check constraints on the "intb00007.codigo_unidad" column
-#+
-#+ @param p_codigo_unidad - VARCHAR2(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00007_codigo_unidad_checkColumnConstraints(p_codigo_unidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codigo_unidad LIKE intb00007.codigo_unidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_codigo_unidad IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- codigo_unidad: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00007_codigo_unidad_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00007_descripcion_checkColumnConstraints">}
-#+ Check constraints on the "intb00007.descripcion" column
-#+
-#+ @param p_descripcion - VARCHAR2(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00007_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE intb00007.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00007_descripcion_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00007_status_t_checkColumnConstraints">}
-#+ Check constraints on the "intb00007.status_t" column
-#+
-#+ @param p_status_t - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00007_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE intb00007.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00007_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00007_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "intb00007.us_crea" column
-#+
-#+ @param p_us_crea - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00007_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE intb00007.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00007_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00007_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "intb00007.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00007_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE intb00007.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00007_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00007_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "intb00007.us_mod" column
-#+
-#+ @param p_us_mod - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00007_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE intb00007.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00007_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00007_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "intb00007.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00007_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE intb00007.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00007_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00006_checkTableConstraints">}
-#+ Check constraints on the "intb00006" table
-#+
-#+ @param p_data - a row data LIKE intb00006.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00006_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE intb00006.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_intb00006_num_doc_checkColumnConstraints(p_data.num_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00006_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00006_fact_no_checkColumnConstraints(p_data.fact_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00006_conduce_no_checkColumnConstraints(p_data.conduce_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00006_orden_compra_checkColumnConstraints(p_data.orden_compra) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00006_tipo_checkColumnConstraints(p_data.tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00006_cod_sp_checkColumnConstraints(p_data.cod_sp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00006_cod_sp_sec_checkColumnConstraints(p_data.cod_sp_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00006_cod_mov_checkColumnConstraints(p_data.cod_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00006_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00006_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00006_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00006_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00006_cantidad_1_checkColumnConstraints(p_data.cantidad_1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00006_cantidad_2_checkColumnConstraints(p_data.cantidad_2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00006_depto_de_checkColumnConstraints(p_data.depto_de) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00006_depto_a_checkColumnConstraints(p_data.depto_a) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00006_cod_seccion_checkColumnConstraints(p_data.cod_seccion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00006_cond_recep_checkColumnConstraints(p_data.cond_recep) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00006_uso_tiempo_checkColumnConstraints(p_data.uso_tiempo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00006_bodega_checkColumnConstraints(p_data.bodega) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00006_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00006_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00006_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00006_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00006_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00006_num_emp_checkColumnConstraints(p_data.num_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00006_checkTableConstraints
-
-{<BLOCK Name="fct.intb00006_num_doc_checkColumnConstraints">}
-#+ Check constraints on the "intb00006.num_doc" column
-#+
-#+ @param p_num_doc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00006_num_doc_checkColumnConstraints(p_num_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_doc LIKE intb00006.num_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_num_doc IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- num_doc: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00006_num_doc_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00006_fecha_checkColumnConstraints">}
-#+ Check constraints on the "intb00006.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00006_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE intb00006.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00006_fecha_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00006_fact_no_checkColumnConstraints">}
-#+ Check constraints on the "intb00006.fact_no" column
-#+
-#+ @param p_fact_no - VARCHAR2(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00006_fact_no_checkColumnConstraints(p_fact_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fact_no LIKE intb00006.fact_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00006_fact_no_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00006_conduce_no_checkColumnConstraints">}
-#+ Check constraints on the "intb00006.conduce_no" column
-#+
-#+ @param p_conduce_no - VARCHAR2(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00006_conduce_no_checkColumnConstraints(p_conduce_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_conduce_no LIKE intb00006.conduce_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00006_conduce_no_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00006_orden_compra_checkColumnConstraints">}
-#+ Check constraints on the "intb00006.orden_compra" column
-#+
-#+ @param p_orden_compra - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00006_orden_compra_checkColumnConstraints(p_orden_compra)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_orden_compra LIKE intb00006.orden_compra
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00006_orden_compra_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00006_tipo_checkColumnConstraints">}
-#+ Check constraints on the "intb00006.tipo" column
-#+
-#+ @param p_tipo - VARCHAR2(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00006_tipo_checkColumnConstraints(p_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo LIKE intb00006.tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00006_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00006_cod_sp_checkColumnConstraints">}
-#+ Check constraints on the "intb00006.cod_sp" column
-#+
-#+ @param p_cod_sp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00006_cod_sp_checkColumnConstraints(p_cod_sp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sp LIKE intb00006.cod_sp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00006_cod_sp_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00006_cod_sp_sec_checkColumnConstraints">}
-#+ Check constraints on the "intb00006.cod_sp_sec" column
-#+
-#+ @param p_cod_sp_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00006_cod_sp_sec_checkColumnConstraints(p_cod_sp_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sp_sec LIKE intb00006.cod_sp_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00006_cod_sp_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00006_cod_mov_checkColumnConstraints">}
-#+ Check constraints on the "intb00006.cod_mov" column
-#+
-#+ @param p_cod_mov - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00006_cod_mov_checkColumnConstraints(p_cod_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mov LIKE intb00006.cod_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_mov IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_mov: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00006_cod_mov_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00006_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "intb00006.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00006_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE intb00006.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00006_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00006_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "intb00006.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00006_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE intb00006.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00006_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00006_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "intb00006.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00006_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE intb00006.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00006_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00006_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "intb00006.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00006_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE intb00006.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00006_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00006_cantidad_1_checkColumnConstraints">}
-#+ Check constraints on the "intb00006.cantidad_1" column
-#+
-#+ @param p_cantidad_1 - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00006_cantidad_1_checkColumnConstraints(p_cantidad_1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad_1 LIKE intb00006.cantidad_1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00006_cantidad_1_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00006_cantidad_2_checkColumnConstraints">}
-#+ Check constraints on the "intb00006.cantidad_2" column
-#+
-#+ @param p_cantidad_2 - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00006_cantidad_2_checkColumnConstraints(p_cantidad_2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad_2 LIKE intb00006.cantidad_2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00006_cantidad_2_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00006_depto_de_checkColumnConstraints">}
-#+ Check constraints on the "intb00006.depto_de" column
-#+
-#+ @param p_depto_de - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00006_depto_de_checkColumnConstraints(p_depto_de)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_depto_de LIKE intb00006.depto_de
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00006_depto_de_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00006_depto_a_checkColumnConstraints">}
-#+ Check constraints on the "intb00006.depto_a" column
-#+
-#+ @param p_depto_a - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00006_depto_a_checkColumnConstraints(p_depto_a)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_depto_a LIKE intb00006.depto_a
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00006_depto_a_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00006_cod_seccion_checkColumnConstraints">}
-#+ Check constraints on the "intb00006.cod_seccion" column
-#+
-#+ @param p_cod_seccion - VARCHAR2(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00006_cod_seccion_checkColumnConstraints(p_cod_seccion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_seccion LIKE intb00006.cod_seccion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00006_cod_seccion_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00006_cond_recep_checkColumnConstraints">}
-#+ Check constraints on the "intb00006.cond_recep" column
-#+
-#+ @param p_cond_recep - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00006_cond_recep_checkColumnConstraints(p_cond_recep)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cond_recep LIKE intb00006.cond_recep
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00006_cond_recep_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00006_uso_tiempo_checkColumnConstraints">}
-#+ Check constraints on the "intb00006.uso_tiempo" column
-#+
-#+ @param p_uso_tiempo - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00006_uso_tiempo_checkColumnConstraints(p_uso_tiempo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_uso_tiempo LIKE intb00006.uso_tiempo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00006_uso_tiempo_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00006_bodega_checkColumnConstraints">}
-#+ Check constraints on the "intb00006.bodega" column
-#+
-#+ @param p_bodega - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00006_bodega_checkColumnConstraints(p_bodega)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_bodega LIKE intb00006.bodega
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_bodega IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- bodega: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00006_bodega_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00006_status_t_checkColumnConstraints">}
-#+ Check constraints on the "intb00006.status_t" column
-#+
-#+ @param p_status_t - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00006_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE intb00006.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00006_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00006_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "intb00006.us_crea" column
-#+
-#+ @param p_us_crea - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00006_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE intb00006.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00006_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00006_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "intb00006.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00006_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE intb00006.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00006_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00006_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "intb00006.us_mod" column
-#+
-#+ @param p_us_mod - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00006_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE intb00006.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00006_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00006_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "intb00006.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00006_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE intb00006.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00006_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00006_num_emp_checkColumnConstraints">}
-#+ Check constraints on the "intb00006.num_emp" column
-#+
-#+ @param p_num_emp - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00006_num_emp_checkColumnConstraints(p_num_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_emp LIKE intb00006.num_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00006_num_emp_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00005_checkTableConstraints">}
-#+ Check constraints on the "intb00005" table
-#+
-#+ @param p_data - a row data LIKE intb00005.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00005_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE intb00005.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_intb00005_cod_mov_checkColumnConstraints(p_data.cod_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00005_descrip_mov_checkColumnConstraints(p_data.descrip_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00005_status_mov_checkColumnConstraints(p_data.status_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00005_cuenta_1_checkColumnConstraints(p_data.cuenta_1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00005_cuenta_2_checkColumnConstraints(p_data.cuenta_2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00005_cuenta_3_checkColumnConstraints(p_data.cuenta_3) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00005_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00005_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00005_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00005_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00005_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00005_checkTableConstraints
-
-{<BLOCK Name="fct.intb00005_cod_mov_checkColumnConstraints">}
-#+ Check constraints on the "intb00005.cod_mov" column
-#+
-#+ @param p_cod_mov - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00005_cod_mov_checkColumnConstraints(p_cod_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mov LIKE intb00005.cod_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_mov IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_mov: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00005_cod_mov_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00005_descrip_mov_checkColumnConstraints">}
-#+ Check constraints on the "intb00005.descrip_mov" column
-#+
-#+ @param p_descrip_mov - VARCHAR2(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00005_descrip_mov_checkColumnConstraints(p_descrip_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descrip_mov LIKE intb00005.descrip_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00005_descrip_mov_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00005_status_mov_checkColumnConstraints">}
-#+ Check constraints on the "intb00005.status_mov" column
-#+
-#+ @param p_status_mov - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00005_status_mov_checkColumnConstraints(p_status_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_mov LIKE intb00005.status_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00005_status_mov_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00005_cuenta_1_checkColumnConstraints">}
-#+ Check constraints on the "intb00005.cuenta_1" column
-#+
-#+ @param p_cuenta_1 - VARCHAR2(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00005_cuenta_1_checkColumnConstraints(p_cuenta_1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cuenta_1 LIKE intb00005.cuenta_1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00005_cuenta_1_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00005_cuenta_2_checkColumnConstraints">}
-#+ Check constraints on the "intb00005.cuenta_2" column
-#+
-#+ @param p_cuenta_2 - VARCHAR2(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00005_cuenta_2_checkColumnConstraints(p_cuenta_2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cuenta_2 LIKE intb00005.cuenta_2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00005_cuenta_2_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00005_cuenta_3_checkColumnConstraints">}
-#+ Check constraints on the "intb00005.cuenta_3" column
-#+
-#+ @param p_cuenta_3 - VARCHAR2(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00005_cuenta_3_checkColumnConstraints(p_cuenta_3)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cuenta_3 LIKE intb00005.cuenta_3
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00005_cuenta_3_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00005_status_t_checkColumnConstraints">}
-#+ Check constraints on the "intb00005.status_t" column
-#+
-#+ @param p_status_t - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00005_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE intb00005.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00005_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00005_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "intb00005.us_crea" column
-#+
-#+ @param p_us_crea - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00005_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE intb00005.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00005_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00005_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "intb00005.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00005_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE intb00005.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00005_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00005_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "intb00005.us_mod" column
-#+
-#+ @param p_us_mod - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00005_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE intb00005.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00005_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00005_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "intb00005.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00005_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE intb00005.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00005_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00004_checkTableConstraints">}
-#+ Check constraints on the "intb00004" table
-#+
-#+ @param p_data - a row data LIKE intb00004.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00004_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE intb00004.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_intb00004_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00004_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00004_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00004_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00004_cod_n_e_checkColumnConstraints(p_data.cod_n_e) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00004_cod_grupo_e_checkColumnConstraints(p_data.cod_grupo_e) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00004_cod_tipo_e_checkColumnConstraints(p_data.cod_tipo_e) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00004_cod_sec_e_checkColumnConstraints(p_data.cod_sec_e) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00004_cod_uso_e_checkColumnConstraints(p_data.cod_uso_e) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00004_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00004_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00004_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00004_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00004_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00004_checkTableConstraints
-
-{<BLOCK Name="fct.intb00004_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "intb00004.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00004_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE intb00004.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_n IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_n: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00004_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00004_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "intb00004.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00004_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE intb00004.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_grupo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_grupo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00004_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00004_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "intb00004.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00004_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE intb00004.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_tipo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_tipo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00004_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00004_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "intb00004.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00004_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE intb00004.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_sec IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_sec: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00004_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00004_cod_n_e_checkColumnConstraints">}
-#+ Check constraints on the "intb00004.cod_n_e" column
-#+
-#+ @param p_cod_n_e - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00004_cod_n_e_checkColumnConstraints(p_cod_n_e)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n_e LIKE intb00004.cod_n_e
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00004_cod_n_e_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00004_cod_grupo_e_checkColumnConstraints">}
-#+ Check constraints on the "intb00004.cod_grupo_e" column
-#+
-#+ @param p_cod_grupo_e - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00004_cod_grupo_e_checkColumnConstraints(p_cod_grupo_e)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo_e LIKE intb00004.cod_grupo_e
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00004_cod_grupo_e_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00004_cod_tipo_e_checkColumnConstraints">}
-#+ Check constraints on the "intb00004.cod_tipo_e" column
-#+
-#+ @param p_cod_tipo_e - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00004_cod_tipo_e_checkColumnConstraints(p_cod_tipo_e)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo_e LIKE intb00004.cod_tipo_e
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00004_cod_tipo_e_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00004_cod_sec_e_checkColumnConstraints">}
-#+ Check constraints on the "intb00004.cod_sec_e" column
-#+
-#+ @param p_cod_sec_e - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00004_cod_sec_e_checkColumnConstraints(p_cod_sec_e)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec_e LIKE intb00004.cod_sec_e
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00004_cod_sec_e_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00004_cod_uso_e_checkColumnConstraints">}
-#+ Check constraints on the "intb00004.cod_uso_e" column
-#+
-#+ @param p_cod_uso_e - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00004_cod_uso_e_checkColumnConstraints(p_cod_uso_e)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_uso_e LIKE intb00004.cod_uso_e
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00004_cod_uso_e_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00004_status_t_checkColumnConstraints">}
-#+ Check constraints on the "intb00004.status_t" column
-#+
-#+ @param p_status_t - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00004_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE intb00004.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00004_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00004_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "intb00004.us_crea" column
-#+
-#+ @param p_us_crea - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00004_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE intb00004.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00004_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00004_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "intb00004.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00004_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE intb00004.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00004_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00004_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "intb00004.us_mod" column
-#+
-#+ @param p_us_mod - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00004_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE intb00004.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00004_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00004_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "intb00004.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00004_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE intb00004.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00004_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00003_checkTableConstraints">}
-#+ Check constraints on the "intb00003" table
-#+
-#+ @param p_data - a row data LIKE intb00003.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00003_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE intb00003.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_intb00003_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00003_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00003_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00003_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00003_cod_n_s_checkColumnConstraints(p_data.cod_n_s) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00003_cod_grupo_s_checkColumnConstraints(p_data.cod_grupo_s) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00003_cod_tipo_s_checkColumnConstraints(p_data.cod_tipo_s) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00003_cod_sec_s_checkColumnConstraints(p_data.cod_sec_s) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00003_cod_uso_s_checkColumnConstraints(p_data.cod_uso_s) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00003_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00003_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00003_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00003_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00003_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00003_checkTableConstraints
-
-{<BLOCK Name="fct.intb00003_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "intb00003.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00003_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE intb00003.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_n IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_n: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00003_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00003_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "intb00003.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00003_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE intb00003.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_grupo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_grupo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00003_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00003_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "intb00003.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00003_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE intb00003.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_tipo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_tipo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00003_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00003_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "intb00003.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00003_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE intb00003.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_sec IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_sec: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00003_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00003_cod_n_s_checkColumnConstraints">}
-#+ Check constraints on the "intb00003.cod_n_s" column
-#+
-#+ @param p_cod_n_s - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00003_cod_n_s_checkColumnConstraints(p_cod_n_s)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n_s LIKE intb00003.cod_n_s
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00003_cod_n_s_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00003_cod_grupo_s_checkColumnConstraints">}
-#+ Check constraints on the "intb00003.cod_grupo_s" column
-#+
-#+ @param p_cod_grupo_s - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00003_cod_grupo_s_checkColumnConstraints(p_cod_grupo_s)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo_s LIKE intb00003.cod_grupo_s
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00003_cod_grupo_s_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00003_cod_tipo_s_checkColumnConstraints">}
-#+ Check constraints on the "intb00003.cod_tipo_s" column
-#+
-#+ @param p_cod_tipo_s - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00003_cod_tipo_s_checkColumnConstraints(p_cod_tipo_s)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo_s LIKE intb00003.cod_tipo_s
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00003_cod_tipo_s_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00003_cod_sec_s_checkColumnConstraints">}
-#+ Check constraints on the "intb00003.cod_sec_s" column
-#+
-#+ @param p_cod_sec_s - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00003_cod_sec_s_checkColumnConstraints(p_cod_sec_s)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec_s LIKE intb00003.cod_sec_s
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00003_cod_sec_s_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00003_cod_uso_s_checkColumnConstraints">}
-#+ Check constraints on the "intb00003.cod_uso_s" column
-#+
-#+ @param p_cod_uso_s - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00003_cod_uso_s_checkColumnConstraints(p_cod_uso_s)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_uso_s LIKE intb00003.cod_uso_s
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00003_cod_uso_s_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00003_status_t_checkColumnConstraints">}
-#+ Check constraints on the "intb00003.status_t" column
-#+
-#+ @param p_status_t - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00003_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE intb00003.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00003_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00003_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "intb00003.us_crea" column
-#+
-#+ @param p_us_crea - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00003_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE intb00003.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00003_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00003_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "intb00003.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00003_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE intb00003.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00003_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00003_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "intb00003.us_mod" column
-#+
-#+ @param p_us_mod - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00003_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE intb00003.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00003_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00003_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "intb00003.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00003_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE intb00003.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00003_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00002_checkTableConstraints">}
-#+ Check constraints on the "intb00002" table
-#+
-#+ @param p_data - a row data LIKE intb00002.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00002_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE intb00002.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_intb00002_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00002_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00002_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00002_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00002_pto_reorden_checkColumnConstraints(p_data.pto_reorden) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00002_existencia_checkColumnConstraints(p_data.existencia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00002_cod_nab_checkColumnConstraints(p_data.cod_nab) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00002_base_checkColumnConstraints(p_data.base) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00002_bodega_checkColumnConstraints(p_data.bodega) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00002_categoria_checkColumnConstraints(p_data.categoria) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00002_dia_llegada_checkColumnConstraints(p_data.dia_llegada) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00002_gravamen_checkColumnConstraints(p_data.gravamen) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00002_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00002_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00002_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00002_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00002_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- CALL smarmotech_dbxconstraints_intb00002_pk_intb00002_checkUniqueConstraint(p_forUpdate, p_data.cod_n, p_data.cod_grupo, p_data.cod_tipo, p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00002_checkTableConstraints
-
-{<BLOCK Name="fct.intb00002_pk_intb00002_checkUniqueConstraint">}
-#+ Check the primary key uniqueness constraint on the "intb00002"
-#+
-#+ @param p_key - Primary Key
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00002_pk_intb00002_checkUniqueConstraint(p_forUpdate, p_key)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_key
- RECORD
- intb00002_cod_n LIKE intb00002.cod_n,
- intb00002_cod_grupo LIKE intb00002.cod_grupo,
- intb00002_cod_tipo LIKE intb00002.cod_tipo,
- intb00002_cod_sec LIKE intb00002.cod_sec
- END RECORD
- DEFINE l_key
- RECORD
- intb00002_cod_n LIKE intb00002.cod_n,
- intb00002_cod_grupo LIKE intb00002.cod_grupo,
- intb00002_cod_tipo LIKE intb00002.cod_tipo,
- intb00002_cod_sec LIKE intb00002.cod_sec
- END RECORD
- DEFINE l_where STRING
- DEFINE l_sqlQuery STRING
- DEFINE l_count INTEGER
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- LET l_where = "WHERE intb00002.cod_n = ?
- AND intb00002.cod_grupo = ?
- AND intb00002.cod_tipo = ?
- AND intb00002.cod_sec = ? "
-
- let l_sqlQuery = "SELECT COUNT(*), cod_n, cod_grupo, cod_tipo, cod_sec FROM intb00002 ", l_where, " GROUP BY cod_n, cod_grupo, cod_tipo, cod_sec"
-
- PREPARE cur_intb00002_pk_intb00002_checkUniqueConstraint FROM l_sqlQuery
- EXECUTE cur_intb00002_pk_intb00002_checkUniqueConstraint INTO l_count, l_key.* USING p_key.*
- FREE cur_intb00002_pk_intb00002_checkUniqueConstraint
- IF (NOT p_forUpdate AND l_count > 0) OR (p_forUpdate AND l_count > 0 AND p_key.* != l_key.*) THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_n + cod_grupo + cod_tipo + cod_sec: " || ERROR_BAM_00002) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00002_pk_intb00002_checkUniqueConstraint
-
-{<BLOCK Name="fct.intb00002_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "intb00002.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00002_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE intb00002.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_n IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_n: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00002_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00002_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "intb00002.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00002_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE intb00002.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_grupo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_grupo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00002_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00002_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "intb00002.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00002_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE intb00002.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_tipo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_tipo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00002_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00002_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "intb00002.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00002_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE intb00002.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_sec IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_sec: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00002_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00002_pto_reorden_checkColumnConstraints">}
-#+ Check constraints on the "intb00002.pto_reorden" column
-#+
-#+ @param p_pto_reorden - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00002_pto_reorden_checkColumnConstraints(p_pto_reorden)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_pto_reorden LIKE intb00002.pto_reorden
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00002_pto_reorden_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00002_existencia_checkColumnConstraints">}
-#+ Check constraints on the "intb00002.existencia" column
-#+
-#+ @param p_existencia - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00002_existencia_checkColumnConstraints(p_existencia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_existencia LIKE intb00002.existencia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00002_existencia_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00002_cod_nab_checkColumnConstraints">}
-#+ Check constraints on the "intb00002.cod_nab" column
-#+
-#+ @param p_cod_nab - CHAR(11) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00002_cod_nab_checkColumnConstraints(p_cod_nab)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_nab LIKE intb00002.cod_nab
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00002_cod_nab_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00002_base_checkColumnConstraints">}
-#+ Check constraints on the "intb00002.base" column
-#+
-#+ @param p_base - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00002_base_checkColumnConstraints(p_base)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_base LIKE intb00002.base
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00002_base_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00002_bodega_checkColumnConstraints">}
-#+ Check constraints on the "intb00002.bodega" column
-#+
-#+ @param p_bodega - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00002_bodega_checkColumnConstraints(p_bodega)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_bodega LIKE intb00002.bodega
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00002_bodega_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00002_categoria_checkColumnConstraints">}
-#+ Check constraints on the "intb00002.categoria" column
-#+
-#+ @param p_categoria - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00002_categoria_checkColumnConstraints(p_categoria)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_categoria LIKE intb00002.categoria
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00002_categoria_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00002_dia_llegada_checkColumnConstraints">}
-#+ Check constraints on the "intb00002.dia_llegada" column
-#+
-#+ @param p_dia_llegada - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00002_dia_llegada_checkColumnConstraints(p_dia_llegada)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_dia_llegada LIKE intb00002.dia_llegada
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00002_dia_llegada_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00002_gravamen_checkColumnConstraints">}
-#+ Check constraints on the "intb00002.gravamen" column
-#+
-#+ @param p_gravamen - DECIMAL(5,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00002_gravamen_checkColumnConstraints(p_gravamen)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_gravamen LIKE intb00002.gravamen
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00002_gravamen_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00002_status_t_checkColumnConstraints">}
-#+ Check constraints on the "intb00002.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00002_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE intb00002.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00002_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00002_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "intb00002.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00002_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE intb00002.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00002_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00002_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "intb00002.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00002_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE intb00002.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00002_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00002_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "intb00002.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00002_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE intb00002.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00002_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00002_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "intb00002.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00002_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE intb00002.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00002_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00001_checkTableConstraints">}
-#+ Check constraints on the "intb00001" table
-#+
-#+ @param p_data - a row data LIKE intb00001.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00001_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE intb00001.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_intb00001_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00001_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00001_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00001_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00001_descrip_esp_checkColumnConstraints(p_data.descrip_esp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00001_descrip_ing_checkColumnConstraints(p_data.descrip_ing) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00001_unidad_med_checkColumnConstraints(p_data.unidad_med) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00001_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00001_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00001_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00001_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00001_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_intb00001_codid_checkColumnConstraints(p_data.codid) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00001_checkTableConstraints
-
-{<BLOCK Name="fct.intb00001_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "intb00001.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00001_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE intb00001.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_n IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_n: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00001_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00001_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "intb00001.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00001_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE intb00001.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_grupo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_grupo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00001_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00001_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "intb00001.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00001_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE intb00001.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_tipo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_tipo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00001_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00001_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "intb00001.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00001_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE intb00001.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_sec IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_sec: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00001_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00001_descrip_esp_checkColumnConstraints">}
-#+ Check constraints on the "intb00001.descrip_esp" column
-#+
-#+ @param p_descrip_esp - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00001_descrip_esp_checkColumnConstraints(p_descrip_esp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descrip_esp LIKE intb00001.descrip_esp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_descrip_esp IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- descrip_esp: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00001_descrip_esp_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00001_descrip_ing_checkColumnConstraints">}
-#+ Check constraints on the "intb00001.descrip_ing" column
-#+
-#+ @param p_descrip_ing - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00001_descrip_ing_checkColumnConstraints(p_descrip_ing)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descrip_ing LIKE intb00001.descrip_ing
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00001_descrip_ing_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00001_unidad_med_checkColumnConstraints">}
-#+ Check constraints on the "intb00001.unidad_med" column
-#+
-#+ @param p_unidad_med - CHAR(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00001_unidad_med_checkColumnConstraints(p_unidad_med)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_unidad_med LIKE intb00001.unidad_med
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00001_unidad_med_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00001_status_t_checkColumnConstraints">}
-#+ Check constraints on the "intb00001.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00001_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE intb00001.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00001_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00001_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "intb00001.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00001_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE intb00001.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00001_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00001_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "intb00001.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00001_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE intb00001.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00001_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00001_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "intb00001.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00001_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE intb00001.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00001_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00001_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "intb00001.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00001_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE intb00001.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00001_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.intb00001_codid_checkColumnConstraints">}
-#+ Check constraints on the "intb00001.codid" column
-#+
-#+ @param p_codid - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_intb00001_codid_checkColumnConstraints(p_codid)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codid LIKE intb00001.codid
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.intb00001_codid_checkColumnConstraints
-
-{<BLOCK Name="fct.inrp00002_checkTableConstraints">}
-#+ Check constraints on the "inrp00002" table
-#+
-#+ @param p_data - a row data LIKE inrp00002.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_inrp00002_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE inrp00002.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_inrp00002_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_inrp00002_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_inrp00002_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_inrp00002_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_inrp00002_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_inrp00002_unidad_checkColumnConstraints(p_data.unidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_inrp00002_existencia_checkColumnConstraints(p_data.existencia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_inrp00002_costos_checkColumnConstraints(p_data.costos) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_inrp00002_total_checkColumnConstraints(p_data.total) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.inrp00002_checkTableConstraints
-
-{<BLOCK Name="fct.inrp00002_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "inrp00002.cod_n" column
-#+
-#+ @param p_cod_n - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_inrp00002_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE inrp00002.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.inrp00002_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.inrp00002_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "inrp00002.cod_grupo" column
-#+
-#+ @param p_cod_grupo - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_inrp00002_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE inrp00002.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.inrp00002_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.inrp00002_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "inrp00002.cod_tipo" column
-#+
-#+ @param p_cod_tipo - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_inrp00002_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE inrp00002.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.inrp00002_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.inrp00002_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "inrp00002.cod_sec" column
-#+
-#+ @param p_cod_sec - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_inrp00002_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE inrp00002.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.inrp00002_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.inrp00002_descripcion_checkColumnConstraints">}
-#+ Check constraints on the "inrp00002.descripcion" column
-#+
-#+ @param p_descripcion - VARCHAR2(255) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_inrp00002_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE inrp00002.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.inrp00002_descripcion_checkColumnConstraints
-
-{<BLOCK Name="fct.inrp00002_unidad_checkColumnConstraints">}
-#+ Check constraints on the "inrp00002.unidad" column
-#+
-#+ @param p_unidad - VARCHAR2(255) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_inrp00002_unidad_checkColumnConstraints(p_unidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_unidad LIKE inrp00002.unidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.inrp00002_unidad_checkColumnConstraints
-
-{<BLOCK Name="fct.inrp00002_existencia_checkColumnConstraints">}
-#+ Check constraints on the "inrp00002.existencia" column
-#+
-#+ @param p_existencia - VARCHAR2(255) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_inrp00002_existencia_checkColumnConstraints(p_existencia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_existencia LIKE inrp00002.existencia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.inrp00002_existencia_checkColumnConstraints
-
-{<BLOCK Name="fct.inrp00002_costos_checkColumnConstraints">}
-#+ Check constraints on the "inrp00002.costos" column
-#+
-#+ @param p_costos - VARCHAR2(255) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_inrp00002_costos_checkColumnConstraints(p_costos)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_costos LIKE inrp00002.costos
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.inrp00002_costos_checkColumnConstraints
-
-{<BLOCK Name="fct.inrp00002_total_checkColumnConstraints">}
-#+ Check constraints on the "inrp00002.total" column
-#+
-#+ @param p_total - VARCHAR2(255) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_inrp00002_total_checkColumnConstraints(p_total)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_total LIKE inrp00002.total
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.inrp00002_total_checkColumnConstraints
-
-{<BLOCK Name="fct.emventas_checkTableConstraints">}
-#+ Check constraints on the "emventas" table
-#+
-#+ @param p_data - a row data LIKE emventas.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_emventas_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE emventas.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_emventas_mes_checkColumnConstraints(p_data.mes) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_emventas_ventas_checkColumnConstraints(p_data.ventas) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_emventas_ventas_dia_checkColumnConstraints(p_data.ventas_dia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_emventas_ventas_acum_checkColumnConstraints(p_data.ventas_acum) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.emventas_checkTableConstraints
-
-{<BLOCK Name="fct.emventas_mes_checkColumnConstraints">}
-#+ Check constraints on the "emventas.mes" column
-#+
-#+ @param p_mes - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_emventas_mes_checkColumnConstraints(p_mes)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mes LIKE emventas.mes
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.emventas_mes_checkColumnConstraints
-
-{<BLOCK Name="fct.emventas_ventas_checkColumnConstraints">}
-#+ Check constraints on the "emventas.ventas" column
-#+
-#+ @param p_ventas - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_emventas_ventas_checkColumnConstraints(p_ventas)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ventas LIKE emventas.ventas
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.emventas_ventas_checkColumnConstraints
-
-{<BLOCK Name="fct.emventas_ventas_dia_checkColumnConstraints">}
-#+ Check constraints on the "emventas.ventas_dia" column
-#+
-#+ @param p_ventas_dia - DECIMAL(18,0) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_emventas_ventas_dia_checkColumnConstraints(p_ventas_dia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ventas_dia LIKE emventas.ventas_dia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.emventas_ventas_dia_checkColumnConstraints
-
-{<BLOCK Name="fct.emventas_ventas_acum_checkColumnConstraints">}
-#+ Check constraints on the "emventas.ventas_acum" column
-#+
-#+ @param p_ventas_acum - DECIMAL(18,0) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_emventas_ventas_acum_checkColumnConstraints(p_ventas_acum)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ventas_acum LIKE emventas.ventas_acum
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.emventas_ventas_acum_checkColumnConstraints
-
-{<BLOCK Name="fct.empleados_checkTableConstraints">}
-#+ Check constraints on the "empleados" table
-#+
-#+ @param p_data - a row data LIKE empleados.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_empleados_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE empleados.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_empleados_departamento_checkColumnConstraints(p_data.departamento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_empleados_tipo_empleado_checkColumnConstraints(p_data.tipo_empleado) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_empleados_ficha_checkColumnConstraints(p_data.ficha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_empleados_nombre_checkColumnConstraints(p_data.nombre) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_empleados_cedula_checkColumnConstraints(p_data.cedula) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_empleados_puesto_checkColumnConstraints(p_data.puesto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_empleados_fecha_nacimiento_checkColumnConstraints(p_data.fecha_nacimiento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_empleados_mes_nacimiento_checkColumnConstraints(p_data.mes_nacimiento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_empleados_fecha_entrada_checkColumnConstraints(p_data.fecha_entrada) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_empleados_fecha_nomina_checkColumnConstraints(p_data.fecha_nomina) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_empleados_ano_checkColumnConstraints(p_data.ano) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_empleados_mes_checkColumnConstraints(p_data.mes) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_empleados_tiempo_empresa_checkColumnConstraints(p_data.tiempo_empresa) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_empleados_meses_checkColumnConstraints(p_data.meses) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_empleados_movimiento_nom_checkColumnConstraints(p_data.movimiento_nom) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_empleados_sueldo_actual_checkColumnConstraints(p_data.sueldo_actual) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_empleados_valor_nomina_checkColumnConstraints(p_data.valor_nomina) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_empleados_estado_checkColumnConstraints(p_data.estado) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_empleados_nomina_checkColumnConstraints(p_data.nomina) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_empleados_fehasalida_checkColumnConstraints(p_data.fehasalida) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_empleados_clasemovimiento_checkColumnConstraints(p_data.clasemovimiento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_empleados_cuenta_checkColumnConstraints(p_data.cuenta) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_empleados_localidad_checkColumnConstraints(p_data.localidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_empleados_provincia_checkColumnConstraints(p_data.provincia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.empleados_checkTableConstraints
-
-{<BLOCK Name="fct.empleados_departamento_checkColumnConstraints">}
-#+ Check constraints on the "empleados.departamento" column
-#+
-#+ @param p_departamento - VARCHAR2(35) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_empleados_departamento_checkColumnConstraints(p_departamento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_departamento LIKE empleados.departamento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.empleados_departamento_checkColumnConstraints
-
-{<BLOCK Name="fct.empleados_tipo_empleado_checkColumnConstraints">}
-#+ Check constraints on the "empleados.tipo_empleado" column
-#+
-#+ @param p_tipo_empleado - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_empleados_tipo_empleado_checkColumnConstraints(p_tipo_empleado)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_empleado LIKE empleados.tipo_empleado
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.empleados_tipo_empleado_checkColumnConstraints
-
-{<BLOCK Name="fct.empleados_ficha_checkColumnConstraints">}
-#+ Check constraints on the "empleados.ficha" column
-#+
-#+ @param p_ficha - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_empleados_ficha_checkColumnConstraints(p_ficha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ficha LIKE empleados.ficha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_ficha IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- ficha: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.empleados_ficha_checkColumnConstraints
-
-{<BLOCK Name="fct.empleados_nombre_checkColumnConstraints">}
-#+ Check constraints on the "empleados.nombre" column
-#+
-#+ @param p_nombre - VARCHAR2(31) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_empleados_nombre_checkColumnConstraints(p_nombre)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombre LIKE empleados.nombre
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.empleados_nombre_checkColumnConstraints
-
-{<BLOCK Name="fct.empleados_cedula_checkColumnConstraints">}
-#+ Check constraints on the "empleados.cedula" column
-#+
-#+ @param p_cedula - CHAR(11) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_empleados_cedula_checkColumnConstraints(p_cedula)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cedula LIKE empleados.cedula
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.empleados_cedula_checkColumnConstraints
-
-{<BLOCK Name="fct.empleados_puesto_checkColumnConstraints">}
-#+ Check constraints on the "empleados.puesto" column
-#+
-#+ @param p_puesto - VARCHAR2(35) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_empleados_puesto_checkColumnConstraints(p_puesto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_puesto LIKE empleados.puesto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.empleados_puesto_checkColumnConstraints
-
-{<BLOCK Name="fct.empleados_fecha_nacimiento_checkColumnConstraints">}
-#+ Check constraints on the "empleados.fecha_nacimiento" column
-#+
-#+ @param p_fecha_nacimiento - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_empleados_fecha_nacimiento_checkColumnConstraints(p_fecha_nacimiento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_nacimiento LIKE empleados.fecha_nacimiento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.empleados_fecha_nacimiento_checkColumnConstraints
-
-{<BLOCK Name="fct.empleados_mes_nacimiento_checkColumnConstraints">}
-#+ Check constraints on the "empleados.mes_nacimiento" column
-#+
-#+ @param p_mes_nacimiento - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_empleados_mes_nacimiento_checkColumnConstraints(p_mes_nacimiento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mes_nacimiento LIKE empleados.mes_nacimiento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.empleados_mes_nacimiento_checkColumnConstraints
-
-{<BLOCK Name="fct.empleados_fecha_entrada_checkColumnConstraints">}
-#+ Check constraints on the "empleados.fecha_entrada" column
-#+
-#+ @param p_fecha_entrada - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_empleados_fecha_entrada_checkColumnConstraints(p_fecha_entrada)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_entrada LIKE empleados.fecha_entrada
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.empleados_fecha_entrada_checkColumnConstraints
-
-{<BLOCK Name="fct.empleados_fecha_nomina_checkColumnConstraints">}
-#+ Check constraints on the "empleados.fecha_nomina" column
-#+
-#+ @param p_fecha_nomina - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_empleados_fecha_nomina_checkColumnConstraints(p_fecha_nomina)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_nomina LIKE empleados.fecha_nomina
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.empleados_fecha_nomina_checkColumnConstraints
-
-{<BLOCK Name="fct.empleados_ano_checkColumnConstraints">}
-#+ Check constraints on the "empleados.ano" column
-#+
-#+ @param p_ano - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_empleados_ano_checkColumnConstraints(p_ano)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ano LIKE empleados.ano
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_ano IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- ano: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.empleados_ano_checkColumnConstraints
-
-{<BLOCK Name="fct.empleados_mes_checkColumnConstraints">}
-#+ Check constraints on the "empleados.mes" column
-#+
-#+ @param p_mes - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_empleados_mes_checkColumnConstraints(p_mes)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mes LIKE empleados.mes
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.empleados_mes_checkColumnConstraints
-
-{<BLOCK Name="fct.empleados_tiempo_empresa_checkColumnConstraints">}
-#+ Check constraints on the "empleados.tiempo_empresa" column
-#+
-#+ @param p_tiempo_empresa - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_empleados_tiempo_empresa_checkColumnConstraints(p_tiempo_empresa)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tiempo_empresa LIKE empleados.tiempo_empresa
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.empleados_tiempo_empresa_checkColumnConstraints
-
-{<BLOCK Name="fct.empleados_meses_checkColumnConstraints">}
-#+ Check constraints on the "empleados.meses" column
-#+
-#+ @param p_meses - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_empleados_meses_checkColumnConstraints(p_meses)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_meses LIKE empleados.meses
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.empleados_meses_checkColumnConstraints
-
-{<BLOCK Name="fct.empleados_movimiento_nom_checkColumnConstraints">}
-#+ Check constraints on the "empleados.movimiento_nom" column
-#+
-#+ @param p_movimiento_nom - VARCHAR2(33) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_empleados_movimiento_nom_checkColumnConstraints(p_movimiento_nom)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_movimiento_nom LIKE empleados.movimiento_nom
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.empleados_movimiento_nom_checkColumnConstraints
-
-{<BLOCK Name="fct.empleados_sueldo_actual_checkColumnConstraints">}
-#+ Check constraints on the "empleados.sueldo_actual" column
-#+
-#+ @param p_sueldo_actual - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_empleados_sueldo_actual_checkColumnConstraints(p_sueldo_actual)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sueldo_actual LIKE empleados.sueldo_actual
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.empleados_sueldo_actual_checkColumnConstraints
-
-{<BLOCK Name="fct.empleados_valor_nomina_checkColumnConstraints">}
-#+ Check constraints on the "empleados.valor_nomina" column
-#+
-#+ @param p_valor_nomina - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_empleados_valor_nomina_checkColumnConstraints(p_valor_nomina)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valor_nomina LIKE empleados.valor_nomina
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.empleados_valor_nomina_checkColumnConstraints
-
-{<BLOCK Name="fct.empleados_estado_checkColumnConstraints">}
-#+ Check constraints on the "empleados.estado" column
-#+
-#+ @param p_estado - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_empleados_estado_checkColumnConstraints(p_estado)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_estado LIKE empleados.estado
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.empleados_estado_checkColumnConstraints
-
-{<BLOCK Name="fct.empleados_nomina_checkColumnConstraints">}
-#+ Check constraints on the "empleados.nomina" column
-#+
-#+ @param p_nomina - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_empleados_nomina_checkColumnConstraints(p_nomina)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nomina LIKE empleados.nomina
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.empleados_nomina_checkColumnConstraints
-
-{<BLOCK Name="fct.empleados_fehasalida_checkColumnConstraints">}
-#+ Check constraints on the "empleados.fehasalida" column
-#+
-#+ @param p_fehasalida - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_empleados_fehasalida_checkColumnConstraints(p_fehasalida)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fehasalida LIKE empleados.fehasalida
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.empleados_fehasalida_checkColumnConstraints
-
-{<BLOCK Name="fct.empleados_clasemovimiento_checkColumnConstraints">}
-#+ Check constraints on the "empleados.clasemovimiento" column
-#+
-#+ @param p_clasemovimiento - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_empleados_clasemovimiento_checkColumnConstraints(p_clasemovimiento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_clasemovimiento LIKE empleados.clasemovimiento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.empleados_clasemovimiento_checkColumnConstraints
-
-{<BLOCK Name="fct.empleados_cuenta_checkColumnConstraints">}
-#+ Check constraints on the "empleados.cuenta" column
-#+
-#+ @param p_cuenta - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_empleados_cuenta_checkColumnConstraints(p_cuenta)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cuenta LIKE empleados.cuenta
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.empleados_cuenta_checkColumnConstraints
-
-{<BLOCK Name="fct.empleados_localidad_checkColumnConstraints">}
-#+ Check constraints on the "empleados.localidad" column
-#+
-#+ @param p_localidad - VARCHAR2(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_empleados_localidad_checkColumnConstraints(p_localidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_localidad LIKE empleados.localidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.empleados_localidad_checkColumnConstraints
-
-{<BLOCK Name="fct.empleados_provincia_checkColumnConstraints">}
-#+ Check constraints on the "empleados.provincia" column
-#+
-#+ @param p_provincia - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_empleados_provincia_checkColumnConstraints(p_provincia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_provincia LIKE empleados.provincia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.empleados_provincia_checkColumnConstraints
-
-{<BLOCK Name="fct.dstb00005_checkTableConstraints">}
-#+ Check constraints on the "dstb00005" table
-#+
-#+ @param p_data - a row data LIKE dstb00005.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_dstb00005_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE dstb00005.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_dstb00005_tabla_checkColumnConstraints(p_data.tabla) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dstb00005_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dstb00005_num_emp1_checkColumnConstraints(p_data.num_emp1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dstb00005_fecha_creacion_checkColumnConstraints(p_data.fecha_creacion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dstb00005_numero_act_checkColumnConstraints(p_data.numero_act) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dstb00005_campo_checkColumnConstraints(p_data.campo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dstb00005_descrip_campo_checkColumnConstraints(p_data.descrip_campo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dstb00005_tipo_checkColumnConstraints(p_data.tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dstb00005_longitud_checkColumnConstraints(p_data.longitud) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dstb00005_secuencia_checkColumnConstraints(p_data.secuencia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dstb00005_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dstb00005_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dstb00005_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dstb00005_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dstb00005_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.dstb00005_checkTableConstraints
-
-{<BLOCK Name="fct.dstb00005_tabla_checkColumnConstraints">}
-#+ Check constraints on the "dstb00005.tabla" column
-#+
-#+ @param p_tabla - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dstb00005_tabla_checkColumnConstraints(p_tabla)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tabla LIKE dstb00005.tabla
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.dstb00005_tabla_checkColumnConstraints
-
-{<BLOCK Name="fct.dstb00005_descripcion_checkColumnConstraints">}
-#+ Check constraints on the "dstb00005.descripcion" column
-#+
-#+ @param p_descripcion - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dstb00005_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE dstb00005.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.dstb00005_descripcion_checkColumnConstraints
-
-{<BLOCK Name="fct.dstb00005_num_emp1_checkColumnConstraints">}
-#+ Check constraints on the "dstb00005.num_emp1" column
-#+
-#+ @param p_num_emp1 - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dstb00005_num_emp1_checkColumnConstraints(p_num_emp1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_emp1 LIKE dstb00005.num_emp1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.dstb00005_num_emp1_checkColumnConstraints
-
-{<BLOCK Name="fct.dstb00005_fecha_creacion_checkColumnConstraints">}
-#+ Check constraints on the "dstb00005.fecha_creacion" column
-#+
-#+ @param p_fecha_creacion - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dstb00005_fecha_creacion_checkColumnConstraints(p_fecha_creacion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_creacion LIKE dstb00005.fecha_creacion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.dstb00005_fecha_creacion_checkColumnConstraints
-
-{<BLOCK Name="fct.dstb00005_numero_act_checkColumnConstraints">}
-#+ Check constraints on the "dstb00005.numero_act" column
-#+
-#+ @param p_numero_act - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dstb00005_numero_act_checkColumnConstraints(p_numero_act)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_numero_act LIKE dstb00005.numero_act
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.dstb00005_numero_act_checkColumnConstraints
-
-{<BLOCK Name="fct.dstb00005_campo_checkColumnConstraints">}
-#+ Check constraints on the "dstb00005.campo" column
-#+
-#+ @param p_campo - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dstb00005_campo_checkColumnConstraints(p_campo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_campo LIKE dstb00005.campo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.dstb00005_campo_checkColumnConstraints
-
-{<BLOCK Name="fct.dstb00005_descrip_campo_checkColumnConstraints">}
-#+ Check constraints on the "dstb00005.descrip_campo" column
-#+
-#+ @param p_descrip_campo - CHAR(150) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dstb00005_descrip_campo_checkColumnConstraints(p_descrip_campo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descrip_campo LIKE dstb00005.descrip_campo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.dstb00005_descrip_campo_checkColumnConstraints
-
-{<BLOCK Name="fct.dstb00005_tipo_checkColumnConstraints">}
-#+ Check constraints on the "dstb00005.tipo" column
-#+
-#+ @param p_tipo - CHAR(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dstb00005_tipo_checkColumnConstraints(p_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo LIKE dstb00005.tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.dstb00005_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.dstb00005_longitud_checkColumnConstraints">}
-#+ Check constraints on the "dstb00005.longitud" column
-#+
-#+ @param p_longitud - CHAR(16) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dstb00005_longitud_checkColumnConstraints(p_longitud)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_longitud LIKE dstb00005.longitud
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.dstb00005_longitud_checkColumnConstraints
-
-{<BLOCK Name="fct.dstb00005_secuencia_checkColumnConstraints">}
-#+ Check constraints on the "dstb00005.secuencia" column
-#+
-#+ @param p_secuencia - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dstb00005_secuencia_checkColumnConstraints(p_secuencia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_secuencia LIKE dstb00005.secuencia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.dstb00005_secuencia_checkColumnConstraints
-
-{<BLOCK Name="fct.dstb00005_status_t_checkColumnConstraints">}
-#+ Check constraints on the "dstb00005.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dstb00005_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE dstb00005.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.dstb00005_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.dstb00005_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "dstb00005.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dstb00005_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE dstb00005.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.dstb00005_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.dstb00005_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "dstb00005.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dstb00005_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE dstb00005.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.dstb00005_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.dstb00005_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "dstb00005.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dstb00005_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE dstb00005.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.dstb00005_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.dstb00005_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "dstb00005.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dstb00005_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE dstb00005.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.dstb00005_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.dstb00004_checkTableConstraints">}
-#+ Check constraints on the "dstb00004" table
-#+
-#+ @param p_data - a row data LIKE dstb00004.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_dstb00004_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE dstb00004.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_dstb00004_cod_sistema_checkColumnConstraints(p_data.cod_sistema) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dstb00004_menu1_checkColumnConstraints(p_data.menu1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dstb00004_programa_checkColumnConstraints(p_data.programa) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dstb00004_opcion_checkColumnConstraints(p_data.opcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dstb00004_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dstb00004_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dstb00004_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dstb00004_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dstb00004_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.dstb00004_checkTableConstraints
-
-{<BLOCK Name="fct.dstb00004_cod_sistema_checkColumnConstraints">}
-#+ Check constraints on the "dstb00004.cod_sistema" column
-#+
-#+ @param p_cod_sistema - CHAR(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dstb00004_cod_sistema_checkColumnConstraints(p_cod_sistema)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sistema LIKE dstb00004.cod_sistema
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.dstb00004_cod_sistema_checkColumnConstraints
-
-{<BLOCK Name="fct.dstb00004_menu1_checkColumnConstraints">}
-#+ Check constraints on the "dstb00004.menu1" column
-#+
-#+ @param p_menu1 - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dstb00004_menu1_checkColumnConstraints(p_menu1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_menu1 LIKE dstb00004.menu1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.dstb00004_menu1_checkColumnConstraints
-
-{<BLOCK Name="fct.dstb00004_programa_checkColumnConstraints">}
-#+ Check constraints on the "dstb00004.programa" column
-#+
-#+ @param p_programa - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dstb00004_programa_checkColumnConstraints(p_programa)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_programa LIKE dstb00004.programa
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.dstb00004_programa_checkColumnConstraints
-
-{<BLOCK Name="fct.dstb00004_opcion_checkColumnConstraints">}
-#+ Check constraints on the "dstb00004.opcion" column
-#+
-#+ @param p_opcion - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dstb00004_opcion_checkColumnConstraints(p_opcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_opcion LIKE dstb00004.opcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.dstb00004_opcion_checkColumnConstraints
-
-{<BLOCK Name="fct.dstb00004_status_t_checkColumnConstraints">}
-#+ Check constraints on the "dstb00004.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dstb00004_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE dstb00004.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.dstb00004_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.dstb00004_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "dstb00004.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dstb00004_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE dstb00004.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.dstb00004_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.dstb00004_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "dstb00004.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dstb00004_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE dstb00004.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.dstb00004_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.dstb00004_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "dstb00004.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dstb00004_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE dstb00004.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.dstb00004_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.dstb00004_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "dstb00004.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dstb00004_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE dstb00004.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.dstb00004_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.dstb00003_checkTableConstraints">}
-#+ Check constraints on the "dstb00003" table
-#+
-#+ @param p_data - a row data LIKE dstb00003.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_dstb00003_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE dstb00003.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_dstb00003_cod_sistema_checkColumnConstraints(p_data.cod_sistema) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dstb00003_desc_sistema_checkColumnConstraints(p_data.desc_sistema) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dstb00003_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dstb00003_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dstb00003_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dstb00003_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dstb00003_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.dstb00003_checkTableConstraints
-
-{<BLOCK Name="fct.dstb00003_cod_sistema_checkColumnConstraints">}
-#+ Check constraints on the "dstb00003.cod_sistema" column
-#+
-#+ @param p_cod_sistema - CHAR(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dstb00003_cod_sistema_checkColumnConstraints(p_cod_sistema)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sistema LIKE dstb00003.cod_sistema
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.dstb00003_cod_sistema_checkColumnConstraints
-
-{<BLOCK Name="fct.dstb00003_desc_sistema_checkColumnConstraints">}
-#+ Check constraints on the "dstb00003.desc_sistema" column
-#+
-#+ @param p_desc_sistema - CHAR(35) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dstb00003_desc_sistema_checkColumnConstraints(p_desc_sistema)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_desc_sistema LIKE dstb00003.desc_sistema
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.dstb00003_desc_sistema_checkColumnConstraints
-
-{<BLOCK Name="fct.dstb00003_status_t_checkColumnConstraints">}
-#+ Check constraints on the "dstb00003.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dstb00003_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE dstb00003.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.dstb00003_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.dstb00003_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "dstb00003.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dstb00003_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE dstb00003.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.dstb00003_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.dstb00003_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "dstb00003.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dstb00003_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE dstb00003.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.dstb00003_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.dstb00003_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "dstb00003.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dstb00003_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE dstb00003.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.dstb00003_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.dstb00003_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "dstb00003.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dstb00003_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE dstb00003.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.dstb00003_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.dstb00002_checkTableConstraints">}
-#+ Check constraints on the "dstb00002" table
-#+
-#+ @param p_data - a row data LIKE dstb00002.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_dstb00002_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE dstb00002.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_dstb00002_programa_checkColumnConstraints(p_data.programa) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dstb00002_numero_act_checkColumnConstraints(p_data.numero_act) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dstb00002_linea_no_checkColumnConstraints(p_data.linea_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dstb00002_entradas_checkColumnConstraints(p_data.entradas) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dstb00002_proceso_checkColumnConstraints(p_data.proceso) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dstb00002_salida_checkColumnConstraints(p_data.salida) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dstb00002_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dstb00002_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dstb00002_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dstb00002_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dstb00002_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.dstb00002_checkTableConstraints
-
-{<BLOCK Name="fct.dstb00002_programa_checkColumnConstraints">}
-#+ Check constraints on the "dstb00002.programa" column
-#+
-#+ @param p_programa - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dstb00002_programa_checkColumnConstraints(p_programa)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_programa LIKE dstb00002.programa
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.dstb00002_programa_checkColumnConstraints
-
-{<BLOCK Name="fct.dstb00002_numero_act_checkColumnConstraints">}
-#+ Check constraints on the "dstb00002.numero_act" column
-#+
-#+ @param p_numero_act - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dstb00002_numero_act_checkColumnConstraints(p_numero_act)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_numero_act LIKE dstb00002.numero_act
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.dstb00002_numero_act_checkColumnConstraints
-
-{<BLOCK Name="fct.dstb00002_linea_no_checkColumnConstraints">}
-#+ Check constraints on the "dstb00002.linea_no" column
-#+
-#+ @param p_linea_no - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dstb00002_linea_no_checkColumnConstraints(p_linea_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_linea_no LIKE dstb00002.linea_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.dstb00002_linea_no_checkColumnConstraints
-
-{<BLOCK Name="fct.dstb00002_entradas_checkColumnConstraints">}
-#+ Check constraints on the "dstb00002.entradas" column
-#+
-#+ @param p_entradas - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dstb00002_entradas_checkColumnConstraints(p_entradas)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_entradas LIKE dstb00002.entradas
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.dstb00002_entradas_checkColumnConstraints
-
-{<BLOCK Name="fct.dstb00002_proceso_checkColumnConstraints">}
-#+ Check constraints on the "dstb00002.proceso" column
-#+
-#+ @param p_proceso - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dstb00002_proceso_checkColumnConstraints(p_proceso)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_proceso LIKE dstb00002.proceso
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.dstb00002_proceso_checkColumnConstraints
-
-{<BLOCK Name="fct.dstb00002_salida_checkColumnConstraints">}
-#+ Check constraints on the "dstb00002.salida" column
-#+
-#+ @param p_salida - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dstb00002_salida_checkColumnConstraints(p_salida)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_salida LIKE dstb00002.salida
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.dstb00002_salida_checkColumnConstraints
-
-{<BLOCK Name="fct.dstb00002_status_t_checkColumnConstraints">}
-#+ Check constraints on the "dstb00002.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dstb00002_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE dstb00002.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.dstb00002_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.dstb00002_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "dstb00002.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dstb00002_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE dstb00002.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.dstb00002_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.dstb00002_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "dstb00002.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dstb00002_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE dstb00002.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.dstb00002_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.dstb00002_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "dstb00002.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dstb00002_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE dstb00002.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.dstb00002_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.dstb00002_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "dstb00002.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dstb00002_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE dstb00002.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.dstb00002_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.dstb00001_checkTableConstraints">}
-#+ Check constraints on the "dstb00001" table
-#+
-#+ @param p_data - a row data LIKE dstb00001.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_dstb00001_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE dstb00001.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_dstb00001_programa_checkColumnConstraints(p_data.programa) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dstb00001_cod_sistema_checkColumnConstraints(p_data.cod_sistema) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dstb00001_num_emp_checkColumnConstraints(p_data.num_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dstb00001_no_solicitud_checkColumnConstraints(p_data.no_solicitud) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dstb00001_fecha_creacion_checkColumnConstraints(p_data.fecha_creacion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dstb00001_fecha_modificacion_checkColumnConstraints(p_data.fecha_modificacion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dstb00001_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dstb00001_objetivo1_checkColumnConstraints(p_data.objetivo1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dstb00001_objetivo2_checkColumnConstraints(p_data.objetivo2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dstb00001_numero_act_checkColumnConstraints(p_data.numero_act) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dstb00001_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dstb00001_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dstb00001_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dstb00001_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dstb00001_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.dstb00001_checkTableConstraints
-
-{<BLOCK Name="fct.dstb00001_programa_checkColumnConstraints">}
-#+ Check constraints on the "dstb00001.programa" column
-#+
-#+ @param p_programa - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dstb00001_programa_checkColumnConstraints(p_programa)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_programa LIKE dstb00001.programa
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.dstb00001_programa_checkColumnConstraints
-
-{<BLOCK Name="fct.dstb00001_cod_sistema_checkColumnConstraints">}
-#+ Check constraints on the "dstb00001.cod_sistema" column
-#+
-#+ @param p_cod_sistema - CHAR(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dstb00001_cod_sistema_checkColumnConstraints(p_cod_sistema)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sistema LIKE dstb00001.cod_sistema
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.dstb00001_cod_sistema_checkColumnConstraints
-
-{<BLOCK Name="fct.dstb00001_num_emp_checkColumnConstraints">}
-#+ Check constraints on the "dstb00001.num_emp" column
-#+
-#+ @param p_num_emp - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dstb00001_num_emp_checkColumnConstraints(p_num_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_emp LIKE dstb00001.num_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.dstb00001_num_emp_checkColumnConstraints
-
-{<BLOCK Name="fct.dstb00001_no_solicitud_checkColumnConstraints">}
-#+ Check constraints on the "dstb00001.no_solicitud" column
-#+
-#+ @param p_no_solicitud - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dstb00001_no_solicitud_checkColumnConstraints(p_no_solicitud)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_no_solicitud LIKE dstb00001.no_solicitud
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.dstb00001_no_solicitud_checkColumnConstraints
-
-{<BLOCK Name="fct.dstb00001_fecha_creacion_checkColumnConstraints">}
-#+ Check constraints on the "dstb00001.fecha_creacion" column
-#+
-#+ @param p_fecha_creacion - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dstb00001_fecha_creacion_checkColumnConstraints(p_fecha_creacion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_creacion LIKE dstb00001.fecha_creacion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.dstb00001_fecha_creacion_checkColumnConstraints
-
-{<BLOCK Name="fct.dstb00001_fecha_modificacion_checkColumnConstraints">}
-#+ Check constraints on the "dstb00001.fecha_modificacion" column
-#+
-#+ @param p_fecha_modificacion - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dstb00001_fecha_modificacion_checkColumnConstraints(p_fecha_modificacion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_modificacion LIKE dstb00001.fecha_modificacion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.dstb00001_fecha_modificacion_checkColumnConstraints
-
-{<BLOCK Name="fct.dstb00001_descripcion_checkColumnConstraints">}
-#+ Check constraints on the "dstb00001.descripcion" column
-#+
-#+ @param p_descripcion - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dstb00001_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE dstb00001.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.dstb00001_descripcion_checkColumnConstraints
-
-{<BLOCK Name="fct.dstb00001_objetivo1_checkColumnConstraints">}
-#+ Check constraints on the "dstb00001.objetivo1" column
-#+
-#+ @param p_objetivo1 - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dstb00001_objetivo1_checkColumnConstraints(p_objetivo1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_objetivo1 LIKE dstb00001.objetivo1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.dstb00001_objetivo1_checkColumnConstraints
-
-{<BLOCK Name="fct.dstb00001_objetivo2_checkColumnConstraints">}
-#+ Check constraints on the "dstb00001.objetivo2" column
-#+
-#+ @param p_objetivo2 - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dstb00001_objetivo2_checkColumnConstraints(p_objetivo2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_objetivo2 LIKE dstb00001.objetivo2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.dstb00001_objetivo2_checkColumnConstraints
-
-{<BLOCK Name="fct.dstb00001_numero_act_checkColumnConstraints">}
-#+ Check constraints on the "dstb00001.numero_act" column
-#+
-#+ @param p_numero_act - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dstb00001_numero_act_checkColumnConstraints(p_numero_act)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_numero_act LIKE dstb00001.numero_act
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.dstb00001_numero_act_checkColumnConstraints
-
-{<BLOCK Name="fct.dstb00001_status_t_checkColumnConstraints">}
-#+ Check constraints on the "dstb00001.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dstb00001_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE dstb00001.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.dstb00001_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.dstb00001_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "dstb00001.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dstb00001_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE dstb00001.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.dstb00001_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.dstb00001_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "dstb00001.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dstb00001_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE dstb00001.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.dstb00001_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.dstb00001_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "dstb00001.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dstb00001_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE dstb00001.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.dstb00001_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.dstb00001_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "dstb00001.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dstb00001_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE dstb00001.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.dstb00001_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.diatable_checkTableConstraints">}
-#+ Check constraints on the "diatable" table
-#+
-#+ @param p_data - a row data LIKE diatable.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_diatable_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE diatable.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_diatable_dia_checkColumnConstraints(p_data.dia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_diatable_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.diatable_checkTableConstraints
-
-{<BLOCK Name="fct.diatable_dia_checkColumnConstraints">}
-#+ Check constraints on the "diatable.dia" column
-#+
-#+ @param p_dia - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_diatable_dia_checkColumnConstraints(p_dia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_dia LIKE diatable.dia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.diatable_dia_checkColumnConstraints
-
-{<BLOCK Name="fct.diatable_descripcion_checkColumnConstraints">}
-#+ Check constraints on the "diatable.descripcion" column
-#+
-#+ @param p_descripcion - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_diatable_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE diatable.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.diatable_descripcion_checkColumnConstraints
-
-{<BLOCK Name="fct.dgii_rnc3_checkTableConstraints">}
-#+ Check constraints on the "dgii_rnc3" table
-#+
-#+ @param p_data - a row data LIKE dgii_rnc3.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_dgii_rnc3_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE dgii_rnc3.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_dgii_rnc3_column_0_checkColumnConstraints(p_data.column_0) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dgii_rnc3_column_1_checkColumnConstraints(p_data.column_1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dgii_rnc3_column_2_checkColumnConstraints(p_data.column_2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dgii_rnc3_column_3_checkColumnConstraints(p_data.column_3) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dgii_rnc3_column_4_checkColumnConstraints(p_data.column_4) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dgii_rnc3_column_5_checkColumnConstraints(p_data.column_5) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dgii_rnc3_column_6_checkColumnConstraints(p_data.column_6) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dgii_rnc3_column_7_checkColumnConstraints(p_data.column_7) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.dgii_rnc3_checkTableConstraints
-
-{<BLOCK Name="fct.dgii_rnc3_column_0_checkColumnConstraints">}
-#+ Check constraints on the "dgii_rnc3.column_0" column
-#+
-#+ @param p_column_0 - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dgii_rnc3_column_0_checkColumnConstraints(p_column_0)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_column_0 LIKE dgii_rnc3.column_0
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.dgii_rnc3_column_0_checkColumnConstraints
-
-{<BLOCK Name="fct.dgii_rnc3_column_1_checkColumnConstraints">}
-#+ Check constraints on the "dgii_rnc3.column_1" column
-#+
-#+ @param p_column_1 - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dgii_rnc3_column_1_checkColumnConstraints(p_column_1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_column_1 LIKE dgii_rnc3.column_1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.dgii_rnc3_column_1_checkColumnConstraints
-
-{<BLOCK Name="fct.dgii_rnc3_column_2_checkColumnConstraints">}
-#+ Check constraints on the "dgii_rnc3.column_2" column
-#+
-#+ @param p_column_2 - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dgii_rnc3_column_2_checkColumnConstraints(p_column_2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_column_2 LIKE dgii_rnc3.column_2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.dgii_rnc3_column_2_checkColumnConstraints
-
-{<BLOCK Name="fct.dgii_rnc3_column_3_checkColumnConstraints">}
-#+ Check constraints on the "dgii_rnc3.column_3" column
-#+
-#+ @param p_column_3 - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dgii_rnc3_column_3_checkColumnConstraints(p_column_3)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_column_3 LIKE dgii_rnc3.column_3
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.dgii_rnc3_column_3_checkColumnConstraints
-
-{<BLOCK Name="fct.dgii_rnc3_column_4_checkColumnConstraints">}
-#+ Check constraints on the "dgii_rnc3.column_4" column
-#+
-#+ @param p_column_4 - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dgii_rnc3_column_4_checkColumnConstraints(p_column_4)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_column_4 LIKE dgii_rnc3.column_4
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.dgii_rnc3_column_4_checkColumnConstraints
-
-{<BLOCK Name="fct.dgii_rnc3_column_5_checkColumnConstraints">}
-#+ Check constraints on the "dgii_rnc3.column_5" column
-#+
-#+ @param p_column_5 - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dgii_rnc3_column_5_checkColumnConstraints(p_column_5)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_column_5 LIKE dgii_rnc3.column_5
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.dgii_rnc3_column_5_checkColumnConstraints
-
-{<BLOCK Name="fct.dgii_rnc3_column_6_checkColumnConstraints">}
-#+ Check constraints on the "dgii_rnc3.column_6" column
-#+
-#+ @param p_column_6 - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dgii_rnc3_column_6_checkColumnConstraints(p_column_6)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_column_6 LIKE dgii_rnc3.column_6
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.dgii_rnc3_column_6_checkColumnConstraints
-
-{<BLOCK Name="fct.dgii_rnc3_column_7_checkColumnConstraints">}
-#+ Check constraints on the "dgii_rnc3.column_7" column
-#+
-#+ @param p_column_7 - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dgii_rnc3_column_7_checkColumnConstraints(p_column_7)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_column_7 LIKE dgii_rnc3.column_7
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.dgii_rnc3_column_7_checkColumnConstraints
-
-{<BLOCK Name="fct.dgii_rnc_checkTableConstraints">}
-#+ Check constraints on the "dgii_rnc" table
-#+
-#+ @param p_data - a row data LIKE dgii_rnc.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_dgii_rnc_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE dgii_rnc.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_dgii_rnc_rnc_checkColumnConstraints(p_data.rnc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dgii_rnc_column1_checkColumnConstraints(p_data.column1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dgii_rnc_column2_checkColumnConstraints(p_data.column2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dgii_rnc_column3_checkColumnConstraints(p_data.column3) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dgii_rnc_column4_checkColumnConstraints(p_data.column4) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dgii_rnc_column5_checkColumnConstraints(p_data.column5) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dgii_rnc_column6_checkColumnConstraints(p_data.column6) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dgii_rnc_column7_checkColumnConstraints(p_data.column7) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dgii_rnc_column8_checkColumnConstraints(p_data.column8) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dgii_rnc_column9_checkColumnConstraints(p_data.column9) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dgii_rnc_column10_checkColumnConstraints(p_data.column10) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dgii_rnc_column11_checkColumnConstraints(p_data.column11) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.dgii_rnc_checkTableConstraints
-
-{<BLOCK Name="fct.dgii_rnc_rnc_checkColumnConstraints">}
-#+ Check constraints on the "dgii_rnc.rnc" column
-#+
-#+ @param p_rnc - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dgii_rnc_rnc_checkColumnConstraints(p_rnc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_rnc LIKE dgii_rnc.rnc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.dgii_rnc_rnc_checkColumnConstraints
-
-{<BLOCK Name="fct.dgii_rnc_column1_checkColumnConstraints">}
-#+ Check constraints on the "dgii_rnc.column1" column
-#+
-#+ @param p_column1 - TEXT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dgii_rnc_column1_checkColumnConstraints(p_column1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_column1 LIKE dgii_rnc.column1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.dgii_rnc_column1_checkColumnConstraints
-
-{<BLOCK Name="fct.dgii_rnc_column2_checkColumnConstraints">}
-#+ Check constraints on the "dgii_rnc.column2" column
-#+
-#+ @param p_column2 - VARCHAR2(255) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dgii_rnc_column2_checkColumnConstraints(p_column2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_column2 LIKE dgii_rnc.column2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.dgii_rnc_column2_checkColumnConstraints
-
-{<BLOCK Name="fct.dgii_rnc_column3_checkColumnConstraints">}
-#+ Check constraints on the "dgii_rnc.column3" column
-#+
-#+ @param p_column3 - VARCHAR2(255) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dgii_rnc_column3_checkColumnConstraints(p_column3)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_column3 LIKE dgii_rnc.column3
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.dgii_rnc_column3_checkColumnConstraints
-
-{<BLOCK Name="fct.dgii_rnc_column4_checkColumnConstraints">}
-#+ Check constraints on the "dgii_rnc.column4" column
-#+
-#+ @param p_column4 - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dgii_rnc_column4_checkColumnConstraints(p_column4)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_column4 LIKE dgii_rnc.column4
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.dgii_rnc_column4_checkColumnConstraints
-
-{<BLOCK Name="fct.dgii_rnc_column5_checkColumnConstraints">}
-#+ Check constraints on the "dgii_rnc.column5" column
-#+
-#+ @param p_column5 - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dgii_rnc_column5_checkColumnConstraints(p_column5)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_column5 LIKE dgii_rnc.column5
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.dgii_rnc_column5_checkColumnConstraints
-
-{<BLOCK Name="fct.dgii_rnc_column6_checkColumnConstraints">}
-#+ Check constraints on the "dgii_rnc.column6" column
-#+
-#+ @param p_column6 - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dgii_rnc_column6_checkColumnConstraints(p_column6)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_column6 LIKE dgii_rnc.column6
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.dgii_rnc_column6_checkColumnConstraints
-
-{<BLOCK Name="fct.dgii_rnc_column7_checkColumnConstraints">}
-#+ Check constraints on the "dgii_rnc.column7" column
-#+
-#+ @param p_column7 - VARCHAR2(255) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dgii_rnc_column7_checkColumnConstraints(p_column7)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_column7 LIKE dgii_rnc.column7
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.dgii_rnc_column7_checkColumnConstraints
-
-{<BLOCK Name="fct.dgii_rnc_column8_checkColumnConstraints">}
-#+ Check constraints on the "dgii_rnc.column8" column
-#+
-#+ @param p_column8 - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dgii_rnc_column8_checkColumnConstraints(p_column8)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_column8 LIKE dgii_rnc.column8
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.dgii_rnc_column8_checkColumnConstraints
-
-{<BLOCK Name="fct.dgii_rnc_column9_checkColumnConstraints">}
-#+ Check constraints on the "dgii_rnc.column9" column
-#+
-#+ @param p_column9 - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dgii_rnc_column9_checkColumnConstraints(p_column9)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_column9 LIKE dgii_rnc.column9
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.dgii_rnc_column9_checkColumnConstraints
-
-{<BLOCK Name="fct.dgii_rnc_column10_checkColumnConstraints">}
-#+ Check constraints on the "dgii_rnc.column10" column
-#+
-#+ @param p_column10 - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dgii_rnc_column10_checkColumnConstraints(p_column10)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_column10 LIKE dgii_rnc.column10
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.dgii_rnc_column10_checkColumnConstraints
-
-{<BLOCK Name="fct.dgii_rnc_column11_checkColumnConstraints">}
-#+ Check constraints on the "dgii_rnc.column11" column
-#+
-#+ @param p_column11 - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dgii_rnc_column11_checkColumnConstraints(p_column11)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_column11 LIKE dgii_rnc.column11
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.dgii_rnc_column11_checkColumnConstraints
-
-{<BLOCK Name="fct.dbocodigos20_checkTableConstraints">}
-#+ Check constraints on the "dbocodigos20" table
-#+
-#+ @param p_data - a row data LIKE dbocodigos20.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_dbocodigos20_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE dbocodigos20.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_dbocodigos20_f1_checkColumnConstraints(p_data.f1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dbocodigos20_f2_checkColumnConstraints(p_data.f2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dbocodigos20_f3_checkColumnConstraints(p_data.f3) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_dbocodigos20_f4_checkColumnConstraints(p_data.f4) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.dbocodigos20_checkTableConstraints
-
-{<BLOCK Name="fct.dbocodigos20_f1_checkColumnConstraints">}
-#+ Check constraints on the "dbocodigos20.f1" column
-#+
-#+ @param p_f1 - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dbocodigos20_f1_checkColumnConstraints(p_f1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_f1 LIKE dbocodigos20.f1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.dbocodigos20_f1_checkColumnConstraints
-
-{<BLOCK Name="fct.dbocodigos20_f2_checkColumnConstraints">}
-#+ Check constraints on the "dbocodigos20.f2" column
-#+
-#+ @param p_f2 - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dbocodigos20_f2_checkColumnConstraints(p_f2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_f2 LIKE dbocodigos20.f2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.dbocodigos20_f2_checkColumnConstraints
-
-{<BLOCK Name="fct.dbocodigos20_f3_checkColumnConstraints">}
-#+ Check constraints on the "dbocodigos20.f3" column
-#+
-#+ @param p_f3 - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dbocodigos20_f3_checkColumnConstraints(p_f3)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_f3 LIKE dbocodigos20.f3
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.dbocodigos20_f3_checkColumnConstraints
-
-{<BLOCK Name="fct.dbocodigos20_f4_checkColumnConstraints">}
-#+ Check constraints on the "dbocodigos20.f4" column
-#+
-#+ @param p_f4 - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_dbocodigos20_f4_checkColumnConstraints(p_f4)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_f4 LIKE dbocodigos20.f4
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.dbocodigos20_f4_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb000log2_checkTableConstraints">}
-#+ Check constraints on the "cttb000log2" table
-#+
-#+ @param p_data - a row data LIKE cttb000log2.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb000log2_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cttb000log2.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cttb000log2_fecha_lq_checkColumnConstraints(p_data.fecha_lq) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb000log2_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb000log2_tipo_lq_checkColumnConstraints(p_data.tipo_lq) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb000log2_num_oc_checkColumnConstraints(p_data.num_oc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb000log2_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb000log2_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb000log2_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb000log2_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb000log2_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb000log2_costo_lq_checkColumnConstraints(p_data.costo_lq) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb000log2_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb000log2_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb000log2_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb000log2_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb000log2_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb000log2_tipo_orden_checkColumnConstraints(p_data.tipo_orden) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb000log2_programa_checkColumnConstraints(p_data.programa) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb000log2_checkTableConstraints
-
-{<BLOCK Name="fct.cttb000log2_fecha_lq_checkColumnConstraints">}
-#+ Check constraints on the "cttb000log2.fecha_lq" column
-#+
-#+ @param p_fecha_lq - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb000log2_fecha_lq_checkColumnConstraints(p_fecha_lq)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_lq LIKE cttb000log2.fecha_lq
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb000log2_fecha_lq_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb000log2_fecha_checkColumnConstraints">}
-#+ Check constraints on the "cttb000log2.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb000log2_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE cttb000log2.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb000log2_fecha_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb000log2_tipo_lq_checkColumnConstraints">}
-#+ Check constraints on the "cttb000log2.tipo_lq" column
-#+
-#+ @param p_tipo_lq - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb000log2_tipo_lq_checkColumnConstraints(p_tipo_lq)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_lq LIKE cttb000log2.tipo_lq
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb000log2_tipo_lq_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb000log2_num_oc_checkColumnConstraints">}
-#+ Check constraints on the "cttb000log2.num_oc" column
-#+
-#+ @param p_num_oc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb000log2_num_oc_checkColumnConstraints(p_num_oc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_oc LIKE cttb000log2.num_oc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb000log2_num_oc_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb000log2_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "cttb000log2.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb000log2_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE cttb000log2.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb000log2_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb000log2_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "cttb000log2.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb000log2_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE cttb000log2.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb000log2_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb000log2_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "cttb000log2.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb000log2_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE cttb000log2.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb000log2_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb000log2_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "cttb000log2.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb000log2_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE cttb000log2.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb000log2_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb000log2_cantidad_checkColumnConstraints">}
-#+ Check constraints on the "cttb000log2.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb000log2_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE cttb000log2.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb000log2_cantidad_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb000log2_costo_lq_checkColumnConstraints">}
-#+ Check constraints on the "cttb000log2.costo_lq" column
-#+
-#+ @param p_costo_lq - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb000log2_costo_lq_checkColumnConstraints(p_costo_lq)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_costo_lq LIKE cttb000log2.costo_lq
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb000log2_costo_lq_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb000log2_status_t_checkColumnConstraints">}
-#+ Check constraints on the "cttb000log2.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb000log2_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cttb000log2.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb000log2_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb000log2_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "cttb000log2.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb000log2_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cttb000log2.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb000log2_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb000log2_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "cttb000log2.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb000log2_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cttb000log2.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb000log2_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb000log2_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "cttb000log2.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb000log2_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cttb000log2.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb000log2_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb000log2_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "cttb000log2.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb000log2_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cttb000log2.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb000log2_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb000log2_tipo_orden_checkColumnConstraints">}
-#+ Check constraints on the "cttb000log2.tipo_orden" column
-#+
-#+ @param p_tipo_orden - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb000log2_tipo_orden_checkColumnConstraints(p_tipo_orden)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_orden LIKE cttb000log2.tipo_orden
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb000log2_tipo_orden_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb000log2_programa_checkColumnConstraints">}
-#+ Check constraints on the "cttb000log2.programa" column
-#+
-#+ @param p_programa - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb000log2_programa_checkColumnConstraints(p_programa)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_programa LIKE cttb000log2.programa
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb000log2_programa_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb000log1_checkTableConstraints">}
-#+ Check constraints on the "cttb000log1" table
-#+
-#+ @param p_data - a row data LIKE cttb000log1.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb000log1_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cttb000log1.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cttb000log1_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb000log1_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb000log1_programa_checkColumnConstraints(p_data.programa) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb000log1_estado_checkColumnConstraints(p_data.estado) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb000log1_checkTableConstraints
-
-{<BLOCK Name="fct.cttb000log1_fecha_checkColumnConstraints">}
-#+ Check constraints on the "cttb000log1.fecha" column
-#+
-#+ @param p_fecha - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb000log1_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE cttb000log1.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb000log1_fecha_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb000log1_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "cttb000log1.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb000log1_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cttb000log1.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb000log1_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb000log1_programa_checkColumnConstraints">}
-#+ Check constraints on the "cttb000log1.programa" column
-#+
-#+ @param p_programa - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb000log1_programa_checkColumnConstraints(p_programa)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_programa LIKE cttb000log1.programa
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb000log1_programa_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb000log1_estado_checkColumnConstraints">}
-#+ Check constraints on the "cttb000log1.estado" column
-#+
-#+ @param p_estado - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb000log1_estado_checkColumnConstraints(p_estado)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_estado LIKE cttb000log1.estado
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb000log1_estado_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00042_checkTableConstraints">}
-#+ Check constraints on the "cttb00042" table
-#+
-#+ @param p_data - a row data LIKE cttb00042.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00042_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cttb00042.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cttb00042_num_doc_checkColumnConstraints(p_data.num_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00042_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00042_departamento_checkColumnConstraints(p_data.departamento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00042_observacion_checkColumnConstraints(p_data.observacion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00042_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00042_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00042_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00042_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00042_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00042_checkTableConstraints
-
-{<BLOCK Name="fct.cttb00042_num_doc_checkColumnConstraints">}
-#+ Check constraints on the "cttb00042.num_doc" column
-#+
-#+ @param p_num_doc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00042_num_doc_checkColumnConstraints(p_num_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_doc LIKE cttb00042.num_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00042_num_doc_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00042_fecha_checkColumnConstraints">}
-#+ Check constraints on the "cttb00042.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00042_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE cttb00042.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00042_fecha_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00042_departamento_checkColumnConstraints">}
-#+ Check constraints on the "cttb00042.departamento" column
-#+
-#+ @param p_departamento - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00042_departamento_checkColumnConstraints(p_departamento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_departamento LIKE cttb00042.departamento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00042_departamento_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00042_observacion_checkColumnConstraints">}
-#+ Check constraints on the "cttb00042.observacion" column
-#+
-#+ @param p_observacion - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00042_observacion_checkColumnConstraints(p_observacion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_observacion LIKE cttb00042.observacion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00042_observacion_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00042_status_t_checkColumnConstraints">}
-#+ Check constraints on the "cttb00042.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00042_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cttb00042.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00042_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00042_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "cttb00042.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00042_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cttb00042.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00042_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00042_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "cttb00042.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00042_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cttb00042.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00042_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00042_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "cttb00042.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00042_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cttb00042.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00042_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00042_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "cttb00042.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00042_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cttb00042.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00042_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00041_checkTableConstraints">}
-#+ Check constraints on the "cttb00041" table
-#+
-#+ @param p_data - a row data LIKE cttb00041.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00041_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cttb00041.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cttb00041_cod_prod_checkColumnConstraints(p_data.cod_prod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00041_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00041_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00041_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00041_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00041_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00041_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00041_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00041_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00041_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00041_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00041_checkTableConstraints
-
-{<BLOCK Name="fct.cttb00041_cod_prod_checkColumnConstraints">}
-#+ Check constraints on the "cttb00041.cod_prod" column
-#+
-#+ @param p_cod_prod - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00041_cod_prod_checkColumnConstraints(p_cod_prod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_prod LIKE cttb00041.cod_prod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00041_cod_prod_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00041_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "cttb00041.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00041_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE cttb00041.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00041_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00041_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "cttb00041.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00041_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE cttb00041.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00041_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00041_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "cttb00041.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00041_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE cttb00041.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00041_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00041_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "cttb00041.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00041_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE cttb00041.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00041_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00041_cantidad_checkColumnConstraints">}
-#+ Check constraints on the "cttb00041.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(10,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00041_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE cttb00041.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00041_cantidad_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00041_status_t_checkColumnConstraints">}
-#+ Check constraints on the "cttb00041.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00041_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cttb00041.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00041_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00041_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "cttb00041.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00041_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cttb00041.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00041_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00041_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "cttb00041.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00041_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cttb00041.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00041_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00041_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "cttb00041.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00041_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cttb00041.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00041_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00041_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "cttb00041.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00041_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cttb00041.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00041_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00039_checkTableConstraints">}
-#+ Check constraints on the "cttb00039" table
-#+
-#+ @param p_data - a row data LIKE cttb00039.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00039_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cttb00039.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cttb00039_ano_checkColumnConstraints(p_data.ano) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00039_mes_checkColumnConstraints(p_data.mes) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00039_valor_checkColumnConstraints(p_data.valor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00039_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00039_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00039_checkTableConstraints
-
-{<BLOCK Name="fct.cttb00039_ano_checkColumnConstraints">}
-#+ Check constraints on the "cttb00039.ano" column
-#+
-#+ @param p_ano - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00039_ano_checkColumnConstraints(p_ano)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ano LIKE cttb00039.ano
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00039_ano_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00039_mes_checkColumnConstraints">}
-#+ Check constraints on the "cttb00039.mes" column
-#+
-#+ @param p_mes - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00039_mes_checkColumnConstraints(p_mes)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mes LIKE cttb00039.mes
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00039_mes_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00039_valor_checkColumnConstraints">}
-#+ Check constraints on the "cttb00039.valor" column
-#+
-#+ @param p_valor - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00039_valor_checkColumnConstraints(p_valor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valor LIKE cttb00039.valor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00039_valor_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00039_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "cttb00039.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00039_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cttb00039.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00039_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00039_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "cttb00039.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00039_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cttb00039.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00039_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00038_checkTableConstraints">}
-#+ Check constraints on the "cttb00038" table
-#+
-#+ @param p_data - a row data LIKE cttb00038.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00038_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cttb00038.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cttb00038_ventas_checkColumnConstraints(p_data.ventas) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00038_nomenclatura_checkColumnConstraints(p_data.nomenclatura) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00038_ano_checkColumnConstraints(p_data.ano) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00038_mes_checkColumnConstraints(p_data.mes) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00038_costo_st_checkColumnConstraints(p_data.costo_st) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00038_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00038_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00038_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00038_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00038_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00038_checkTableConstraints
-
-{<BLOCK Name="fct.cttb00038_ventas_checkColumnConstraints">}
-#+ Check constraints on the "cttb00038.ventas" column
-#+
-#+ @param p_ventas - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00038_ventas_checkColumnConstraints(p_ventas)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ventas LIKE cttb00038.ventas
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_ventas IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- ventas: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00038_ventas_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00038_nomenclatura_checkColumnConstraints">}
-#+ Check constraints on the "cttb00038.nomenclatura" column
-#+
-#+ @param p_nomenclatura - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00038_nomenclatura_checkColumnConstraints(p_nomenclatura)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nomenclatura LIKE cttb00038.nomenclatura
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_nomenclatura IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- nomenclatura: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00038_nomenclatura_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00038_ano_checkColumnConstraints">}
-#+ Check constraints on the "cttb00038.ano" column
-#+
-#+ @param p_ano - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00038_ano_checkColumnConstraints(p_ano)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ano LIKE cttb00038.ano
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_ano IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- ano: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00038_ano_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00038_mes_checkColumnConstraints">}
-#+ Check constraints on the "cttb00038.mes" column
-#+
-#+ @param p_mes - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00038_mes_checkColumnConstraints(p_mes)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mes LIKE cttb00038.mes
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_mes IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- mes: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00038_mes_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00038_costo_st_checkColumnConstraints">}
-#+ Check constraints on the "cttb00038.costo_st" column
-#+
-#+ @param p_costo_st - DECIMAL(12,7) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00038_costo_st_checkColumnConstraints(p_costo_st)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_costo_st LIKE cttb00038.costo_st
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_costo_st IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- costo_st: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00038_costo_st_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00038_status_t_checkColumnConstraints">}
-#+ Check constraints on the "cttb00038.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00038_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cttb00038.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00038_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00038_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "cttb00038.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00038_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cttb00038.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00038_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00038_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "cttb00038.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00038_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cttb00038.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00038_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00038_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "cttb00038.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00038_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cttb00038.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00038_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00038_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "cttb00038.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00038_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cttb00038.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00038_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00036_checkTableConstraints">}
-#+ Check constraints on the "cttb00036" table
-#+
-#+ @param p_data - a row data LIKE cttb00036.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00036_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cttb00036.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cttb00036_ventas_checkColumnConstraints(p_data.ventas) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00036_fecha_lq_checkColumnConstraints(p_data.fecha_lq) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00036_num_oc_checkColumnConstraints(p_data.num_oc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00036_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00036_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00036_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00036_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00036_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00036_costo_lq_checkColumnConstraints(p_data.costo_lq) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00036_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00036_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00036_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00036_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00036_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00036_checkTableConstraints
-
-{<BLOCK Name="fct.cttb00036_ventas_checkColumnConstraints">}
-#+ Check constraints on the "cttb00036.ventas" column
-#+
-#+ @param p_ventas - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00036_ventas_checkColumnConstraints(p_ventas)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ventas LIKE cttb00036.ventas
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00036_ventas_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00036_fecha_lq_checkColumnConstraints">}
-#+ Check constraints on the "cttb00036.fecha_lq" column
-#+
-#+ @param p_fecha_lq - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00036_fecha_lq_checkColumnConstraints(p_fecha_lq)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_lq LIKE cttb00036.fecha_lq
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00036_fecha_lq_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00036_num_oc_checkColumnConstraints">}
-#+ Check constraints on the "cttb00036.num_oc" column
-#+
-#+ @param p_num_oc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00036_num_oc_checkColumnConstraints(p_num_oc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_oc LIKE cttb00036.num_oc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00036_num_oc_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00036_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "cttb00036.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00036_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE cttb00036.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00036_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00036_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "cttb00036.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00036_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE cttb00036.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00036_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00036_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "cttb00036.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00036_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE cttb00036.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00036_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00036_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "cttb00036.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00036_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE cttb00036.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00036_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00036_cantidad_checkColumnConstraints">}
-#+ Check constraints on the "cttb00036.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00036_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE cttb00036.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00036_cantidad_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00036_costo_lq_checkColumnConstraints">}
-#+ Check constraints on the "cttb00036.costo_lq" column
-#+
-#+ @param p_costo_lq - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00036_costo_lq_checkColumnConstraints(p_costo_lq)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_costo_lq LIKE cttb00036.costo_lq
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00036_costo_lq_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00036_status_t_checkColumnConstraints">}
-#+ Check constraints on the "cttb00036.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00036_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cttb00036.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00036_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00036_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "cttb00036.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00036_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cttb00036.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00036_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00036_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "cttb00036.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00036_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cttb00036.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00036_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00036_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "cttb00036.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00036_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cttb00036.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00036_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00036_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "cttb00036.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00036_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cttb00036.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00036_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00034_checkTableConstraints">}
-#+ Check constraints on the "cttb00034" table
-#+
-#+ @param p_data - a row data LIKE cttb00034.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00034_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cttb00034.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cttb00034_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00034_cod_prod_checkColumnConstraints(p_data.cod_prod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00034_costo_lab_checkColumnConstraints(p_data.costo_lab) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00034_costo_ga_checkColumnConstraints(p_data.costo_ga) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00034_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00034_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00034_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00034_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00034_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00034_checkTableConstraints
-
-{<BLOCK Name="fct.cttb00034_fecha_checkColumnConstraints">}
-#+ Check constraints on the "cttb00034.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00034_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE cttb00034.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00034_fecha_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00034_cod_prod_checkColumnConstraints">}
-#+ Check constraints on the "cttb00034.cod_prod" column
-#+
-#+ @param p_cod_prod - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00034_cod_prod_checkColumnConstraints(p_cod_prod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_prod LIKE cttb00034.cod_prod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00034_cod_prod_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00034_costo_lab_checkColumnConstraints">}
-#+ Check constraints on the "cttb00034.costo_lab" column
-#+
-#+ @param p_costo_lab - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00034_costo_lab_checkColumnConstraints(p_costo_lab)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_costo_lab LIKE cttb00034.costo_lab
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00034_costo_lab_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00034_costo_ga_checkColumnConstraints">}
-#+ Check constraints on the "cttb00034.costo_ga" column
-#+
-#+ @param p_costo_ga - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00034_costo_ga_checkColumnConstraints(p_costo_ga)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_costo_ga LIKE cttb00034.costo_ga
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00034_costo_ga_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00034_status_t_checkColumnConstraints">}
-#+ Check constraints on the "cttb00034.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00034_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cttb00034.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00034_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00034_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "cttb00034.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00034_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cttb00034.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00034_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00034_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "cttb00034.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00034_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cttb00034.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00034_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00034_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "cttb00034.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00034_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cttb00034.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00034_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00034_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "cttb00034.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00034_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cttb00034.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00034_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00033_checkTableConstraints">}
-#+ Check constraints on the "cttb00033" table
-#+
-#+ @param p_data - a row data LIKE cttb00033.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00033_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cttb00033.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cttb00033_cuenta_m_checkColumnConstraints(p_data.cuenta_m) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00033_cuenta_l_checkColumnConstraints(p_data.cuenta_l) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00033_cuenta_g_checkColumnConstraints(p_data.cuenta_g) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00033_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00033_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00033_checkTableConstraints
-
-{<BLOCK Name="fct.cttb00033_cuenta_m_checkColumnConstraints">}
-#+ Check constraints on the "cttb00033.cuenta_m" column
-#+
-#+ @param p_cuenta_m - CHAR(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00033_cuenta_m_checkColumnConstraints(p_cuenta_m)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cuenta_m LIKE cttb00033.cuenta_m
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00033_cuenta_m_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00033_cuenta_l_checkColumnConstraints">}
-#+ Check constraints on the "cttb00033.cuenta_l" column
-#+
-#+ @param p_cuenta_l - CHAR(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00033_cuenta_l_checkColumnConstraints(p_cuenta_l)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cuenta_l LIKE cttb00033.cuenta_l
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00033_cuenta_l_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00033_cuenta_g_checkColumnConstraints">}
-#+ Check constraints on the "cttb00033.cuenta_g" column
-#+
-#+ @param p_cuenta_g - CHAR(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00033_cuenta_g_checkColumnConstraints(p_cuenta_g)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cuenta_g LIKE cttb00033.cuenta_g
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00033_cuenta_g_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00033_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "cttb00033.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00033_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cttb00033.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00033_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00033_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "cttb00033.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00033_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cttb00033.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00033_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00032_checkTableConstraints">}
-#+ Check constraints on the "cttb00032" table
-#+
-#+ @param p_data - a row data LIKE cttb00032.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00032_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cttb00032.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cttb00032_ano_checkColumnConstraints(p_data.ano) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00032_mes_checkColumnConstraints(p_data.mes) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00032_tipo_lq_checkColumnConstraints(p_data.tipo_lq) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00032_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00032_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00032_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00032_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00032_cod_sp_checkColumnConstraints(p_data.cod_sp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00032_cod_sp_sec_checkColumnConstraints(p_data.cod_sp_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00032_reporte_ent_checkColumnConstraints(p_data.reporte_ent) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00032_num_oc_checkColumnConstraints(p_data.num_oc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00032_tipo_checkColumnConstraints(p_data.tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00032_fob_checkColumnConstraints(p_data.fob) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00032_flete_checkColumnConstraints(p_data.flete) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00032_cost_flete_checkColumnConstraints(p_data.cost_flete) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00032_seguro_checkColumnConstraints(p_data.seguro) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00032_impuesto_c_checkColumnConstraints(p_data.impuesto_c) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00032_gasto_ad_checkColumnConstraints(p_data.gasto_ad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00032_prima_d_checkColumnConstraints(p_data.prima_d) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00032_cost_planta_checkColumnConstraints(p_data.cost_planta) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00032_unid_rec_checkColumnConstraints(p_data.unid_rec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00032_cost_uni_checkColumnConstraints(p_data.cost_uni) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00032_precio_std_checkColumnConstraints(p_data.precio_std) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00032_cost_std_checkColumnConstraints(p_data.cost_std) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00032_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00032_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00032_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00032_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00032_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00032_checkTableConstraints
-
-{<BLOCK Name="fct.cttb00032_ano_checkColumnConstraints">}
-#+ Check constraints on the "cttb00032.ano" column
-#+
-#+ @param p_ano - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00032_ano_checkColumnConstraints(p_ano)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ano LIKE cttb00032.ano
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00032_ano_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00032_mes_checkColumnConstraints">}
-#+ Check constraints on the "cttb00032.mes" column
-#+
-#+ @param p_mes - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00032_mes_checkColumnConstraints(p_mes)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mes LIKE cttb00032.mes
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_mes IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- mes: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00032_mes_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00032_tipo_lq_checkColumnConstraints">}
-#+ Check constraints on the "cttb00032.tipo_lq" column
-#+
-#+ @param p_tipo_lq - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00032_tipo_lq_checkColumnConstraints(p_tipo_lq)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_lq LIKE cttb00032.tipo_lq
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00032_tipo_lq_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00032_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "cttb00032.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00032_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE cttb00032.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00032_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00032_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "cttb00032.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00032_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE cttb00032.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00032_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00032_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "cttb00032.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00032_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE cttb00032.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00032_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00032_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "cttb00032.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00032_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE cttb00032.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00032_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00032_cod_sp_checkColumnConstraints">}
-#+ Check constraints on the "cttb00032.cod_sp" column
-#+
-#+ @param p_cod_sp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00032_cod_sp_checkColumnConstraints(p_cod_sp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sp LIKE cttb00032.cod_sp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00032_cod_sp_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00032_cod_sp_sec_checkColumnConstraints">}
-#+ Check constraints on the "cttb00032.cod_sp_sec" column
-#+
-#+ @param p_cod_sp_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00032_cod_sp_sec_checkColumnConstraints(p_cod_sp_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sp_sec LIKE cttb00032.cod_sp_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00032_cod_sp_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00032_reporte_ent_checkColumnConstraints">}
-#+ Check constraints on the "cttb00032.reporte_ent" column
-#+
-#+ @param p_reporte_ent - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00032_reporte_ent_checkColumnConstraints(p_reporte_ent)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_reporte_ent LIKE cttb00032.reporte_ent
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00032_reporte_ent_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00032_num_oc_checkColumnConstraints">}
-#+ Check constraints on the "cttb00032.num_oc" column
-#+
-#+ @param p_num_oc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00032_num_oc_checkColumnConstraints(p_num_oc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_oc LIKE cttb00032.num_oc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00032_num_oc_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00032_tipo_checkColumnConstraints">}
-#+ Check constraints on the "cttb00032.tipo" column
-#+
-#+ @param p_tipo - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00032_tipo_checkColumnConstraints(p_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo LIKE cttb00032.tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00032_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00032_fob_checkColumnConstraints">}
-#+ Check constraints on the "cttb00032.fob" column
-#+
-#+ @param p_fob - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00032_fob_checkColumnConstraints(p_fob)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fob LIKE cttb00032.fob
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00032_fob_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00032_flete_checkColumnConstraints">}
-#+ Check constraints on the "cttb00032.flete" column
-#+
-#+ @param p_flete - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00032_flete_checkColumnConstraints(p_flete)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_flete LIKE cttb00032.flete
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00032_flete_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00032_cost_flete_checkColumnConstraints">}
-#+ Check constraints on the "cttb00032.cost_flete" column
-#+
-#+ @param p_cost_flete - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00032_cost_flete_checkColumnConstraints(p_cost_flete)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cost_flete LIKE cttb00032.cost_flete
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00032_cost_flete_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00032_seguro_checkColumnConstraints">}
-#+ Check constraints on the "cttb00032.seguro" column
-#+
-#+ @param p_seguro - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00032_seguro_checkColumnConstraints(p_seguro)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_seguro LIKE cttb00032.seguro
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00032_seguro_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00032_impuesto_c_checkColumnConstraints">}
-#+ Check constraints on the "cttb00032.impuesto_c" column
-#+
-#+ @param p_impuesto_c - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00032_impuesto_c_checkColumnConstraints(p_impuesto_c)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_impuesto_c LIKE cttb00032.impuesto_c
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00032_impuesto_c_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00032_gasto_ad_checkColumnConstraints">}
-#+ Check constraints on the "cttb00032.gasto_ad" column
-#+
-#+ @param p_gasto_ad - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00032_gasto_ad_checkColumnConstraints(p_gasto_ad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_gasto_ad LIKE cttb00032.gasto_ad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00032_gasto_ad_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00032_prima_d_checkColumnConstraints">}
-#+ Check constraints on the "cttb00032.prima_d" column
-#+
-#+ @param p_prima_d - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00032_prima_d_checkColumnConstraints(p_prima_d)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_prima_d LIKE cttb00032.prima_d
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00032_prima_d_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00032_cost_planta_checkColumnConstraints">}
-#+ Check constraints on the "cttb00032.cost_planta" column
-#+
-#+ @param p_cost_planta - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00032_cost_planta_checkColumnConstraints(p_cost_planta)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cost_planta LIKE cttb00032.cost_planta
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00032_cost_planta_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00032_unid_rec_checkColumnConstraints">}
-#+ Check constraints on the "cttb00032.unid_rec" column
-#+
-#+ @param p_unid_rec - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00032_unid_rec_checkColumnConstraints(p_unid_rec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_unid_rec LIKE cttb00032.unid_rec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00032_unid_rec_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00032_cost_uni_checkColumnConstraints">}
-#+ Check constraints on the "cttb00032.cost_uni" column
-#+
-#+ @param p_cost_uni - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00032_cost_uni_checkColumnConstraints(p_cost_uni)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cost_uni LIKE cttb00032.cost_uni
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00032_cost_uni_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00032_precio_std_checkColumnConstraints">}
-#+ Check constraints on the "cttb00032.precio_std" column
-#+
-#+ @param p_precio_std - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00032_precio_std_checkColumnConstraints(p_precio_std)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_precio_std LIKE cttb00032.precio_std
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00032_precio_std_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00032_cost_std_checkColumnConstraints">}
-#+ Check constraints on the "cttb00032.cost_std" column
-#+
-#+ @param p_cost_std - DECIMAL(12,3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00032_cost_std_checkColumnConstraints(p_cost_std)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cost_std LIKE cttb00032.cost_std
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00032_cost_std_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00032_status_t_checkColumnConstraints">}
-#+ Check constraints on the "cttb00032.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00032_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cttb00032.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00032_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00032_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "cttb00032.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00032_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cttb00032.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00032_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00032_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "cttb00032.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00032_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cttb00032.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00032_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00032_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "cttb00032.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00032_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cttb00032.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00032_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00032_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "cttb00032.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00032_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cttb00032.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00032_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00029_checkTableConstraints">}
-#+ Check constraints on the "cttb00029" table
-#+
-#+ @param p_data - a row data LIKE cttb00029.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00029_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cttb00029.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cttb00029_cod_prod_checkColumnConstraints(p_data.cod_prod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00029_ano_checkColumnConstraints(p_data.ano) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00029_departamento_checkColumnConstraints(p_data.departamento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00029_gasto_ind_checkColumnConstraints(p_data.gasto_ind) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00029_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00029_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00029_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00029_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00029_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00029_checkTableConstraints
-
-{<BLOCK Name="fct.cttb00029_cod_prod_checkColumnConstraints">}
-#+ Check constraints on the "cttb00029.cod_prod" column
-#+
-#+ @param p_cod_prod - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00029_cod_prod_checkColumnConstraints(p_cod_prod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_prod LIKE cttb00029.cod_prod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00029_cod_prod_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00029_ano_checkColumnConstraints">}
-#+ Check constraints on the "cttb00029.ano" column
-#+
-#+ @param p_ano - CHAR(4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00029_ano_checkColumnConstraints(p_ano)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ano LIKE cttb00029.ano
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00029_ano_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00029_departamento_checkColumnConstraints">}
-#+ Check constraints on the "cttb00029.departamento" column
-#+
-#+ @param p_departamento - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00029_departamento_checkColumnConstraints(p_departamento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_departamento LIKE cttb00029.departamento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00029_departamento_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00029_gasto_ind_checkColumnConstraints">}
-#+ Check constraints on the "cttb00029.gasto_ind" column
-#+
-#+ @param p_gasto_ind - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00029_gasto_ind_checkColumnConstraints(p_gasto_ind)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_gasto_ind LIKE cttb00029.gasto_ind
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00029_gasto_ind_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00029_status_t_checkColumnConstraints">}
-#+ Check constraints on the "cttb00029.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00029_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cttb00029.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00029_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00029_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "cttb00029.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00029_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cttb00029.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00029_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00029_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "cttb00029.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00029_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cttb00029.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00029_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00029_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "cttb00029.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00029_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cttb00029.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00029_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00029_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "cttb00029.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00029_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cttb00029.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00029_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00028_checkTableConstraints">}
-#+ Check constraints on the "cttb00028" table
-#+
-#+ @param p_data - a row data LIKE cttb00028.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00028_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cttb00028.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cttb00028_ano_checkColumnConstraints(p_data.ano) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00028_departamento_checkColumnConstraints(p_data.departamento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00028_cod_prod_checkColumnConstraints(p_data.cod_prod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00028_fact_hombre_checkColumnConstraints(p_data.fact_hombre) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00028_valor_labor_checkColumnConstraints(p_data.valor_labor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00028_hora_hombre_checkColumnConstraints(p_data.hora_hombre) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00028_valor_real_checkColumnConstraints(p_data.valor_real) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00028_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00028_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00028_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00028_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00028_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00028_checkTableConstraints
-
-{<BLOCK Name="fct.cttb00028_ano_checkColumnConstraints">}
-#+ Check constraints on the "cttb00028.ano" column
-#+
-#+ @param p_ano - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00028_ano_checkColumnConstraints(p_ano)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ano LIKE cttb00028.ano
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00028_ano_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00028_departamento_checkColumnConstraints">}
-#+ Check constraints on the "cttb00028.departamento" column
-#+
-#+ @param p_departamento - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00028_departamento_checkColumnConstraints(p_departamento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_departamento LIKE cttb00028.departamento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00028_departamento_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00028_cod_prod_checkColumnConstraints">}
-#+ Check constraints on the "cttb00028.cod_prod" column
-#+
-#+ @param p_cod_prod - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00028_cod_prod_checkColumnConstraints(p_cod_prod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_prod LIKE cttb00028.cod_prod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00028_cod_prod_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00028_fact_hombre_checkColumnConstraints">}
-#+ Check constraints on the "cttb00028.fact_hombre" column
-#+
-#+ @param p_fact_hombre - DECIMAL(13,8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00028_fact_hombre_checkColumnConstraints(p_fact_hombre)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fact_hombre LIKE cttb00028.fact_hombre
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00028_fact_hombre_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00028_valor_labor_checkColumnConstraints">}
-#+ Check constraints on the "cttb00028.valor_labor" column
-#+
-#+ @param p_valor_labor - DECIMAL(13,8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00028_valor_labor_checkColumnConstraints(p_valor_labor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valor_labor LIKE cttb00028.valor_labor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00028_valor_labor_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00028_hora_hombre_checkColumnConstraints">}
-#+ Check constraints on the "cttb00028.hora_hombre" column
-#+
-#+ @param p_hora_hombre - DECIMAL(13,8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00028_hora_hombre_checkColumnConstraints(p_hora_hombre)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_hora_hombre LIKE cttb00028.hora_hombre
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00028_hora_hombre_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00028_valor_real_checkColumnConstraints">}
-#+ Check constraints on the "cttb00028.valor_real" column
-#+
-#+ @param p_valor_real - DECIMAL(13,8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00028_valor_real_checkColumnConstraints(p_valor_real)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valor_real LIKE cttb00028.valor_real
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00028_valor_real_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00028_status_t_checkColumnConstraints">}
-#+ Check constraints on the "cttb00028.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00028_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cttb00028.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00028_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00028_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "cttb00028.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00028_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cttb00028.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00028_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00028_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "cttb00028.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00028_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cttb00028.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00028_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00028_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "cttb00028.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00028_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cttb00028.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00028_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00028_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "cttb00028.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00028_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cttb00028.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00028_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00027_checkTableConstraints">}
-#+ Check constraints on the "cttb00027" table
-#+
-#+ @param p_data - a row data LIKE cttb00027.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00027_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cttb00027.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cttb00027_ventas_checkColumnConstraints(p_data.ventas) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00027_mes_checkColumnConstraints(p_data.mes) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00027_pila_checkColumnConstraints(p_data.pila) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00027_primo_checkColumnConstraints(p_data.primo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00027_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00027_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00027_checkTableConstraints
-
-{<BLOCK Name="fct.cttb00027_ventas_checkColumnConstraints">}
-#+ Check constraints on the "cttb00027.ventas" column
-#+
-#+ @param p_ventas - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00027_ventas_checkColumnConstraints(p_ventas)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ventas LIKE cttb00027.ventas
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00027_ventas_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00027_mes_checkColumnConstraints">}
-#+ Check constraints on the "cttb00027.mes" column
-#+
-#+ @param p_mes - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00027_mes_checkColumnConstraints(p_mes)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mes LIKE cttb00027.mes
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00027_mes_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00027_pila_checkColumnConstraints">}
-#+ Check constraints on the "cttb00027.pila" column
-#+
-#+ @param p_pila - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00027_pila_checkColumnConstraints(p_pila)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_pila LIKE cttb00027.pila
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00027_pila_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00027_primo_checkColumnConstraints">}
-#+ Check constraints on the "cttb00027.primo" column
-#+
-#+ @param p_primo - DECIMAL(12,3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00027_primo_checkColumnConstraints(p_primo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_primo LIKE cttb00027.primo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00027_primo_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00027_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "cttb00027.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00027_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cttb00027.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00027_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00027_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "cttb00027.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00027_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cttb00027.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00027_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00026_checkTableConstraints">}
-#+ Check constraints on the "cttb00026" table
-#+
-#+ @param p_data - a row data LIKE cttb00026.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00026_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cttb00026.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cttb00026_mes_ini_checkColumnConstraints(p_data.mes_ini) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00026_mes_fin_checkColumnConstraints(p_data.mes_fin) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00026_ano_checkColumnConstraints(p_data.ano) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00026_cod_prod_checkColumnConstraints(p_data.cod_prod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00026_costo_st_checkColumnConstraints(p_data.costo_st) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00026_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00026_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00026_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00026_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00026_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00026_checkTableConstraints
-
-{<BLOCK Name="fct.cttb00026_mes_ini_checkColumnConstraints">}
-#+ Check constraints on the "cttb00026.mes_ini" column
-#+
-#+ @param p_mes_ini - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00026_mes_ini_checkColumnConstraints(p_mes_ini)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mes_ini LIKE cttb00026.mes_ini
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00026_mes_ini_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00026_mes_fin_checkColumnConstraints">}
-#+ Check constraints on the "cttb00026.mes_fin" column
-#+
-#+ @param p_mes_fin - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00026_mes_fin_checkColumnConstraints(p_mes_fin)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mes_fin LIKE cttb00026.mes_fin
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00026_mes_fin_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00026_ano_checkColumnConstraints">}
-#+ Check constraints on the "cttb00026.ano" column
-#+
-#+ @param p_ano - CHAR(4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00026_ano_checkColumnConstraints(p_ano)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ano LIKE cttb00026.ano
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00026_ano_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00026_cod_prod_checkColumnConstraints">}
-#+ Check constraints on the "cttb00026.cod_prod" column
-#+
-#+ @param p_cod_prod - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00026_cod_prod_checkColumnConstraints(p_cod_prod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_prod LIKE cttb00026.cod_prod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00026_cod_prod_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00026_costo_st_checkColumnConstraints">}
-#+ Check constraints on the "cttb00026.costo_st" column
-#+
-#+ @param p_costo_st - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00026_costo_st_checkColumnConstraints(p_costo_st)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_costo_st LIKE cttb00026.costo_st
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00026_costo_st_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00026_status_t_checkColumnConstraints">}
-#+ Check constraints on the "cttb00026.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00026_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cttb00026.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00026_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00026_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "cttb00026.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00026_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cttb00026.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00026_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00026_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "cttb00026.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00026_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cttb00026.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00026_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00026_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "cttb00026.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00026_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cttb00026.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00026_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00026_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "cttb00026.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00026_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cttb00026.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00026_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00023_checkTableConstraints">}
-#+ Check constraints on the "cttb00023" table
-#+
-#+ @param p_data - a row data LIKE cttb00023.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00023_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cttb00023.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cttb00023_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00023_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00023_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00023_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00023_costo_imp_checkColumnConstraints(p_data.costo_imp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00023_costo_s_imp_checkColumnConstraints(p_data.costo_s_imp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00023_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00023_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00023_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00023_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00023_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00023_checkTableConstraints
-
-{<BLOCK Name="fct.cttb00023_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "cttb00023.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00023_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE cttb00023.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00023_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00023_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "cttb00023.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00023_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE cttb00023.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00023_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00023_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "cttb00023.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00023_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE cttb00023.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00023_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00023_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "cttb00023.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00023_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE cttb00023.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00023_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00023_costo_imp_checkColumnConstraints">}
-#+ Check constraints on the "cttb00023.costo_imp" column
-#+
-#+ @param p_costo_imp - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00023_costo_imp_checkColumnConstraints(p_costo_imp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_costo_imp LIKE cttb00023.costo_imp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00023_costo_imp_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00023_costo_s_imp_checkColumnConstraints">}
-#+ Check constraints on the "cttb00023.costo_s_imp" column
-#+
-#+ @param p_costo_s_imp - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00023_costo_s_imp_checkColumnConstraints(p_costo_s_imp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_costo_s_imp LIKE cttb00023.costo_s_imp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00023_costo_s_imp_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00023_status_t_checkColumnConstraints">}
-#+ Check constraints on the "cttb00023.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00023_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cttb00023.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00023_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00023_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "cttb00023.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00023_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cttb00023.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00023_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00023_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "cttb00023.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00023_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cttb00023.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00023_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00023_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "cttb00023.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00023_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cttb00023.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00023_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00023_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "cttb00023.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00023_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cttb00023.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00023_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00022_checkTableConstraints">}
-#+ Check constraints on the "cttb00022" table
-#+
-#+ @param p_data - a row data LIKE cttb00022.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00022_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cttb00022.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cttb00022_cod_prod_checkColumnConstraints(p_data.cod_prod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00022_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00022_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00022_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00022_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00022_cant_prop_checkColumnConstraints(p_data.cant_prop) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00022_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00022_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00022_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00022_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00022_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00022_checkTableConstraints
-
-{<BLOCK Name="fct.cttb00022_cod_prod_checkColumnConstraints">}
-#+ Check constraints on the "cttb00022.cod_prod" column
-#+
-#+ @param p_cod_prod - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00022_cod_prod_checkColumnConstraints(p_cod_prod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_prod LIKE cttb00022.cod_prod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00022_cod_prod_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00022_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "cttb00022.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00022_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE cttb00022.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00022_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00022_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "cttb00022.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00022_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE cttb00022.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00022_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00022_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "cttb00022.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00022_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE cttb00022.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00022_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00022_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "cttb00022.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00022_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE cttb00022.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00022_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00022_cant_prop_checkColumnConstraints">}
-#+ Check constraints on the "cttb00022.cant_prop" column
-#+
-#+ @param p_cant_prop - DECIMAL(10,8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00022_cant_prop_checkColumnConstraints(p_cant_prop)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cant_prop LIKE cttb00022.cant_prop
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00022_cant_prop_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00022_status_t_checkColumnConstraints">}
-#+ Check constraints on the "cttb00022.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00022_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cttb00022.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00022_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00022_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "cttb00022.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00022_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cttb00022.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00022_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00022_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "cttb00022.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00022_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cttb00022.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00022_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00022_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "cttb00022.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00022_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cttb00022.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00022_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00022_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "cttb00022.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00022_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cttb00022.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00022_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00021_checkTableConstraints">}
-#+ Check constraints on the "cttb00021" table
-#+
-#+ @param p_data - a row data LIKE cttb00021.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00021_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cttb00021.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cttb00021_ventas_checkColumnConstraints(p_data.ventas) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00021_mes_checkColumnConstraints(p_data.mes) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00021_pila_checkColumnConstraints(p_data.pila) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00021_material_checkColumnConstraints(p_data.material) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00021_labor_checkColumnConstraints(p_data.labor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00021_gasto_checkColumnConstraints(p_data.gasto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00021_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00021_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00021_checkTableConstraints
-
-{<BLOCK Name="fct.cttb00021_ventas_checkColumnConstraints">}
-#+ Check constraints on the "cttb00021.ventas" column
-#+
-#+ @param p_ventas - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00021_ventas_checkColumnConstraints(p_ventas)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ventas LIKE cttb00021.ventas
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00021_ventas_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00021_mes_checkColumnConstraints">}
-#+ Check constraints on the "cttb00021.mes" column
-#+
-#+ @param p_mes - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00021_mes_checkColumnConstraints(p_mes)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mes LIKE cttb00021.mes
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00021_mes_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00021_pila_checkColumnConstraints">}
-#+ Check constraints on the "cttb00021.pila" column
-#+
-#+ @param p_pila - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00021_pila_checkColumnConstraints(p_pila)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_pila LIKE cttb00021.pila
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00021_pila_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00021_material_checkColumnConstraints">}
-#+ Check constraints on the "cttb00021.material" column
-#+
-#+ @param p_material - DECIMAL(12,3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00021_material_checkColumnConstraints(p_material)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_material LIKE cttb00021.material
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00021_material_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00021_labor_checkColumnConstraints">}
-#+ Check constraints on the "cttb00021.labor" column
-#+
-#+ @param p_labor - DECIMAL(12,3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00021_labor_checkColumnConstraints(p_labor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_labor LIKE cttb00021.labor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00021_labor_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00021_gasto_checkColumnConstraints">}
-#+ Check constraints on the "cttb00021.gasto" column
-#+
-#+ @param p_gasto - DECIMAL(12,3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00021_gasto_checkColumnConstraints(p_gasto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_gasto LIKE cttb00021.gasto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00021_gasto_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00021_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "cttb00021.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00021_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cttb00021.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00021_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00021_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "cttb00021.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00021_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cttb00021.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00021_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00018_checkTableConstraints">}
-#+ Check constraints on the "cttb00018" table
-#+
-#+ @param p_data - a row data LIKE cttb00018.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00018_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cttb00018.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cttb00018_turno_checkColumnConstraints(p_data.turno) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00018_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00018_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00018_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00018_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00018_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00018_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00018_checkTableConstraints
-
-{<BLOCK Name="fct.cttb00018_turno_checkColumnConstraints">}
-#+ Check constraints on the "cttb00018.turno" column
-#+
-#+ @param p_turno - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00018_turno_checkColumnConstraints(p_turno)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_turno LIKE cttb00018.turno
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00018_turno_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00018_descripcion_checkColumnConstraints">}
-#+ Check constraints on the "cttb00018.descripcion" column
-#+
-#+ @param p_descripcion - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00018_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE cttb00018.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00018_descripcion_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00018_status_t_checkColumnConstraints">}
-#+ Check constraints on the "cttb00018.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00018_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cttb00018.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00018_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00018_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "cttb00018.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00018_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cttb00018.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00018_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00018_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "cttb00018.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00018_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cttb00018.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00018_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00018_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "cttb00018.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00018_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cttb00018.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00018_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00018_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "cttb00018.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00018_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cttb00018.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00018_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00017_checkTableConstraints">}
-#+ Check constraints on the "cttb00017" table
-#+
-#+ @param p_data - a row data LIKE cttb00017.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00017_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cttb00017.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cttb00017_num_doc_checkColumnConstraints(p_data.num_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00017_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00017_departamento_checkColumnConstraints(p_data.departamento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00017_emp_no_checkColumnConstraints(p_data.emp_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00017_cod_mq_checkColumnConstraints(p_data.cod_mq) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00017_detalle_checkColumnConstraints(p_data.detalle) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00017_h_directa_checkColumnConstraints(p_data.h_directa) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00017_h_indirecta_checkColumnConstraints(p_data.h_indirecta) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00017_e_directa_checkColumnConstraints(p_data.e_directa) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00017_e_indirecta_checkColumnConstraints(p_data.e_indirecta) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00017_cod_prod_checkColumnConstraints(p_data.cod_prod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00017_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00017_codigo_bloque_checkColumnConstraints(p_data.codigo_bloque) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00017_costo_lab_checkColumnConstraints(p_data.costo_lab) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00017_costo_gasto_checkColumnConstraints(p_data.costo_gasto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00017_turno_checkColumnConstraints(p_data.turno) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00017_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00017_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00017_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00017_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00017_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00017_checkTableConstraints
-
-{<BLOCK Name="fct.cttb00017_num_doc_checkColumnConstraints">}
-#+ Check constraints on the "cttb00017.num_doc" column
-#+
-#+ @param p_num_doc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00017_num_doc_checkColumnConstraints(p_num_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_doc LIKE cttb00017.num_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00017_num_doc_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00017_fecha_checkColumnConstraints">}
-#+ Check constraints on the "cttb00017.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00017_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE cttb00017.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00017_fecha_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00017_departamento_checkColumnConstraints">}
-#+ Check constraints on the "cttb00017.departamento" column
-#+
-#+ @param p_departamento - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00017_departamento_checkColumnConstraints(p_departamento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_departamento LIKE cttb00017.departamento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00017_departamento_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00017_emp_no_checkColumnConstraints">}
-#+ Check constraints on the "cttb00017.emp_no" column
-#+
-#+ @param p_emp_no - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00017_emp_no_checkColumnConstraints(p_emp_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_emp_no LIKE cttb00017.emp_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00017_emp_no_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00017_cod_mq_checkColumnConstraints">}
-#+ Check constraints on the "cttb00017.cod_mq" column
-#+
-#+ @param p_cod_mq - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00017_cod_mq_checkColumnConstraints(p_cod_mq)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mq LIKE cttb00017.cod_mq
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00017_cod_mq_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00017_detalle_checkColumnConstraints">}
-#+ Check constraints on the "cttb00017.detalle" column
-#+
-#+ @param p_detalle - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00017_detalle_checkColumnConstraints(p_detalle)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_detalle LIKE cttb00017.detalle
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00017_detalle_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00017_h_directa_checkColumnConstraints">}
-#+ Check constraints on the "cttb00017.h_directa" column
-#+
-#+ @param p_h_directa - DECIMAL(8,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00017_h_directa_checkColumnConstraints(p_h_directa)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_h_directa LIKE cttb00017.h_directa
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00017_h_directa_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00017_h_indirecta_checkColumnConstraints">}
-#+ Check constraints on the "cttb00017.h_indirecta" column
-#+
-#+ @param p_h_indirecta - DECIMAL(8,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00017_h_indirecta_checkColumnConstraints(p_h_indirecta)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_h_indirecta LIKE cttb00017.h_indirecta
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00017_h_indirecta_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00017_e_directa_checkColumnConstraints">}
-#+ Check constraints on the "cttb00017.e_directa" column
-#+
-#+ @param p_e_directa - DECIMAL(8,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00017_e_directa_checkColumnConstraints(p_e_directa)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_e_directa LIKE cttb00017.e_directa
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00017_e_directa_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00017_e_indirecta_checkColumnConstraints">}
-#+ Check constraints on the "cttb00017.e_indirecta" column
-#+
-#+ @param p_e_indirecta - DECIMAL(8,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00017_e_indirecta_checkColumnConstraints(p_e_indirecta)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_e_indirecta LIKE cttb00017.e_indirecta
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00017_e_indirecta_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00017_cod_prod_checkColumnConstraints">}
-#+ Check constraints on the "cttb00017.cod_prod" column
-#+
-#+ @param p_cod_prod - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00017_cod_prod_checkColumnConstraints(p_cod_prod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_prod LIKE cttb00017.cod_prod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00017_cod_prod_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00017_cantidad_checkColumnConstraints">}
-#+ Check constraints on the "cttb00017.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00017_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE cttb00017.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00017_cantidad_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00017_codigo_bloque_checkColumnConstraints">}
-#+ Check constraints on the "cttb00017.codigo_bloque" column
-#+
-#+ @param p_codigo_bloque - CHAR(25) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00017_codigo_bloque_checkColumnConstraints(p_codigo_bloque)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codigo_bloque LIKE cttb00017.codigo_bloque
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00017_codigo_bloque_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00017_costo_lab_checkColumnConstraints">}
-#+ Check constraints on the "cttb00017.costo_lab" column
-#+
-#+ @param p_costo_lab - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00017_costo_lab_checkColumnConstraints(p_costo_lab)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_costo_lab LIKE cttb00017.costo_lab
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00017_costo_lab_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00017_costo_gasto_checkColumnConstraints">}
-#+ Check constraints on the "cttb00017.costo_gasto" column
-#+
-#+ @param p_costo_gasto - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00017_costo_gasto_checkColumnConstraints(p_costo_gasto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_costo_gasto LIKE cttb00017.costo_gasto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00017_costo_gasto_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00017_turno_checkColumnConstraints">}
-#+ Check constraints on the "cttb00017.turno" column
-#+
-#+ @param p_turno - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00017_turno_checkColumnConstraints(p_turno)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_turno LIKE cttb00017.turno
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00017_turno_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00017_status_t_checkColumnConstraints">}
-#+ Check constraints on the "cttb00017.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00017_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cttb00017.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00017_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00017_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "cttb00017.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00017_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cttb00017.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00017_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00017_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "cttb00017.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00017_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cttb00017.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00017_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00017_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "cttb00017.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00017_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cttb00017.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00017_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00017_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "cttb00017.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00017_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cttb00017.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00017_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00016_checkTableConstraints">}
-#+ Check constraints on the "cttb00016" table
-#+
-#+ @param p_data - a row data LIKE cttb00016.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00016_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cttb00016.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cttb00016_referencia_checkColumnConstraints(p_data.referencia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00016_numero_checkColumnConstraints(p_data.numero) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00016_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00016_checkTableConstraints
-
-{<BLOCK Name="fct.cttb00016_referencia_checkColumnConstraints">}
-#+ Check constraints on the "cttb00016.referencia" column
-#+
-#+ @param p_referencia - CHAR(25) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00016_referencia_checkColumnConstraints(p_referencia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_referencia LIKE cttb00016.referencia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00016_referencia_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00016_numero_checkColumnConstraints">}
-#+ Check constraints on the "cttb00016.numero" column
-#+
-#+ @param p_numero - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00016_numero_checkColumnConstraints(p_numero)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_numero LIKE cttb00016.numero
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00016_numero_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00016_fecha_checkColumnConstraints">}
-#+ Check constraints on the "cttb00016.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00016_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE cttb00016.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00016_fecha_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00015_checkTableConstraints">}
-#+ Check constraints on the "cttb00015" table
-#+
-#+ @param p_data - a row data LIKE cttb00015.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00015_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cttb00015.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cttb00015_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00015_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00015_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00015_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00015_mes_checkColumnConstraints(p_data.mes) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00015_ano_checkColumnConstraints(p_data.ano) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00015_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00015_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00015_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00015_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00015_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00015_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00015_checkTableConstraints
-
-{<BLOCK Name="fct.cttb00015_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "cttb00015.cod_n" column
-#+
-#+ @param p_cod_n - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00015_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE cttb00015.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00015_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00015_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "cttb00015.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00015_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE cttb00015.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00015_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00015_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "cttb00015.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00015_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE cttb00015.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00015_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00015_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "cttb00015.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00015_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE cttb00015.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00015_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00015_mes_checkColumnConstraints">}
-#+ Check constraints on the "cttb00015.mes" column
-#+
-#+ @param p_mes - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00015_mes_checkColumnConstraints(p_mes)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mes LIKE cttb00015.mes
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00015_mes_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00015_ano_checkColumnConstraints">}
-#+ Check constraints on the "cttb00015.ano" column
-#+
-#+ @param p_ano - CHAR(4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00015_ano_checkColumnConstraints(p_ano)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ano LIKE cttb00015.ano
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00015_ano_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00015_cantidad_checkColumnConstraints">}
-#+ Check constraints on the "cttb00015.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(15,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00015_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE cttb00015.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00015_cantidad_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00015_status_t_checkColumnConstraints">}
-#+ Check constraints on the "cttb00015.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00015_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cttb00015.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00015_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00015_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "cttb00015.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00015_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cttb00015.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00015_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00015_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "cttb00015.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00015_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cttb00015.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00015_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00015_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "cttb00015.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00015_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cttb00015.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00015_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00015_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "cttb00015.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00015_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cttb00015.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00015_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00014_checkTableConstraints">}
-#+ Check constraints on the "cttb00014" table
-#+
-#+ @param p_data - a row data LIKE cttb00014.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00014_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cttb00014.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cttb00014_cod_prod_checkColumnConstraints(p_data.cod_prod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00014_ano_checkColumnConstraints(p_data.ano) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00014_mes_checkColumnConstraints(p_data.mes) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00014_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00014_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00014_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00014_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00014_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00014_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00014_checkTableConstraints
-
-{<BLOCK Name="fct.cttb00014_cod_prod_checkColumnConstraints">}
-#+ Check constraints on the "cttb00014.cod_prod" column
-#+
-#+ @param p_cod_prod - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00014_cod_prod_checkColumnConstraints(p_cod_prod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_prod LIKE cttb00014.cod_prod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00014_cod_prod_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00014_ano_checkColumnConstraints">}
-#+ Check constraints on the "cttb00014.ano" column
-#+
-#+ @param p_ano - CHAR(4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00014_ano_checkColumnConstraints(p_ano)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ano LIKE cttb00014.ano
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00014_ano_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00014_mes_checkColumnConstraints">}
-#+ Check constraints on the "cttb00014.mes" column
-#+
-#+ @param p_mes - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00014_mes_checkColumnConstraints(p_mes)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mes LIKE cttb00014.mes
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00014_mes_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00014_cantidad_checkColumnConstraints">}
-#+ Check constraints on the "cttb00014.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(15,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00014_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE cttb00014.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00014_cantidad_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00014_status_t_checkColumnConstraints">}
-#+ Check constraints on the "cttb00014.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00014_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cttb00014.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00014_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00014_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "cttb00014.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00014_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cttb00014.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00014_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00014_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "cttb00014.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00014_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cttb00014.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00014_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00014_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "cttb00014.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00014_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cttb00014.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00014_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00014_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "cttb00014.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00014_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cttb00014.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00014_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00013_checkTableConstraints">}
-#+ Check constraints on the "cttb00013" table
-#+
-#+ @param p_data - a row data LIKE cttb00013.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00013_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cttb00013.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cttb00013_fecha_lq_checkColumnConstraints(p_data.fecha_lq) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00013_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00013_tipo_lq_checkColumnConstraints(p_data.tipo_lq) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00013_num_oc_checkColumnConstraints(p_data.num_oc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00013_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00013_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00013_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00013_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00013_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00013_costo_lq_checkColumnConstraints(p_data.costo_lq) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00013_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00013_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00013_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00013_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00013_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00013_tipo_orden_checkColumnConstraints(p_data.tipo_orden) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00013_checkTableConstraints
-
-{<BLOCK Name="fct.cttb00013_fecha_lq_checkColumnConstraints">}
-#+ Check constraints on the "cttb00013.fecha_lq" column
-#+
-#+ @param p_fecha_lq - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00013_fecha_lq_checkColumnConstraints(p_fecha_lq)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_lq LIKE cttb00013.fecha_lq
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00013_fecha_lq_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00013_fecha_checkColumnConstraints">}
-#+ Check constraints on the "cttb00013.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00013_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE cttb00013.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00013_fecha_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00013_tipo_lq_checkColumnConstraints">}
-#+ Check constraints on the "cttb00013.tipo_lq" column
-#+
-#+ @param p_tipo_lq - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00013_tipo_lq_checkColumnConstraints(p_tipo_lq)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_lq LIKE cttb00013.tipo_lq
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00013_tipo_lq_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00013_num_oc_checkColumnConstraints">}
-#+ Check constraints on the "cttb00013.num_oc" column
-#+
-#+ @param p_num_oc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00013_num_oc_checkColumnConstraints(p_num_oc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_oc LIKE cttb00013.num_oc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00013_num_oc_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00013_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "cttb00013.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00013_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE cttb00013.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00013_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00013_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "cttb00013.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00013_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE cttb00013.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00013_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00013_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "cttb00013.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00013_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE cttb00013.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00013_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00013_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "cttb00013.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00013_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE cttb00013.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00013_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00013_cantidad_checkColumnConstraints">}
-#+ Check constraints on the "cttb00013.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00013_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE cttb00013.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00013_cantidad_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00013_costo_lq_checkColumnConstraints">}
-#+ Check constraints on the "cttb00013.costo_lq" column
-#+
-#+ @param p_costo_lq - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00013_costo_lq_checkColumnConstraints(p_costo_lq)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_costo_lq LIKE cttb00013.costo_lq
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00013_costo_lq_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00013_status_t_checkColumnConstraints">}
-#+ Check constraints on the "cttb00013.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00013_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cttb00013.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00013_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00013_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "cttb00013.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00013_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cttb00013.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00013_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00013_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "cttb00013.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00013_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cttb00013.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00013_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00013_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "cttb00013.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00013_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cttb00013.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00013_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00013_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "cttb00013.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00013_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cttb00013.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00013_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00013_tipo_orden_checkColumnConstraints">}
-#+ Check constraints on the "cttb00013.tipo_orden" column
-#+
-#+ @param p_tipo_orden - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00013_tipo_orden_checkColumnConstraints(p_tipo_orden)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_orden LIKE cttb00013.tipo_orden
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00013_tipo_orden_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00012_checkTableConstraints">}
-#+ Check constraints on the "cttb00012" table
-#+
-#+ @param p_data - a row data LIKE cttb00012.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00012_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cttb00012.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cttb00012_documento_checkColumnConstraints(p_data.documento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00012_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00012_codigo_bloque_checkColumnConstraints(p_data.codigo_bloque) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00012_cod_prod_checkColumnConstraints(p_data.cod_prod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00012_ancho1_checkColumnConstraints(p_data.ancho1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00012_largo1_checkColumnConstraints(p_data.largo1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00012_espesor1_checkColumnConstraints(p_data.espesor1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00012_medida1_checkColumnConstraints(p_data.medida1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00012_ancho2_checkColumnConstraints(p_data.ancho2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00012_largo2_checkColumnConstraints(p_data.largo2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00012_espesor2_checkColumnConstraints(p_data.espesor2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00012_medida2_checkColumnConstraints(p_data.medida2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00012_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00012_checkTableConstraints
-
-{<BLOCK Name="fct.cttb00012_documento_checkColumnConstraints">}
-#+ Check constraints on the "cttb00012.documento" column
-#+
-#+ @param p_documento - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00012_documento_checkColumnConstraints(p_documento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_documento LIKE cttb00012.documento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00012_documento_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00012_fecha_checkColumnConstraints">}
-#+ Check constraints on the "cttb00012.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00012_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE cttb00012.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00012_fecha_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00012_codigo_bloque_checkColumnConstraints">}
-#+ Check constraints on the "cttb00012.codigo_bloque" column
-#+
-#+ @param p_codigo_bloque - CHAR(15) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00012_codigo_bloque_checkColumnConstraints(p_codigo_bloque)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codigo_bloque LIKE cttb00012.codigo_bloque
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00012_codigo_bloque_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00012_cod_prod_checkColumnConstraints">}
-#+ Check constraints on the "cttb00012.cod_prod" column
-#+
-#+ @param p_cod_prod - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00012_cod_prod_checkColumnConstraints(p_cod_prod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_prod LIKE cttb00012.cod_prod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00012_cod_prod_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00012_ancho1_checkColumnConstraints">}
-#+ Check constraints on the "cttb00012.ancho1" column
-#+
-#+ @param p_ancho1 - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00012_ancho1_checkColumnConstraints(p_ancho1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ancho1 LIKE cttb00012.ancho1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00012_ancho1_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00012_largo1_checkColumnConstraints">}
-#+ Check constraints on the "cttb00012.largo1" column
-#+
-#+ @param p_largo1 - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00012_largo1_checkColumnConstraints(p_largo1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_largo1 LIKE cttb00012.largo1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00012_largo1_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00012_espesor1_checkColumnConstraints">}
-#+ Check constraints on the "cttb00012.espesor1" column
-#+
-#+ @param p_espesor1 - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00012_espesor1_checkColumnConstraints(p_espesor1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_espesor1 LIKE cttb00012.espesor1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00012_espesor1_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00012_medida1_checkColumnConstraints">}
-#+ Check constraints on the "cttb00012.medida1" column
-#+
-#+ @param p_medida1 - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00012_medida1_checkColumnConstraints(p_medida1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_medida1 LIKE cttb00012.medida1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00012_medida1_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00012_ancho2_checkColumnConstraints">}
-#+ Check constraints on the "cttb00012.ancho2" column
-#+
-#+ @param p_ancho2 - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00012_ancho2_checkColumnConstraints(p_ancho2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ancho2 LIKE cttb00012.ancho2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00012_ancho2_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00012_largo2_checkColumnConstraints">}
-#+ Check constraints on the "cttb00012.largo2" column
-#+
-#+ @param p_largo2 - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00012_largo2_checkColumnConstraints(p_largo2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_largo2 LIKE cttb00012.largo2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00012_largo2_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00012_espesor2_checkColumnConstraints">}
-#+ Check constraints on the "cttb00012.espesor2" column
-#+
-#+ @param p_espesor2 - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00012_espesor2_checkColumnConstraints(p_espesor2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_espesor2 LIKE cttb00012.espesor2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00012_espesor2_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00012_medida2_checkColumnConstraints">}
-#+ Check constraints on the "cttb00012.medida2" column
-#+
-#+ @param p_medida2 - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00012_medida2_checkColumnConstraints(p_medida2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_medida2 LIKE cttb00012.medida2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00012_medida2_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00012_cantidad_checkColumnConstraints">}
-#+ Check constraints on the "cttb00012.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00012_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE cttb00012.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00012_cantidad_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00011_checkTableConstraints">}
-#+ Check constraints on the "cttb00011" table
-#+
-#+ @param p_data - a row data LIKE cttb00011.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00011_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cttb00011.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cttb00011_cod_prod_checkColumnConstraints(p_data.cod_prod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00011_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00011_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00011_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00011_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00011_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00011_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00011_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00011_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00011_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00011_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00011_checkTableConstraints
-
-{<BLOCK Name="fct.cttb00011_cod_prod_checkColumnConstraints">}
-#+ Check constraints on the "cttb00011.cod_prod" column
-#+
-#+ @param p_cod_prod - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00011_cod_prod_checkColumnConstraints(p_cod_prod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_prod LIKE cttb00011.cod_prod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00011_cod_prod_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00011_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "cttb00011.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00011_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE cttb00011.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00011_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00011_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "cttb00011.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00011_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE cttb00011.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00011_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00011_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "cttb00011.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00011_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE cttb00011.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00011_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00011_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "cttb00011.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00011_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE cttb00011.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00011_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00011_cantidad_checkColumnConstraints">}
-#+ Check constraints on the "cttb00011.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(10,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00011_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE cttb00011.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00011_cantidad_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00011_status_t_checkColumnConstraints">}
-#+ Check constraints on the "cttb00011.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00011_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cttb00011.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00011_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00011_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "cttb00011.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00011_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cttb00011.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00011_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00011_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "cttb00011.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00011_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cttb00011.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00011_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00011_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "cttb00011.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00011_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cttb00011.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00011_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00011_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "cttb00011.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00011_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cttb00011.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00011_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00010_checkTableConstraints">}
-#+ Check constraints on the "cttb00010" table
-#+
-#+ @param p_data - a row data LIKE cttb00010.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00010_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cttb00010.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cttb00010_ult_num_checkColumnConstraints(p_data.ult_num) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00010_departamento_checkColumnConstraints(p_data.departamento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00010_observacion_checkColumnConstraints(p_data.observacion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00010_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00010_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00010_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00010_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00010_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00010_checkTableConstraints
-
-{<BLOCK Name="fct.cttb00010_ult_num_checkColumnConstraints">}
-#+ Check constraints on the "cttb00010.ult_num" column
-#+
-#+ @param p_ult_num - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00010_ult_num_checkColumnConstraints(p_ult_num)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ult_num LIKE cttb00010.ult_num
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00010_ult_num_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00010_departamento_checkColumnConstraints">}
-#+ Check constraints on the "cttb00010.departamento" column
-#+
-#+ @param p_departamento - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00010_departamento_checkColumnConstraints(p_departamento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_departamento LIKE cttb00010.departamento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00010_departamento_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00010_observacion_checkColumnConstraints">}
-#+ Check constraints on the "cttb00010.observacion" column
-#+
-#+ @param p_observacion - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00010_observacion_checkColumnConstraints(p_observacion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_observacion LIKE cttb00010.observacion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00010_observacion_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00010_fecha_checkColumnConstraints">}
-#+ Check constraints on the "cttb00010.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00010_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE cttb00010.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00010_fecha_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00010_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "cttb00010.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00010_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cttb00010.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00010_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00010_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "cttb00010.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00010_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cttb00010.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00010_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00010_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "cttb00010.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00010_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cttb00010.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00010_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00010_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "cttb00010.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00010_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cttb00010.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00010_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00009_checkTableConstraints">}
-#+ Check constraints on the "cttb00009" table
-#+
-#+ @param p_data - a row data LIKE cttb00009.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00009_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cttb00009.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cttb00009_formula_checkColumnConstraints(p_data.formula) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00009_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00009_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00009_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00009_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00009_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00009_cod_prod_checkColumnConstraints(p_data.cod_prod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00009_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00009_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00009_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00009_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00009_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00009_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00009_checkTableConstraints
-
-{<BLOCK Name="fct.cttb00009_formula_checkColumnConstraints">}
-#+ Check constraints on the "cttb00009.formula" column
-#+
-#+ @param p_formula - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00009_formula_checkColumnConstraints(p_formula)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_formula LIKE cttb00009.formula
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_formula IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- formula: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00009_formula_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00009_descripcion_checkColumnConstraints">}
-#+ Check constraints on the "cttb00009.descripcion" column
-#+
-#+ @param p_descripcion - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00009_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE cttb00009.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00009_descripcion_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00009_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "cttb00009.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00009_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE cttb00009.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00009_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00009_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "cttb00009.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00009_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE cttb00009.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00009_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00009_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "cttb00009.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00009_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE cttb00009.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00009_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00009_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "cttb00009.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00009_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE cttb00009.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00009_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00009_cod_prod_checkColumnConstraints">}
-#+ Check constraints on the "cttb00009.cod_prod" column
-#+
-#+ @param p_cod_prod - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00009_cod_prod_checkColumnConstraints(p_cod_prod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_prod LIKE cttb00009.cod_prod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00009_cod_prod_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00009_cantidad_checkColumnConstraints">}
-#+ Check constraints on the "cttb00009.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(12,3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00009_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE cttb00009.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00009_cantidad_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00009_status_t_checkColumnConstraints">}
-#+ Check constraints on the "cttb00009.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00009_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cttb00009.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00009_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00009_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "cttb00009.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00009_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cttb00009.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00009_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00009_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "cttb00009.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00009_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cttb00009.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00009_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00009_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "cttb00009.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00009_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cttb00009.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00009_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00009_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "cttb00009.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00009_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cttb00009.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00009_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00008_checkTableConstraints">}
-#+ Check constraints on the "cttb00008" table
-#+
-#+ @param p_data - a row data LIKE cttb00008.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00008_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cttb00008.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cttb00008_ano_checkColumnConstraints(p_data.ano) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00008_departamento_checkColumnConstraints(p_data.departamento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00008_cod_prod_checkColumnConstraints(p_data.cod_prod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00008_fact_hombre_checkColumnConstraints(p_data.fact_hombre) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00008_valor_labor_checkColumnConstraints(p_data.valor_labor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00008_hora_hombre_checkColumnConstraints(p_data.hora_hombre) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00008_valor_real_checkColumnConstraints(p_data.valor_real) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00008_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00008_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00008_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00008_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00008_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00008_checkTableConstraints
-
-{<BLOCK Name="fct.cttb00008_ano_checkColumnConstraints">}
-#+ Check constraints on the "cttb00008.ano" column
-#+
-#+ @param p_ano - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00008_ano_checkColumnConstraints(p_ano)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ano LIKE cttb00008.ano
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00008_ano_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00008_departamento_checkColumnConstraints">}
-#+ Check constraints on the "cttb00008.departamento" column
-#+
-#+ @param p_departamento - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00008_departamento_checkColumnConstraints(p_departamento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_departamento LIKE cttb00008.departamento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00008_departamento_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00008_cod_prod_checkColumnConstraints">}
-#+ Check constraints on the "cttb00008.cod_prod" column
-#+
-#+ @param p_cod_prod - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00008_cod_prod_checkColumnConstraints(p_cod_prod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_prod LIKE cttb00008.cod_prod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00008_cod_prod_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00008_fact_hombre_checkColumnConstraints">}
-#+ Check constraints on the "cttb00008.fact_hombre" column
-#+
-#+ @param p_fact_hombre - DECIMAL(13,8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00008_fact_hombre_checkColumnConstraints(p_fact_hombre)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fact_hombre LIKE cttb00008.fact_hombre
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00008_fact_hombre_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00008_valor_labor_checkColumnConstraints">}
-#+ Check constraints on the "cttb00008.valor_labor" column
-#+
-#+ @param p_valor_labor - DECIMAL(13,8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00008_valor_labor_checkColumnConstraints(p_valor_labor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valor_labor LIKE cttb00008.valor_labor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00008_valor_labor_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00008_hora_hombre_checkColumnConstraints">}
-#+ Check constraints on the "cttb00008.hora_hombre" column
-#+
-#+ @param p_hora_hombre - DECIMAL(13,8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00008_hora_hombre_checkColumnConstraints(p_hora_hombre)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_hora_hombre LIKE cttb00008.hora_hombre
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00008_hora_hombre_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00008_valor_real_checkColumnConstraints">}
-#+ Check constraints on the "cttb00008.valor_real" column
-#+
-#+ @param p_valor_real - DECIMAL(13,8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00008_valor_real_checkColumnConstraints(p_valor_real)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valor_real LIKE cttb00008.valor_real
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00008_valor_real_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00008_status_t_checkColumnConstraints">}
-#+ Check constraints on the "cttb00008.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00008_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cttb00008.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00008_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00008_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "cttb00008.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00008_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cttb00008.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00008_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00008_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "cttb00008.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00008_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cttb00008.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00008_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00008_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "cttb00008.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00008_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cttb00008.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00008_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00008_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "cttb00008.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00008_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cttb00008.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00008_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00007_checkTableConstraints">}
-#+ Check constraints on the "cttb00007" table
-#+
-#+ @param p_data - a row data LIKE cttb00007.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00007_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cttb00007.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cttb00007_codigo_unidad_checkColumnConstraints(p_data.codigo_unidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00007_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00007_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00007_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00007_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00007_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00007_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00007_checkTableConstraints
-
-{<BLOCK Name="fct.cttb00007_codigo_unidad_checkColumnConstraints">}
-#+ Check constraints on the "cttb00007.codigo_unidad" column
-#+
-#+ @param p_codigo_unidad - CHAR(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00007_codigo_unidad_checkColumnConstraints(p_codigo_unidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codigo_unidad LIKE cttb00007.codigo_unidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_codigo_unidad IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- codigo_unidad: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00007_codigo_unidad_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00007_descripcion_checkColumnConstraints">}
-#+ Check constraints on the "cttb00007.descripcion" column
-#+
-#+ @param p_descripcion - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00007_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE cttb00007.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00007_descripcion_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00007_status_t_checkColumnConstraints">}
-#+ Check constraints on the "cttb00007.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00007_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cttb00007.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00007_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00007_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "cttb00007.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00007_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cttb00007.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00007_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00007_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "cttb00007.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00007_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cttb00007.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00007_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00007_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "cttb00007.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00007_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cttb00007.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00007_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00007_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "cttb00007.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00007_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cttb00007.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00007_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00006_checkTableConstraints">}
-#+ Check constraints on the "cttb00006" table
-#+
-#+ @param p_data - a row data LIKE cttb00006.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00006_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cttb00006.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cttb00006_num_oc_checkColumnConstraints(p_data.num_oc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00006_tipo_checkColumnConstraints(p_data.tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00006_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00006_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00006_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00006_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00006_cod_prod_checkColumnConstraints(p_data.cod_prod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00006_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00006_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00006_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00006_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00006_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00006_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00006_checkTableConstraints
-
-{<BLOCK Name="fct.cttb00006_num_oc_checkColumnConstraints">}
-#+ Check constraints on the "cttb00006.num_oc" column
-#+
-#+ @param p_num_oc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00006_num_oc_checkColumnConstraints(p_num_oc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_oc LIKE cttb00006.num_oc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00006_num_oc_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00006_tipo_checkColumnConstraints">}
-#+ Check constraints on the "cttb00006.tipo" column
-#+
-#+ @param p_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00006_tipo_checkColumnConstraints(p_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo LIKE cttb00006.tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00006_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00006_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "cttb00006.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00006_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE cttb00006.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00006_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00006_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "cttb00006.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00006_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE cttb00006.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00006_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00006_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "cttb00006.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00006_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE cttb00006.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00006_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00006_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "cttb00006.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00006_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE cttb00006.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00006_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00006_cod_prod_checkColumnConstraints">}
-#+ Check constraints on the "cttb00006.cod_prod" column
-#+
-#+ @param p_cod_prod - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00006_cod_prod_checkColumnConstraints(p_cod_prod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_prod LIKE cttb00006.cod_prod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00006_cod_prod_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00006_cantidad_checkColumnConstraints">}
-#+ Check constraints on the "cttb00006.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00006_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE cttb00006.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00006_cantidad_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00006_status_t_checkColumnConstraints">}
-#+ Check constraints on the "cttb00006.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00006_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cttb00006.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00006_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00006_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "cttb00006.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00006_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cttb00006.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00006_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00006_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "cttb00006.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00006_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cttb00006.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00006_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00006_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "cttb00006.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00006_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cttb00006.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00006_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00006_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "cttb00006.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00006_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cttb00006.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00006_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00004_checkTableConstraints">}
-#+ Check constraints on the "cttb00004" table
-#+
-#+ @param p_data - a row data LIKE cttb00004.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00004_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cttb00004.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cttb00004_fecha_inicio_costo_checkColumnConstraints(p_data.fecha_inicio_costo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00004_ano_checkColumnConstraints(p_data.ano) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00004_mes_checkColumnConstraints(p_data.mes) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00004_checkTableConstraints
-
-{<BLOCK Name="fct.cttb00004_fecha_inicio_costo_checkColumnConstraints">}
-#+ Check constraints on the "cttb00004.fecha_inicio_costo" column
-#+
-#+ @param p_fecha_inicio_costo - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00004_fecha_inicio_costo_checkColumnConstraints(p_fecha_inicio_costo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_inicio_costo LIKE cttb00004.fecha_inicio_costo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00004_fecha_inicio_costo_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00004_ano_checkColumnConstraints">}
-#+ Check constraints on the "cttb00004.ano" column
-#+
-#+ @param p_ano - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00004_ano_checkColumnConstraints(p_ano)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ano LIKE cttb00004.ano
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00004_ano_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00004_mes_checkColumnConstraints">}
-#+ Check constraints on the "cttb00004.mes" column
-#+
-#+ @param p_mes - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00004_mes_checkColumnConstraints(p_mes)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mes LIKE cttb00004.mes
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00004_mes_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00003_checkTableConstraints">}
-#+ Check constraints on the "cttb00003" table
-#+
-#+ @param p_data - a row data LIKE cttb00003.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00003_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cttb00003.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cttb00003_num_doc_checkColumnConstraints(p_data.num_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00003_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00003_departamento_checkColumnConstraints(p_data.departamento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00003_emp_no_checkColumnConstraints(p_data.emp_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00003_cod_mq_checkColumnConstraints(p_data.cod_mq) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00003_detalle_checkColumnConstraints(p_data.detalle) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00003_h_directa_checkColumnConstraints(p_data.h_directa) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00003_h_indirecta_checkColumnConstraints(p_data.h_indirecta) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00003_e_directa_checkColumnConstraints(p_data.e_directa) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00003_e_indirecta_checkColumnConstraints(p_data.e_indirecta) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00003_cod_prod_checkColumnConstraints(p_data.cod_prod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00003_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00003_codigo_bloque_checkColumnConstraints(p_data.codigo_bloque) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00003_costo_lab_checkColumnConstraints(p_data.costo_lab) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00003_costo_gasto_checkColumnConstraints(p_data.costo_gasto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00003_turno_checkColumnConstraints(p_data.turno) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00003_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00003_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00003_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00003_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00003_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00003_checkTableConstraints
-
-{<BLOCK Name="fct.cttb00003_num_doc_checkColumnConstraints">}
-#+ Check constraints on the "cttb00003.num_doc" column
-#+
-#+ @param p_num_doc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00003_num_doc_checkColumnConstraints(p_num_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_doc LIKE cttb00003.num_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_num_doc IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- num_doc: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00003_num_doc_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00003_fecha_checkColumnConstraints">}
-#+ Check constraints on the "cttb00003.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00003_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE cttb00003.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_fecha IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- fecha: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00003_fecha_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00003_departamento_checkColumnConstraints">}
-#+ Check constraints on the "cttb00003.departamento" column
-#+
-#+ @param p_departamento - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00003_departamento_checkColumnConstraints(p_departamento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_departamento LIKE cttb00003.departamento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_departamento IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- departamento: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00003_departamento_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00003_emp_no_checkColumnConstraints">}
-#+ Check constraints on the "cttb00003.emp_no" column
-#+
-#+ @param p_emp_no - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00003_emp_no_checkColumnConstraints(p_emp_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_emp_no LIKE cttb00003.emp_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00003_emp_no_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00003_cod_mq_checkColumnConstraints">}
-#+ Check constraints on the "cttb00003.cod_mq" column
-#+
-#+ @param p_cod_mq - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00003_cod_mq_checkColumnConstraints(p_cod_mq)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mq LIKE cttb00003.cod_mq
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00003_cod_mq_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00003_detalle_checkColumnConstraints">}
-#+ Check constraints on the "cttb00003.detalle" column
-#+
-#+ @param p_detalle - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00003_detalle_checkColumnConstraints(p_detalle)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_detalle LIKE cttb00003.detalle
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00003_detalle_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00003_h_directa_checkColumnConstraints">}
-#+ Check constraints on the "cttb00003.h_directa" column
-#+
-#+ @param p_h_directa - DECIMAL(8,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00003_h_directa_checkColumnConstraints(p_h_directa)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_h_directa LIKE cttb00003.h_directa
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00003_h_directa_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00003_h_indirecta_checkColumnConstraints">}
-#+ Check constraints on the "cttb00003.h_indirecta" column
-#+
-#+ @param p_h_indirecta - DECIMAL(8,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00003_h_indirecta_checkColumnConstraints(p_h_indirecta)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_h_indirecta LIKE cttb00003.h_indirecta
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00003_h_indirecta_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00003_e_directa_checkColumnConstraints">}
-#+ Check constraints on the "cttb00003.e_directa" column
-#+
-#+ @param p_e_directa - DECIMAL(8,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00003_e_directa_checkColumnConstraints(p_e_directa)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_e_directa LIKE cttb00003.e_directa
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00003_e_directa_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00003_e_indirecta_checkColumnConstraints">}
-#+ Check constraints on the "cttb00003.e_indirecta" column
-#+
-#+ @param p_e_indirecta - DECIMAL(8,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00003_e_indirecta_checkColumnConstraints(p_e_indirecta)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_e_indirecta LIKE cttb00003.e_indirecta
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00003_e_indirecta_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00003_cod_prod_checkColumnConstraints">}
-#+ Check constraints on the "cttb00003.cod_prod" column
-#+
-#+ @param p_cod_prod - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00003_cod_prod_checkColumnConstraints(p_cod_prod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_prod LIKE cttb00003.cod_prod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00003_cod_prod_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00003_cantidad_checkColumnConstraints">}
-#+ Check constraints on the "cttb00003.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00003_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE cttb00003.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00003_cantidad_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00003_codigo_bloque_checkColumnConstraints">}
-#+ Check constraints on the "cttb00003.codigo_bloque" column
-#+
-#+ @param p_codigo_bloque - CHAR(25) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00003_codigo_bloque_checkColumnConstraints(p_codigo_bloque)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codigo_bloque LIKE cttb00003.codigo_bloque
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00003_codigo_bloque_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00003_costo_lab_checkColumnConstraints">}
-#+ Check constraints on the "cttb00003.costo_lab" column
-#+
-#+ @param p_costo_lab - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00003_costo_lab_checkColumnConstraints(p_costo_lab)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_costo_lab LIKE cttb00003.costo_lab
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00003_costo_lab_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00003_costo_gasto_checkColumnConstraints">}
-#+ Check constraints on the "cttb00003.costo_gasto" column
-#+
-#+ @param p_costo_gasto - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00003_costo_gasto_checkColumnConstraints(p_costo_gasto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_costo_gasto LIKE cttb00003.costo_gasto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00003_costo_gasto_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00003_turno_checkColumnConstraints">}
-#+ Check constraints on the "cttb00003.turno" column
-#+
-#+ @param p_turno - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00003_turno_checkColumnConstraints(p_turno)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_turno LIKE cttb00003.turno
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00003_turno_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00003_status_t_checkColumnConstraints">}
-#+ Check constraints on the "cttb00003.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00003_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cttb00003.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00003_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00003_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "cttb00003.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00003_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cttb00003.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00003_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00003_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "cttb00003.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00003_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cttb00003.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00003_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00003_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "cttb00003.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00003_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cttb00003.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00003_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00003_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "cttb00003.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00003_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cttb00003.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00003_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00002_checkTableConstraints">}
-#+ Check constraints on the "cttb00002" table
-#+
-#+ @param p_data - a row data LIKE cttb00002.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00002_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cttb00002.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cttb00002_ano_checkColumnConstraints(p_data.ano) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00002_venta_checkColumnConstraints(p_data.venta) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00002_nomenclatura_checkColumnConstraints(p_data.nomenclatura) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00002_mes_checkColumnConstraints(p_data.mes) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00002_costo_checkColumnConstraints(p_data.costo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00002_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00002_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00002_checkTableConstraints
-
-{<BLOCK Name="fct.cttb00002_ano_checkColumnConstraints">}
-#+ Check constraints on the "cttb00002.ano" column
-#+
-#+ @param p_ano - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00002_ano_checkColumnConstraints(p_ano)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ano LIKE cttb00002.ano
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00002_ano_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00002_venta_checkColumnConstraints">}
-#+ Check constraints on the "cttb00002.venta" column
-#+
-#+ @param p_venta - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00002_venta_checkColumnConstraints(p_venta)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_venta LIKE cttb00002.venta
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00002_venta_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00002_nomenclatura_checkColumnConstraints">}
-#+ Check constraints on the "cttb00002.nomenclatura" column
-#+
-#+ @param p_nomenclatura - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00002_nomenclatura_checkColumnConstraints(p_nomenclatura)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nomenclatura LIKE cttb00002.nomenclatura
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00002_nomenclatura_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00002_mes_checkColumnConstraints">}
-#+ Check constraints on the "cttb00002.mes" column
-#+
-#+ @param p_mes - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00002_mes_checkColumnConstraints(p_mes)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mes LIKE cttb00002.mes
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00002_mes_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00002_costo_checkColumnConstraints">}
-#+ Check constraints on the "cttb00002.costo" column
-#+
-#+ @param p_costo - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00002_costo_checkColumnConstraints(p_costo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_costo LIKE cttb00002.costo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00002_costo_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00002_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "cttb00002.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00002_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cttb00002.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00002_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00002_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "cttb00002.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00002_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cttb00002.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00002_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00001_checkTableConstraints">}
-#+ Check constraints on the "cttb00001" table
-#+
-#+ @param p_data - a row data LIKE cttb00001.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00001_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cttb00001.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cttb00001_cod_prod_checkColumnConstraints(p_data.cod_prod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00001_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00001_unidad_med_checkColumnConstraints(p_data.unidad_med) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00001_nomenclatura_checkColumnConstraints(p_data.nomenclatura) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00001_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00001_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00001_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00001_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00001_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cttb00001_cod_cia_checkColumnConstraints(p_data.cod_cia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- CALL smarmotech_dbxconstraints_cttb00001_pk_cttb00001_checkUniqueConstraint(p_forUpdate, p_data.cod_prod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00001_checkTableConstraints
-
-{<BLOCK Name="fct.cttb00001_pk_cttb00001_checkUniqueConstraint">}
-#+ Check the primary key uniqueness constraint on the "cttb00001"
-#+
-#+ @param p_key - Primary Key
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00001_pk_cttb00001_checkUniqueConstraint(p_forUpdate, p_key)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_key
- RECORD
- cttb00001_cod_prod LIKE cttb00001.cod_prod
- END RECORD
- DEFINE l_key
- RECORD
- cttb00001_cod_prod LIKE cttb00001.cod_prod
- END RECORD
- DEFINE l_where STRING
- DEFINE l_sqlQuery STRING
- DEFINE l_count INTEGER
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- LET l_where = "WHERE cttb00001.cod_prod = ? "
-
- let l_sqlQuery = "SELECT COUNT(*), cod_prod FROM cttb00001 ", l_where, " GROUP BY cod_prod"
-
- PREPARE cur_cttb00001_pk_cttb00001_checkUniqueConstraint FROM l_sqlQuery
- EXECUTE cur_cttb00001_pk_cttb00001_checkUniqueConstraint INTO l_count, l_key.* USING p_key.*
- FREE cur_cttb00001_pk_cttb00001_checkUniqueConstraint
- IF (NOT p_forUpdate AND l_count > 0) OR (p_forUpdate AND l_count > 0 AND p_key.* != l_key.*) THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_prod: " || ERROR_BAM_00002) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00001_pk_cttb00001_checkUniqueConstraint
-
-{<BLOCK Name="fct.cttb00001_cod_prod_checkColumnConstraints">}
-#+ Check constraints on the "cttb00001.cod_prod" column
-#+
-#+ @param p_cod_prod - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00001_cod_prod_checkColumnConstraints(p_cod_prod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_prod LIKE cttb00001.cod_prod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_prod IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_prod: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00001_cod_prod_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00001_descripcion_checkColumnConstraints">}
-#+ Check constraints on the "cttb00001.descripcion" column
-#+
-#+ @param p_descripcion - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00001_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE cttb00001.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00001_descripcion_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00001_unidad_med_checkColumnConstraints">}
-#+ Check constraints on the "cttb00001.unidad_med" column
-#+
-#+ @param p_unidad_med - CHAR(4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00001_unidad_med_checkColumnConstraints(p_unidad_med)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_unidad_med LIKE cttb00001.unidad_med
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00001_unidad_med_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00001_nomenclatura_checkColumnConstraints">}
-#+ Check constraints on the "cttb00001.nomenclatura" column
-#+
-#+ @param p_nomenclatura - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00001_nomenclatura_checkColumnConstraints(p_nomenclatura)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nomenclatura LIKE cttb00001.nomenclatura
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00001_nomenclatura_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00001_status_t_checkColumnConstraints">}
-#+ Check constraints on the "cttb00001.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00001_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cttb00001.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00001_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00001_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "cttb00001.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00001_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cttb00001.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00001_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00001_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "cttb00001.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00001_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cttb00001.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00001_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00001_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "cttb00001.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00001_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cttb00001.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00001_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00001_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "cttb00001.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00001_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cttb00001.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00001_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cttb00001_cod_cia_checkColumnConstraints">}
-#+ Check constraints on the "cttb00001.cod_cia" column
-#+
-#+ @param p_cod_cia - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cttb00001_cod_cia_checkColumnConstraints(p_cod_cia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_cia LIKE cttb00001.cod_cia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cttb00001_cod_cia_checkColumnConstraints
-
-{<BLOCK Name="fct.cptb00007_checkTableConstraints">}
-#+ Check constraints on the "cptb00007" table
-#+
-#+ @param p_data - a row data LIKE cptb00007.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00007_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cptb00007.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cptb00007_num_doc_checkColumnConstraints(p_data.num_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00007_tipo_doc_checkColumnConstraints(p_data.tipo_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00007_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00007_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cptb00007_checkTableConstraints
-
-{<BLOCK Name="fct.cptb00007_num_doc_checkColumnConstraints">}
-#+ Check constraints on the "cptb00007.num_doc" column
-#+
-#+ @param p_num_doc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00007_num_doc_checkColumnConstraints(p_num_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_doc LIKE cptb00007.num_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cptb00007_num_doc_checkColumnConstraints
-
-{<BLOCK Name="fct.cptb00007_tipo_doc_checkColumnConstraints">}
-#+ Check constraints on the "cptb00007.tipo_doc" column
-#+
-#+ @param p_tipo_doc - CHAR(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00007_tipo_doc_checkColumnConstraints(p_tipo_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_doc LIKE cptb00007.tipo_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cptb00007_tipo_doc_checkColumnConstraints
-
-{<BLOCK Name="fct.cptb00007_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "cptb00007.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00007_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cptb00007.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cptb00007_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cptb00007_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "cptb00007.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00007_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cptb00007.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cptb00007_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cptb00006_checkTableConstraints">}
-#+ Check constraints on the "cptb00006" table
-#+
-#+ @param p_data - a row data LIKE cptb00006.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00006_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cptb00006.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cptb00006_tipo_doc_checkColumnConstraints(p_data.tipo_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00006_num_doc_checkColumnConstraints(p_data.num_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00006_cod_sp_checkColumnConstraints(p_data.cod_sp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00006_cod_sp_sec_checkColumnConstraints(p_data.cod_sp_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00006_fecha_orig_checkColumnConstraints(p_data.fecha_orig) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00006_fecha_proc_checkColumnConstraints(p_data.fecha_proc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00006_orden_no_checkColumnConstraints(p_data.orden_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00006_tipo_checkColumnConstraints(p_data.tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00006_aplica_a_checkColumnConstraints(p_data.aplica_a) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00006_cta_ctble_checkColumnConstraints(p_data.cta_ctble) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00006_valor_checkColumnConstraints(p_data.valor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00006_detalle_checkColumnConstraints(p_data.detalle) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00006_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00006_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00006_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00006_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00006_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cptb00006_checkTableConstraints
-
-{<BLOCK Name="fct.cptb00006_tipo_doc_checkColumnConstraints">}
-#+ Check constraints on the "cptb00006.tipo_doc" column
-#+
-#+ @param p_tipo_doc - CHAR(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00006_tipo_doc_checkColumnConstraints(p_tipo_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_doc LIKE cptb00006.tipo_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cptb00006_tipo_doc_checkColumnConstraints
-
-{<BLOCK Name="fct.cptb00006_num_doc_checkColumnConstraints">}
-#+ Check constraints on the "cptb00006.num_doc" column
-#+
-#+ @param p_num_doc - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00006_num_doc_checkColumnConstraints(p_num_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_doc LIKE cptb00006.num_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cptb00006_num_doc_checkColumnConstraints
-
-{<BLOCK Name="fct.cptb00006_cod_sp_checkColumnConstraints">}
-#+ Check constraints on the "cptb00006.cod_sp" column
-#+
-#+ @param p_cod_sp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00006_cod_sp_checkColumnConstraints(p_cod_sp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sp LIKE cptb00006.cod_sp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cptb00006_cod_sp_checkColumnConstraints
-
-{<BLOCK Name="fct.cptb00006_cod_sp_sec_checkColumnConstraints">}
-#+ Check constraints on the "cptb00006.cod_sp_sec" column
-#+
-#+ @param p_cod_sp_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00006_cod_sp_sec_checkColumnConstraints(p_cod_sp_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sp_sec LIKE cptb00006.cod_sp_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cptb00006_cod_sp_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.cptb00006_fecha_orig_checkColumnConstraints">}
-#+ Check constraints on the "cptb00006.fecha_orig" column
-#+
-#+ @param p_fecha_orig - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00006_fecha_orig_checkColumnConstraints(p_fecha_orig)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_orig LIKE cptb00006.fecha_orig
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cptb00006_fecha_orig_checkColumnConstraints
-
-{<BLOCK Name="fct.cptb00006_fecha_proc_checkColumnConstraints">}
-#+ Check constraints on the "cptb00006.fecha_proc" column
-#+
-#+ @param p_fecha_proc - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00006_fecha_proc_checkColumnConstraints(p_fecha_proc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_proc LIKE cptb00006.fecha_proc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cptb00006_fecha_proc_checkColumnConstraints
-
-{<BLOCK Name="fct.cptb00006_orden_no_checkColumnConstraints">}
-#+ Check constraints on the "cptb00006.orden_no" column
-#+
-#+ @param p_orden_no - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00006_orden_no_checkColumnConstraints(p_orden_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_orden_no LIKE cptb00006.orden_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cptb00006_orden_no_checkColumnConstraints
-
-{<BLOCK Name="fct.cptb00006_tipo_checkColumnConstraints">}
-#+ Check constraints on the "cptb00006.tipo" column
-#+
-#+ @param p_tipo - CHAR(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00006_tipo_checkColumnConstraints(p_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo LIKE cptb00006.tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cptb00006_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.cptb00006_aplica_a_checkColumnConstraints">}
-#+ Check constraints on the "cptb00006.aplica_a" column
-#+
-#+ @param p_aplica_a - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00006_aplica_a_checkColumnConstraints(p_aplica_a)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_aplica_a LIKE cptb00006.aplica_a
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cptb00006_aplica_a_checkColumnConstraints
-
-{<BLOCK Name="fct.cptb00006_cta_ctble_checkColumnConstraints">}
-#+ Check constraints on the "cptb00006.cta_ctble" column
-#+
-#+ @param p_cta_ctble - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00006_cta_ctble_checkColumnConstraints(p_cta_ctble)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cta_ctble LIKE cptb00006.cta_ctble
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cptb00006_cta_ctble_checkColumnConstraints
-
-{<BLOCK Name="fct.cptb00006_valor_checkColumnConstraints">}
-#+ Check constraints on the "cptb00006.valor" column
-#+
-#+ @param p_valor - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00006_valor_checkColumnConstraints(p_valor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valor LIKE cptb00006.valor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_valor IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- valor: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cptb00006_valor_checkColumnConstraints
-
-{<BLOCK Name="fct.cptb00006_detalle_checkColumnConstraints">}
-#+ Check constraints on the "cptb00006.detalle" column
-#+
-#+ @param p_detalle - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00006_detalle_checkColumnConstraints(p_detalle)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_detalle LIKE cptb00006.detalle
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cptb00006_detalle_checkColumnConstraints
-
-{<BLOCK Name="fct.cptb00006_status_t_checkColumnConstraints">}
-#+ Check constraints on the "cptb00006.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00006_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cptb00006.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cptb00006_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.cptb00006_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "cptb00006.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00006_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cptb00006.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cptb00006_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cptb00006_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "cptb00006.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00006_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cptb00006.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cptb00006_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cptb00006_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "cptb00006.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00006_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cptb00006.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cptb00006_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cptb00006_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "cptb00006.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00006_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cptb00006.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cptb00006_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cptb00005_checkTableConstraints">}
-#+ Check constraints on the "cptb00005" table
-#+
-#+ @param p_data - a row data LIKE cptb00005.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00005_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cptb00005.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cptb00005_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00005_cod_sp_checkColumnConstraints(p_data.cod_sp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00005_cod_sp_sec_checkColumnConstraints(p_data.cod_sp_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00005_factura_checkColumnConstraints(p_data.factura) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00005_cuenta_no_checkColumnConstraints(p_data.cuenta_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00005_departamento_checkColumnConstraints(p_data.departamento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00005_num_doc_checkColumnConstraints(p_data.num_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00005_cod_aux_checkColumnConstraints(p_data.cod_aux) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00005_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00005_detalles_checkColumnConstraints(p_data.detalles) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00005_debito_checkColumnConstraints(p_data.debito) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00005_credito_checkColumnConstraints(p_data.credito) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00005_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00005_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00005_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00005_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00005_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cptb00005_checkTableConstraints
-
-{<BLOCK Name="fct.cptb00005_fecha_checkColumnConstraints">}
-#+ Check constraints on the "cptb00005.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00005_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE cptb00005.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cptb00005_fecha_checkColumnConstraints
-
-{<BLOCK Name="fct.cptb00005_cod_sp_checkColumnConstraints">}
-#+ Check constraints on the "cptb00005.cod_sp" column
-#+
-#+ @param p_cod_sp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00005_cod_sp_checkColumnConstraints(p_cod_sp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sp LIKE cptb00005.cod_sp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cptb00005_cod_sp_checkColumnConstraints
-
-{<BLOCK Name="fct.cptb00005_cod_sp_sec_checkColumnConstraints">}
-#+ Check constraints on the "cptb00005.cod_sp_sec" column
-#+
-#+ @param p_cod_sp_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00005_cod_sp_sec_checkColumnConstraints(p_cod_sp_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sp_sec LIKE cptb00005.cod_sp_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cptb00005_cod_sp_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.cptb00005_factura_checkColumnConstraints">}
-#+ Check constraints on the "cptb00005.factura" column
-#+
-#+ @param p_factura - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00005_factura_checkColumnConstraints(p_factura)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_factura LIKE cptb00005.factura
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cptb00005_factura_checkColumnConstraints
-
-{<BLOCK Name="fct.cptb00005_cuenta_no_checkColumnConstraints">}
-#+ Check constraints on the "cptb00005.cuenta_no" column
-#+
-#+ @param p_cuenta_no - CHAR(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00005_cuenta_no_checkColumnConstraints(p_cuenta_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cuenta_no LIKE cptb00005.cuenta_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cptb00005_cuenta_no_checkColumnConstraints
-
-{<BLOCK Name="fct.cptb00005_departamento_checkColumnConstraints">}
-#+ Check constraints on the "cptb00005.departamento" column
-#+
-#+ @param p_departamento - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00005_departamento_checkColumnConstraints(p_departamento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_departamento LIKE cptb00005.departamento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cptb00005_departamento_checkColumnConstraints
-
-{<BLOCK Name="fct.cptb00005_num_doc_checkColumnConstraints">}
-#+ Check constraints on the "cptb00005.num_doc" column
-#+
-#+ @param p_num_doc - CHAR(12) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00005_num_doc_checkColumnConstraints(p_num_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_doc LIKE cptb00005.num_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cptb00005_num_doc_checkColumnConstraints
-
-{<BLOCK Name="fct.cptb00005_cod_aux_checkColumnConstraints">}
-#+ Check constraints on the "cptb00005.cod_aux" column
-#+
-#+ @param p_cod_aux - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00005_cod_aux_checkColumnConstraints(p_cod_aux)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_aux LIKE cptb00005.cod_aux
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cptb00005_cod_aux_checkColumnConstraints
-
-{<BLOCK Name="fct.cptb00005_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "cptb00005.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00005_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE cptb00005.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cptb00005_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.cptb00005_detalles_checkColumnConstraints">}
-#+ Check constraints on the "cptb00005.detalles" column
-#+
-#+ @param p_detalles - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00005_detalles_checkColumnConstraints(p_detalles)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_detalles LIKE cptb00005.detalles
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cptb00005_detalles_checkColumnConstraints
-
-{<BLOCK Name="fct.cptb00005_debito_checkColumnConstraints">}
-#+ Check constraints on the "cptb00005.debito" column
-#+
-#+ @param p_debito - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00005_debito_checkColumnConstraints(p_debito)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_debito LIKE cptb00005.debito
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cptb00005_debito_checkColumnConstraints
-
-{<BLOCK Name="fct.cptb00005_credito_checkColumnConstraints">}
-#+ Check constraints on the "cptb00005.credito" column
-#+
-#+ @param p_credito - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00005_credito_checkColumnConstraints(p_credito)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_credito LIKE cptb00005.credito
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cptb00005_credito_checkColumnConstraints
-
-{<BLOCK Name="fct.cptb00005_status_t_checkColumnConstraints">}
-#+ Check constraints on the "cptb00005.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00005_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cptb00005.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cptb00005_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.cptb00005_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "cptb00005.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00005_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cptb00005.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cptb00005_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cptb00005_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "cptb00005.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00005_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cptb00005.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cptb00005_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cptb00005_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "cptb00005.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00005_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cptb00005.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cptb00005_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cptb00005_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "cptb00005.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00005_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cptb00005.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cptb00005_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cptb00003_checkTableConstraints">}
-#+ Check constraints on the "cptb00003" table
-#+
-#+ @param p_data - a row data LIKE cptb00003.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00003_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cptb00003.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cptb00003_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00003_cod_sp_checkColumnConstraints(p_data.cod_sp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00003_cod_sp_sec_checkColumnConstraints(p_data.cod_sp_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00003_factura_checkColumnConstraints(p_data.factura) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00003_cuenta_no_checkColumnConstraints(p_data.cuenta_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00003_departamento_checkColumnConstraints(p_data.departamento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00003_num_doc_checkColumnConstraints(p_data.num_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00003_cod_aux_checkColumnConstraints(p_data.cod_aux) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00003_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00003_detalles_checkColumnConstraints(p_data.detalles) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00003_debito_checkColumnConstraints(p_data.debito) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00003_credito_checkColumnConstraints(p_data.credito) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00003_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00003_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00003_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00003_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00003_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cptb00003_checkTableConstraints
-
-{<BLOCK Name="fct.cptb00003_fecha_checkColumnConstraints">}
-#+ Check constraints on the "cptb00003.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00003_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE cptb00003.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cptb00003_fecha_checkColumnConstraints
-
-{<BLOCK Name="fct.cptb00003_cod_sp_checkColumnConstraints">}
-#+ Check constraints on the "cptb00003.cod_sp" column
-#+
-#+ @param p_cod_sp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00003_cod_sp_checkColumnConstraints(p_cod_sp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sp LIKE cptb00003.cod_sp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cptb00003_cod_sp_checkColumnConstraints
-
-{<BLOCK Name="fct.cptb00003_cod_sp_sec_checkColumnConstraints">}
-#+ Check constraints on the "cptb00003.cod_sp_sec" column
-#+
-#+ @param p_cod_sp_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00003_cod_sp_sec_checkColumnConstraints(p_cod_sp_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sp_sec LIKE cptb00003.cod_sp_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cptb00003_cod_sp_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.cptb00003_factura_checkColumnConstraints">}
-#+ Check constraints on the "cptb00003.factura" column
-#+
-#+ @param p_factura - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00003_factura_checkColumnConstraints(p_factura)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_factura LIKE cptb00003.factura
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cptb00003_factura_checkColumnConstraints
-
-{<BLOCK Name="fct.cptb00003_cuenta_no_checkColumnConstraints">}
-#+ Check constraints on the "cptb00003.cuenta_no" column
-#+
-#+ @param p_cuenta_no - CHAR(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00003_cuenta_no_checkColumnConstraints(p_cuenta_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cuenta_no LIKE cptb00003.cuenta_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cptb00003_cuenta_no_checkColumnConstraints
-
-{<BLOCK Name="fct.cptb00003_departamento_checkColumnConstraints">}
-#+ Check constraints on the "cptb00003.departamento" column
-#+
-#+ @param p_departamento - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00003_departamento_checkColumnConstraints(p_departamento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_departamento LIKE cptb00003.departamento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cptb00003_departamento_checkColumnConstraints
-
-{<BLOCK Name="fct.cptb00003_num_doc_checkColumnConstraints">}
-#+ Check constraints on the "cptb00003.num_doc" column
-#+
-#+ @param p_num_doc - CHAR(12) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00003_num_doc_checkColumnConstraints(p_num_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_doc LIKE cptb00003.num_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cptb00003_num_doc_checkColumnConstraints
-
-{<BLOCK Name="fct.cptb00003_cod_aux_checkColumnConstraints">}
-#+ Check constraints on the "cptb00003.cod_aux" column
-#+
-#+ @param p_cod_aux - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00003_cod_aux_checkColumnConstraints(p_cod_aux)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_aux LIKE cptb00003.cod_aux
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cptb00003_cod_aux_checkColumnConstraints
-
-{<BLOCK Name="fct.cptb00003_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "cptb00003.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00003_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE cptb00003.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cptb00003_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.cptb00003_detalles_checkColumnConstraints">}
-#+ Check constraints on the "cptb00003.detalles" column
-#+
-#+ @param p_detalles - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00003_detalles_checkColumnConstraints(p_detalles)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_detalles LIKE cptb00003.detalles
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cptb00003_detalles_checkColumnConstraints
-
-{<BLOCK Name="fct.cptb00003_debito_checkColumnConstraints">}
-#+ Check constraints on the "cptb00003.debito" column
-#+
-#+ @param p_debito - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00003_debito_checkColumnConstraints(p_debito)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_debito LIKE cptb00003.debito
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cptb00003_debito_checkColumnConstraints
-
-{<BLOCK Name="fct.cptb00003_credito_checkColumnConstraints">}
-#+ Check constraints on the "cptb00003.credito" column
-#+
-#+ @param p_credito - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00003_credito_checkColumnConstraints(p_credito)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_credito LIKE cptb00003.credito
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cptb00003_credito_checkColumnConstraints
-
-{<BLOCK Name="fct.cptb00003_status_t_checkColumnConstraints">}
-#+ Check constraints on the "cptb00003.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00003_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cptb00003.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cptb00003_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.cptb00003_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "cptb00003.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00003_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cptb00003.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cptb00003_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cptb00003_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "cptb00003.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00003_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cptb00003.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cptb00003_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cptb00003_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "cptb00003.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00003_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cptb00003.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cptb00003_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cptb00003_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "cptb00003.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00003_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cptb00003.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cptb00003_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cptb00002_checkTableConstraints">}
-#+ Check constraints on the "cptb00002" table
-#+
-#+ @param p_data - a row data LIKE cptb00002.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00002_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cptb00002.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cptb00002_cod_sp_checkColumnConstraints(p_data.cod_sp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00002_cod_sp_sec_checkColumnConstraints(p_data.cod_sp_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00002_cuenta_no_checkColumnConstraints(p_data.cuenta_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00002_num_doc_checkColumnConstraints(p_data.num_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00002_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00002_valor_checkColumnConstraints(p_data.valor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00002_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00002_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00002_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00002_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00002_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cptb00002_checkTableConstraints
-
-{<BLOCK Name="fct.cptb00002_cod_sp_checkColumnConstraints">}
-#+ Check constraints on the "cptb00002.cod_sp" column
-#+
-#+ @param p_cod_sp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00002_cod_sp_checkColumnConstraints(p_cod_sp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sp LIKE cptb00002.cod_sp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cptb00002_cod_sp_checkColumnConstraints
-
-{<BLOCK Name="fct.cptb00002_cod_sp_sec_checkColumnConstraints">}
-#+ Check constraints on the "cptb00002.cod_sp_sec" column
-#+
-#+ @param p_cod_sp_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00002_cod_sp_sec_checkColumnConstraints(p_cod_sp_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sp_sec LIKE cptb00002.cod_sp_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cptb00002_cod_sp_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.cptb00002_cuenta_no_checkColumnConstraints">}
-#+ Check constraints on the "cptb00002.cuenta_no" column
-#+
-#+ @param p_cuenta_no - CHAR(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00002_cuenta_no_checkColumnConstraints(p_cuenta_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cuenta_no LIKE cptb00002.cuenta_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cptb00002_cuenta_no_checkColumnConstraints
-
-{<BLOCK Name="fct.cptb00002_num_doc_checkColumnConstraints">}
-#+ Check constraints on the "cptb00002.num_doc" column
-#+
-#+ @param p_num_doc - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00002_num_doc_checkColumnConstraints(p_num_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_doc LIKE cptb00002.num_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cptb00002_num_doc_checkColumnConstraints
-
-{<BLOCK Name="fct.cptb00002_fecha_checkColumnConstraints">}
-#+ Check constraints on the "cptb00002.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00002_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE cptb00002.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cptb00002_fecha_checkColumnConstraints
-
-{<BLOCK Name="fct.cptb00002_valor_checkColumnConstraints">}
-#+ Check constraints on the "cptb00002.valor" column
-#+
-#+ @param p_valor - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00002_valor_checkColumnConstraints(p_valor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valor LIKE cptb00002.valor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cptb00002_valor_checkColumnConstraints
-
-{<BLOCK Name="fct.cptb00002_status_t_checkColumnConstraints">}
-#+ Check constraints on the "cptb00002.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00002_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cptb00002.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cptb00002_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.cptb00002_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "cptb00002.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00002_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cptb00002.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cptb00002_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cptb00002_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "cptb00002.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00002_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cptb00002.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cptb00002_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cptb00002_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "cptb00002.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00002_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cptb00002.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cptb00002_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cptb00002_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "cptb00002.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00002_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cptb00002.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cptb00002_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cptb00001_checkTableConstraints">}
-#+ Check constraints on the "cptb00001" table
-#+
-#+ @param p_data - a row data LIKE cptb00001.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00001_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cptb00001.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cptb00001_tipo_doc_checkColumnConstraints(p_data.tipo_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00001_num_doc_checkColumnConstraints(p_data.num_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00001_cod_sp_checkColumnConstraints(p_data.cod_sp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00001_cod_sp_sec_checkColumnConstraints(p_data.cod_sp_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00001_fecha_orig_checkColumnConstraints(p_data.fecha_orig) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00001_fecha_proc_checkColumnConstraints(p_data.fecha_proc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00001_orden_no_checkColumnConstraints(p_data.orden_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00001_tipo_checkColumnConstraints(p_data.tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00001_aplica_a_checkColumnConstraints(p_data.aplica_a) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00001_cta_ctble_checkColumnConstraints(p_data.cta_ctble) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00001_valor_checkColumnConstraints(p_data.valor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00001_detalle_checkColumnConstraints(p_data.detalle) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00001_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00001_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00001_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00001_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cptb00001_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cptb00001_checkTableConstraints
-
-{<BLOCK Name="fct.cptb00001_tipo_doc_checkColumnConstraints">}
-#+ Check constraints on the "cptb00001.tipo_doc" column
-#+
-#+ @param p_tipo_doc - VARCHAR2(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00001_tipo_doc_checkColumnConstraints(p_tipo_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_doc LIKE cptb00001.tipo_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cptb00001_tipo_doc_checkColumnConstraints
-
-{<BLOCK Name="fct.cptb00001_num_doc_checkColumnConstraints">}
-#+ Check constraints on the "cptb00001.num_doc" column
-#+
-#+ @param p_num_doc - VARCHAR2(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00001_num_doc_checkColumnConstraints(p_num_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_doc LIKE cptb00001.num_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cptb00001_num_doc_checkColumnConstraints
-
-{<BLOCK Name="fct.cptb00001_cod_sp_checkColumnConstraints">}
-#+ Check constraints on the "cptb00001.cod_sp" column
-#+
-#+ @param p_cod_sp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00001_cod_sp_checkColumnConstraints(p_cod_sp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sp LIKE cptb00001.cod_sp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cptb00001_cod_sp_checkColumnConstraints
-
-{<BLOCK Name="fct.cptb00001_cod_sp_sec_checkColumnConstraints">}
-#+ Check constraints on the "cptb00001.cod_sp_sec" column
-#+
-#+ @param p_cod_sp_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00001_cod_sp_sec_checkColumnConstraints(p_cod_sp_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sp_sec LIKE cptb00001.cod_sp_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cptb00001_cod_sp_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.cptb00001_fecha_orig_checkColumnConstraints">}
-#+ Check constraints on the "cptb00001.fecha_orig" column
-#+
-#+ @param p_fecha_orig - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00001_fecha_orig_checkColumnConstraints(p_fecha_orig)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_orig LIKE cptb00001.fecha_orig
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cptb00001_fecha_orig_checkColumnConstraints
-
-{<BLOCK Name="fct.cptb00001_fecha_proc_checkColumnConstraints">}
-#+ Check constraints on the "cptb00001.fecha_proc" column
-#+
-#+ @param p_fecha_proc - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00001_fecha_proc_checkColumnConstraints(p_fecha_proc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_proc LIKE cptb00001.fecha_proc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cptb00001_fecha_proc_checkColumnConstraints
-
-{<BLOCK Name="fct.cptb00001_orden_no_checkColumnConstraints">}
-#+ Check constraints on the "cptb00001.orden_no" column
-#+
-#+ @param p_orden_no - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00001_orden_no_checkColumnConstraints(p_orden_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_orden_no LIKE cptb00001.orden_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cptb00001_orden_no_checkColumnConstraints
-
-{<BLOCK Name="fct.cptb00001_tipo_checkColumnConstraints">}
-#+ Check constraints on the "cptb00001.tipo" column
-#+
-#+ @param p_tipo - VARCHAR2(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00001_tipo_checkColumnConstraints(p_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo LIKE cptb00001.tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cptb00001_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.cptb00001_aplica_a_checkColumnConstraints">}
-#+ Check constraints on the "cptb00001.aplica_a" column
-#+
-#+ @param p_aplica_a - VARCHAR2(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00001_aplica_a_checkColumnConstraints(p_aplica_a)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_aplica_a LIKE cptb00001.aplica_a
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cptb00001_aplica_a_checkColumnConstraints
-
-{<BLOCK Name="fct.cptb00001_cta_ctble_checkColumnConstraints">}
-#+ Check constraints on the "cptb00001.cta_ctble" column
-#+
-#+ @param p_cta_ctble - VARCHAR2(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00001_cta_ctble_checkColumnConstraints(p_cta_ctble)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cta_ctble LIKE cptb00001.cta_ctble
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cptb00001_cta_ctble_checkColumnConstraints
-
-{<BLOCK Name="fct.cptb00001_valor_checkColumnConstraints">}
-#+ Check constraints on the "cptb00001.valor" column
-#+
-#+ @param p_valor - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00001_valor_checkColumnConstraints(p_valor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valor LIKE cptb00001.valor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_valor IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- valor: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cptb00001_valor_checkColumnConstraints
-
-{<BLOCK Name="fct.cptb00001_detalle_checkColumnConstraints">}
-#+ Check constraints on the "cptb00001.detalle" column
-#+
-#+ @param p_detalle - VARCHAR2(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00001_detalle_checkColumnConstraints(p_detalle)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_detalle LIKE cptb00001.detalle
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cptb00001_detalle_checkColumnConstraints
-
-{<BLOCK Name="fct.cptb00001_status_t_checkColumnConstraints">}
-#+ Check constraints on the "cptb00001.status_t" column
-#+
-#+ @param p_status_t - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00001_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cptb00001.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cptb00001_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.cptb00001_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "cptb00001.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00001_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cptb00001.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cptb00001_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cptb00001_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "cptb00001.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00001_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cptb00001.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cptb00001_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cptb00001_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "cptb00001.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00001_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cptb00001.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cptb00001_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cptb00001_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "cptb00001.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cptb00001_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cptb00001.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cptb00001_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.country_checkTableConstraints">}
-#+ Check constraints on the "country" table
-#+
-#+ @param p_data - a row data LIKE country.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_country_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE country.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_country_code_checkColumnConstraints(p_data.code) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_country_codedesc_checkColumnConstraints(p_data.codedesc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.country_checkTableConstraints
-
-{<BLOCK Name="fct.country_code_checkColumnConstraints">}
-#+ Check constraints on the "country.code" column
-#+
-#+ @param p_code - CHAR(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_country_code_checkColumnConstraints(p_code)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_code LIKE country.code
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.country_code_checkColumnConstraints
-
-{<BLOCK Name="fct.country_codedesc_checkColumnConstraints">}
-#+ Check constraints on the "country.codedesc" column
-#+
-#+ @param p_codedesc - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_country_codedesc_checkColumnConstraints(p_codedesc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codedesc LIKE country.codedesc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.country_codedesc_checkColumnConstraints
-
-{<BLOCK Name="fct.cotizacion_detalle_checkTableConstraints">}
-#+ Check constraints on the "cotizacion_detalle" table
-#+
-#+ @param p_data - a row data LIKE cotizacion_detalle.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotizacion_detalle_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cotizacion_detalle.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cotizacion_detalle_cotizacion_no_mob_checkColumnConstraints(p_data.cotizacion_no_mob) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotizacion_detalle_area_checkColumnConstraints(p_data.area) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotizacion_detalle_descripcion_area_checkColumnConstraints(p_data.descripcion_area) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotizacion_detalle_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotizacion_detalle_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotizacion_detalle_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotizacion_detalle_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotizacion_detalle_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotizacion_detalle_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotizacion_detalle_cantidad1_checkColumnConstraints(p_data.cantidad1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotizacion_detalle_precio_checkColumnConstraints(p_data.precio) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotizacion_detalle_porc_desc_checkColumnConstraints(p_data.porc_desc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotizacion_detalle_itbis_checkColumnConstraints(p_data.itbis) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotizacion_detalle_valor_checkColumnConstraints(p_data.valor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotizacion_detalle_codid_checkColumnConstraints(p_data.codid) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotizacion_detalle_cotizacion_no_checkColumnConstraints(p_data.cotizacion_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotizacion_detalle_checkTableConstraints
-
-{<BLOCK Name="fct.cotizacion_detalle_cotizacion_no_mob_checkColumnConstraints">}
-#+ Check constraints on the "cotizacion_detalle.cotizacion_no_mob" column
-#+
-#+ @param p_cotizacion_no_mob - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotizacion_detalle_cotizacion_no_mob_checkColumnConstraints(p_cotizacion_no_mob)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cotizacion_no_mob LIKE cotizacion_detalle.cotizacion_no_mob
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotizacion_detalle_cotizacion_no_mob_checkColumnConstraints
-
-{<BLOCK Name="fct.cotizacion_detalle_area_checkColumnConstraints">}
-#+ Check constraints on the "cotizacion_detalle.area" column
-#+
-#+ @param p_area - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotizacion_detalle_area_checkColumnConstraints(p_area)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_area LIKE cotizacion_detalle.area
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotizacion_detalle_area_checkColumnConstraints
-
-{<BLOCK Name="fct.cotizacion_detalle_descripcion_area_checkColumnConstraints">}
-#+ Check constraints on the "cotizacion_detalle.descripcion_area" column
-#+
-#+ @param p_descripcion_area - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotizacion_detalle_descripcion_area_checkColumnConstraints(p_descripcion_area)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion_area LIKE cotizacion_detalle.descripcion_area
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotizacion_detalle_descripcion_area_checkColumnConstraints
-
-{<BLOCK Name="fct.cotizacion_detalle_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "cotizacion_detalle.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotizacion_detalle_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE cotizacion_detalle.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotizacion_detalle_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.cotizacion_detalle_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "cotizacion_detalle.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotizacion_detalle_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE cotizacion_detalle.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotizacion_detalle_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.cotizacion_detalle_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "cotizacion_detalle.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotizacion_detalle_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE cotizacion_detalle.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotizacion_detalle_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.cotizacion_detalle_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "cotizacion_detalle.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotizacion_detalle_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE cotizacion_detalle.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotizacion_detalle_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.cotizacion_detalle_descripcion_checkColumnConstraints">}
-#+ Check constraints on the "cotizacion_detalle.descripcion" column
-#+
-#+ @param p_descripcion - VARCHAR2(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotizacion_detalle_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE cotizacion_detalle.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotizacion_detalle_descripcion_checkColumnConstraints
-
-{<BLOCK Name="fct.cotizacion_detalle_cantidad_checkColumnConstraints">}
-#+ Check constraints on the "cotizacion_detalle.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotizacion_detalle_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE cotizacion_detalle.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotizacion_detalle_cantidad_checkColumnConstraints
-
-{<BLOCK Name="fct.cotizacion_detalle_cantidad1_checkColumnConstraints">}
-#+ Check constraints on the "cotizacion_detalle.cantidad1" column
-#+
-#+ @param p_cantidad1 - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotizacion_detalle_cantidad1_checkColumnConstraints(p_cantidad1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad1 LIKE cotizacion_detalle.cantidad1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotizacion_detalle_cantidad1_checkColumnConstraints
-
-{<BLOCK Name="fct.cotizacion_detalle_precio_checkColumnConstraints">}
-#+ Check constraints on the "cotizacion_detalle.precio" column
-#+
-#+ @param p_precio - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotizacion_detalle_precio_checkColumnConstraints(p_precio)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_precio LIKE cotizacion_detalle.precio
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotizacion_detalle_precio_checkColumnConstraints
-
-{<BLOCK Name="fct.cotizacion_detalle_porc_desc_checkColumnConstraints">}
-#+ Check constraints on the "cotizacion_detalle.porc_desc" column
-#+
-#+ @param p_porc_desc - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotizacion_detalle_porc_desc_checkColumnConstraints(p_porc_desc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_porc_desc LIKE cotizacion_detalle.porc_desc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotizacion_detalle_porc_desc_checkColumnConstraints
-
-{<BLOCK Name="fct.cotizacion_detalle_itbis_checkColumnConstraints">}
-#+ Check constraints on the "cotizacion_detalle.itbis" column
-#+
-#+ @param p_itbis - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotizacion_detalle_itbis_checkColumnConstraints(p_itbis)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_itbis LIKE cotizacion_detalle.itbis
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotizacion_detalle_itbis_checkColumnConstraints
-
-{<BLOCK Name="fct.cotizacion_detalle_valor_checkColumnConstraints">}
-#+ Check constraints on the "cotizacion_detalle.valor" column
-#+
-#+ @param p_valor - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotizacion_detalle_valor_checkColumnConstraints(p_valor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valor LIKE cotizacion_detalle.valor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotizacion_detalle_valor_checkColumnConstraints
-
-{<BLOCK Name="fct.cotizacion_detalle_codid_checkColumnConstraints">}
-#+ Check constraints on the "cotizacion_detalle.codid" column
-#+
-#+ @param p_codid - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotizacion_detalle_codid_checkColumnConstraints(p_codid)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codid LIKE cotizacion_detalle.codid
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotizacion_detalle_codid_checkColumnConstraints
-
-{<BLOCK Name="fct.cotizacion_detalle_cotizacion_no_checkColumnConstraints">}
-#+ Check constraints on the "cotizacion_detalle.cotizacion_no" column
-#+
-#+ @param p_cotizacion_no - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotizacion_detalle_cotizacion_no_checkColumnConstraints(p_cotizacion_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cotizacion_no LIKE cotizacion_detalle.cotizacion_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotizacion_detalle_cotizacion_no_checkColumnConstraints
-
-{<BLOCK Name="fct.cotizacion_checkTableConstraints">}
-#+ Check constraints on the "cotizacion" table
-#+
-#+ @param p_data - a row data LIKE cotizacion.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotizacion_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cotizacion.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cotizacion_cotizacion_no_mob_checkColumnConstraints(p_data.cotizacion_no_mob) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotizacion_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotizacion_ventas_checkColumnConstraints(p_data.ventas) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotizacion_tipo_cliente_checkColumnConstraints(p_data.tipo_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotizacion_sec_cliente_checkColumnConstraints(p_data.sec_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotizacion_nombre_checkColumnConstraints(p_data.nombre) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotizacion_rnc_checkColumnConstraints(p_data.rnc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotizacion_nombre_proyecto_checkColumnConstraints(p_data.nombre_proyecto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotizacion_direccion_proyecto_checkColumnConstraints(p_data.direccion_proyecto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotizacion_direccion_cliente_checkColumnConstraints(p_data.direccion_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotizacion_cond_pago_checkColumnConstraints(p_data.cond_pago) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotizacion_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotizacion_celular_checkColumnConstraints(p_data.celular) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotizacion_email_checkColumnConstraints(p_data.email) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotizacion_prima_checkColumnConstraints(p_data.prima) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotizacion_porc_itbis_checkColumnConstraints(p_data.porc_itbis) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotizacion_sec_vend_checkColumnConstraints(p_data.sec_vend) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotizacion_total_bruto_checkColumnConstraints(p_data.total_bruto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotizacion_monto_desc_checkColumnConstraints(p_data.monto_desc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotizacion_monto_itbis_checkColumnConstraints(p_data.monto_itbis) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotizacion_total_cotizacion_checkColumnConstraints(p_data.total_cotizacion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotizacion_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotizacion_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotizacion_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotizacion_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotizacion_cotizacion_no_checkColumnConstraints(p_data.cotizacion_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotizacion_checkTableConstraints
-
-{<BLOCK Name="fct.cotizacion_cotizacion_no_mob_checkColumnConstraints">}
-#+ Check constraints on the "cotizacion.cotizacion_no_mob" column
-#+
-#+ @param p_cotizacion_no_mob - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotizacion_cotizacion_no_mob_checkColumnConstraints(p_cotizacion_no_mob)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cotizacion_no_mob LIKE cotizacion.cotizacion_no_mob
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotizacion_cotizacion_no_mob_checkColumnConstraints
-
-{<BLOCK Name="fct.cotizacion_fecha_checkColumnConstraints">}
-#+ Check constraints on the "cotizacion.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotizacion_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE cotizacion.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotizacion_fecha_checkColumnConstraints
-
-{<BLOCK Name="fct.cotizacion_ventas_checkColumnConstraints">}
-#+ Check constraints on the "cotizacion.ventas" column
-#+
-#+ @param p_ventas - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotizacion_ventas_checkColumnConstraints(p_ventas)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ventas LIKE cotizacion.ventas
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotizacion_ventas_checkColumnConstraints
-
-{<BLOCK Name="fct.cotizacion_tipo_cliente_checkColumnConstraints">}
-#+ Check constraints on the "cotizacion.tipo_cliente" column
-#+
-#+ @param p_tipo_cliente - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotizacion_tipo_cliente_checkColumnConstraints(p_tipo_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_cliente LIKE cotizacion.tipo_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotizacion_tipo_cliente_checkColumnConstraints
-
-{<BLOCK Name="fct.cotizacion_sec_cliente_checkColumnConstraints">}
-#+ Check constraints on the "cotizacion.sec_cliente" column
-#+
-#+ @param p_sec_cliente - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotizacion_sec_cliente_checkColumnConstraints(p_sec_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_cliente LIKE cotizacion.sec_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotizacion_sec_cliente_checkColumnConstraints
-
-{<BLOCK Name="fct.cotizacion_nombre_checkColumnConstraints">}
-#+ Check constraints on the "cotizacion.nombre" column
-#+
-#+ @param p_nombre - VARCHAR2(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotizacion_nombre_checkColumnConstraints(p_nombre)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombre LIKE cotizacion.nombre
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotizacion_nombre_checkColumnConstraints
-
-{<BLOCK Name="fct.cotizacion_rnc_checkColumnConstraints">}
-#+ Check constraints on the "cotizacion.rnc" column
-#+
-#+ @param p_rnc - VARCHAR2(11) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotizacion_rnc_checkColumnConstraints(p_rnc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_rnc LIKE cotizacion.rnc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotizacion_rnc_checkColumnConstraints
-
-{<BLOCK Name="fct.cotizacion_nombre_proyecto_checkColumnConstraints">}
-#+ Check constraints on the "cotizacion.nombre_proyecto" column
-#+
-#+ @param p_nombre_proyecto - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotizacion_nombre_proyecto_checkColumnConstraints(p_nombre_proyecto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombre_proyecto LIKE cotizacion.nombre_proyecto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotizacion_nombre_proyecto_checkColumnConstraints
-
-{<BLOCK Name="fct.cotizacion_direccion_proyecto_checkColumnConstraints">}
-#+ Check constraints on the "cotizacion.direccion_proyecto" column
-#+
-#+ @param p_direccion_proyecto - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotizacion_direccion_proyecto_checkColumnConstraints(p_direccion_proyecto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_direccion_proyecto LIKE cotizacion.direccion_proyecto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotizacion_direccion_proyecto_checkColumnConstraints
-
-{<BLOCK Name="fct.cotizacion_direccion_cliente_checkColumnConstraints">}
-#+ Check constraints on the "cotizacion.direccion_cliente" column
-#+
-#+ @param p_direccion_cliente - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotizacion_direccion_cliente_checkColumnConstraints(p_direccion_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_direccion_cliente LIKE cotizacion.direccion_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotizacion_direccion_cliente_checkColumnConstraints
-
-{<BLOCK Name="fct.cotizacion_cond_pago_checkColumnConstraints">}
-#+ Check constraints on the "cotizacion.cond_pago" column
-#+
-#+ @param p_cond_pago - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotizacion_cond_pago_checkColumnConstraints(p_cond_pago)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cond_pago LIKE cotizacion.cond_pago
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotizacion_cond_pago_checkColumnConstraints
-
-{<BLOCK Name="fct.cotizacion_descripcion_checkColumnConstraints">}
-#+ Check constraints on the "cotizacion.descripcion" column
-#+
-#+ @param p_descripcion - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotizacion_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE cotizacion.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotizacion_descripcion_checkColumnConstraints
-
-{<BLOCK Name="fct.cotizacion_celular_checkColumnConstraints">}
-#+ Check constraints on the "cotizacion.celular" column
-#+
-#+ @param p_celular - VARCHAR2(15) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotizacion_celular_checkColumnConstraints(p_celular)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_celular LIKE cotizacion.celular
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotizacion_celular_checkColumnConstraints
-
-{<BLOCK Name="fct.cotizacion_email_checkColumnConstraints">}
-#+ Check constraints on the "cotizacion.email" column
-#+
-#+ @param p_email - VARCHAR2(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotizacion_email_checkColumnConstraints(p_email)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_email LIKE cotizacion.email
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotizacion_email_checkColumnConstraints
-
-{<BLOCK Name="fct.cotizacion_prima_checkColumnConstraints">}
-#+ Check constraints on the "cotizacion.prima" column
-#+
-#+ @param p_prima - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotizacion_prima_checkColumnConstraints(p_prima)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_prima LIKE cotizacion.prima
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotizacion_prima_checkColumnConstraints
-
-{<BLOCK Name="fct.cotizacion_porc_itbis_checkColumnConstraints">}
-#+ Check constraints on the "cotizacion.porc_itbis" column
-#+
-#+ @param p_porc_itbis - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotizacion_porc_itbis_checkColumnConstraints(p_porc_itbis)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_porc_itbis LIKE cotizacion.porc_itbis
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotizacion_porc_itbis_checkColumnConstraints
-
-{<BLOCK Name="fct.cotizacion_sec_vend_checkColumnConstraints">}
-#+ Check constraints on the "cotizacion.sec_vend" column
-#+
-#+ @param p_sec_vend - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotizacion_sec_vend_checkColumnConstraints(p_sec_vend)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_vend LIKE cotizacion.sec_vend
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotizacion_sec_vend_checkColumnConstraints
-
-{<BLOCK Name="fct.cotizacion_total_bruto_checkColumnConstraints">}
-#+ Check constraints on the "cotizacion.total_bruto" column
-#+
-#+ @param p_total_bruto - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotizacion_total_bruto_checkColumnConstraints(p_total_bruto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_total_bruto LIKE cotizacion.total_bruto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotizacion_total_bruto_checkColumnConstraints
-
-{<BLOCK Name="fct.cotizacion_monto_desc_checkColumnConstraints">}
-#+ Check constraints on the "cotizacion.monto_desc" column
-#+
-#+ @param p_monto_desc - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotizacion_monto_desc_checkColumnConstraints(p_monto_desc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_monto_desc LIKE cotizacion.monto_desc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotizacion_monto_desc_checkColumnConstraints
-
-{<BLOCK Name="fct.cotizacion_monto_itbis_checkColumnConstraints">}
-#+ Check constraints on the "cotizacion.monto_itbis" column
-#+
-#+ @param p_monto_itbis - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotizacion_monto_itbis_checkColumnConstraints(p_monto_itbis)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_monto_itbis LIKE cotizacion.monto_itbis
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotizacion_monto_itbis_checkColumnConstraints
-
-{<BLOCK Name="fct.cotizacion_total_cotizacion_checkColumnConstraints">}
-#+ Check constraints on the "cotizacion.total_cotizacion" column
-#+
-#+ @param p_total_cotizacion - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotizacion_total_cotizacion_checkColumnConstraints(p_total_cotizacion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_total_cotizacion LIKE cotizacion.total_cotizacion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotizacion_total_cotizacion_checkColumnConstraints
-
-{<BLOCK Name="fct.cotizacion_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "cotizacion.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotizacion_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cotizacion.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotizacion_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cotizacion_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "cotizacion.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotizacion_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cotizacion.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotizacion_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cotizacion_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "cotizacion.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotizacion_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cotizacion.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotizacion_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cotizacion_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "cotizacion.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotizacion_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cotizacion.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotizacion_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cotizacion_cotizacion_no_checkColumnConstraints">}
-#+ Check constraints on the "cotizacion.cotizacion_no" column
-#+
-#+ @param p_cotizacion_no - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotizacion_cotizacion_no_checkColumnConstraints(p_cotizacion_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cotizacion_no LIKE cotizacion.cotizacion_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotizacion_cotizacion_no_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00038_checkTableConstraints">}
-#+ Check constraints on the "cotb00038" table
-#+
-#+ @param p_data - a row data LIKE cotb00038.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00038_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cotb00038.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cotb00038_num_doc_checkColumnConstraints(p_data.num_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00038_cod_mov_checkColumnConstraints(p_data.cod_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00038_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00038_num_oc_checkColumnConstraints(p_data.num_oc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00038_cod_emb_checkColumnConstraints(p_data.cod_emb) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00038_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00038_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00038_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00038_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00038_cantidad_o_checkColumnConstraints(p_data.cantidad_o) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00038_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00038_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00038_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00038_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00038_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00038_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00038_checkTableConstraints
-
-{<BLOCK Name="fct.cotb00038_num_doc_checkColumnConstraints">}
-#+ Check constraints on the "cotb00038.num_doc" column
-#+
-#+ @param p_num_doc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00038_num_doc_checkColumnConstraints(p_num_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_doc LIKE cotb00038.num_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00038_num_doc_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00038_cod_mov_checkColumnConstraints">}
-#+ Check constraints on the "cotb00038.cod_mov" column
-#+
-#+ @param p_cod_mov - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00038_cod_mov_checkColumnConstraints(p_cod_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mov LIKE cotb00038.cod_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00038_cod_mov_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00038_fecha_checkColumnConstraints">}
-#+ Check constraints on the "cotb00038.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00038_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE cotb00038.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00038_fecha_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00038_num_oc_checkColumnConstraints">}
-#+ Check constraints on the "cotb00038.num_oc" column
-#+
-#+ @param p_num_oc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00038_num_oc_checkColumnConstraints(p_num_oc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_oc LIKE cotb00038.num_oc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00038_num_oc_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00038_cod_emb_checkColumnConstraints">}
-#+ Check constraints on the "cotb00038.cod_emb" column
-#+
-#+ @param p_cod_emb - CHAR(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00038_cod_emb_checkColumnConstraints(p_cod_emb)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_emb LIKE cotb00038.cod_emb
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00038_cod_emb_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00038_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "cotb00038.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00038_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE cotb00038.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00038_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00038_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "cotb00038.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00038_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE cotb00038.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00038_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00038_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "cotb00038.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00038_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE cotb00038.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00038_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00038_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "cotb00038.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00038_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE cotb00038.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00038_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00038_cantidad_o_checkColumnConstraints">}
-#+ Check constraints on the "cotb00038.cantidad_o" column
-#+
-#+ @param p_cantidad_o - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00038_cantidad_o_checkColumnConstraints(p_cantidad_o)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad_o LIKE cotb00038.cantidad_o
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00038_cantidad_o_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00038_cantidad_checkColumnConstraints">}
-#+ Check constraints on the "cotb00038.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00038_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE cotb00038.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00038_cantidad_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00038_status_t_checkColumnConstraints">}
-#+ Check constraints on the "cotb00038.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00038_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cotb00038.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00038_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00038_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "cotb00038.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00038_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cotb00038.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00038_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00038_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "cotb00038.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00038_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cotb00038.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00038_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00038_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "cotb00038.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00038_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cotb00038.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00038_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00038_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "cotb00038.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00038_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cotb00038.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00038_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00036_checkTableConstraints">}
-#+ Check constraints on the "cotb00036" table
-#+
-#+ @param p_data - a row data LIKE cotb00036.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00036_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cotb00036.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cotb00036_priori_req_checkColumnConstraints(p_data.priori_req) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00036_desc_priori_checkColumnConstraints(p_data.desc_priori) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00036_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00036_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00036_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00036_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00036_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00036_checkTableConstraints
-
-{<BLOCK Name="fct.cotb00036_priori_req_checkColumnConstraints">}
-#+ Check constraints on the "cotb00036.priori_req" column
-#+
-#+ @param p_priori_req - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00036_priori_req_checkColumnConstraints(p_priori_req)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_priori_req LIKE cotb00036.priori_req
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_priori_req IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- priori_req: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00036_priori_req_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00036_desc_priori_checkColumnConstraints">}
-#+ Check constraints on the "cotb00036.desc_priori" column
-#+
-#+ @param p_desc_priori - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00036_desc_priori_checkColumnConstraints(p_desc_priori)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_desc_priori LIKE cotb00036.desc_priori
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_desc_priori IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- desc_priori: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00036_desc_priori_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00036_status_t_checkColumnConstraints">}
-#+ Check constraints on the "cotb00036.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00036_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cotb00036.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00036_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00036_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "cotb00036.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00036_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cotb00036.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00036_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00036_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "cotb00036.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00036_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cotb00036.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00036_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00036_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "cotb00036.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00036_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cotb00036.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00036_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00036_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "cotb00036.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00036_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cotb00036.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00036_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00034_checkTableConstraints">}
-#+ Check constraints on the "cotb00034" table
-#+
-#+ @param p_data - a row data LIKE cotb00034.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00034_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cotb00034.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cotb00034_num_oc_checkColumnConstraints(p_data.num_oc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00034_num_req_checkColumnConstraints(p_data.num_req) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00034_tipo_checkColumnConstraints(p_data.tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00034_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00034_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00034_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00034_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00034_num_parte_checkColumnConstraints(p_data.num_parte) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00034_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00034_precio_checkColumnConstraints(p_data.precio) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00034_cod_mon_checkColumnConstraints(p_data.cod_mon) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00034_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00034_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00034_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00034_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00034_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00034_checkTableConstraints
-
-{<BLOCK Name="fct.cotb00034_num_oc_checkColumnConstraints">}
-#+ Check constraints on the "cotb00034.num_oc" column
-#+
-#+ @param p_num_oc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00034_num_oc_checkColumnConstraints(p_num_oc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_oc LIKE cotb00034.num_oc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00034_num_oc_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00034_num_req_checkColumnConstraints">}
-#+ Check constraints on the "cotb00034.num_req" column
-#+
-#+ @param p_num_req - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00034_num_req_checkColumnConstraints(p_num_req)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_req LIKE cotb00034.num_req
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00034_num_req_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00034_tipo_checkColumnConstraints">}
-#+ Check constraints on the "cotb00034.tipo" column
-#+
-#+ @param p_tipo - CHAR(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00034_tipo_checkColumnConstraints(p_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo LIKE cotb00034.tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00034_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00034_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "cotb00034.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00034_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE cotb00034.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00034_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00034_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "cotb00034.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00034_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE cotb00034.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00034_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00034_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "cotb00034.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00034_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE cotb00034.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00034_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00034_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "cotb00034.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00034_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE cotb00034.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00034_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00034_num_parte_checkColumnConstraints">}
-#+ Check constraints on the "cotb00034.num_parte" column
-#+
-#+ @param p_num_parte - CHAR(12) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00034_num_parte_checkColumnConstraints(p_num_parte)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_parte LIKE cotb00034.num_parte
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00034_num_parte_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00034_cantidad_checkColumnConstraints">}
-#+ Check constraints on the "cotb00034.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00034_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE cotb00034.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00034_cantidad_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00034_precio_checkColumnConstraints">}
-#+ Check constraints on the "cotb00034.precio" column
-#+
-#+ @param p_precio - DECIMAL(11,3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00034_precio_checkColumnConstraints(p_precio)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_precio LIKE cotb00034.precio
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00034_precio_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00034_cod_mon_checkColumnConstraints">}
-#+ Check constraints on the "cotb00034.cod_mon" column
-#+
-#+ @param p_cod_mon - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00034_cod_mon_checkColumnConstraints(p_cod_mon)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mon LIKE cotb00034.cod_mon
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00034_cod_mon_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00034_status_t_checkColumnConstraints">}
-#+ Check constraints on the "cotb00034.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00034_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cotb00034.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00034_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00034_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "cotb00034.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00034_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cotb00034.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00034_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00034_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "cotb00034.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00034_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cotb00034.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00034_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00034_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "cotb00034.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00034_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cotb00034.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00034_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00034_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "cotb00034.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00034_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cotb00034.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00034_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00033_checkTableConstraints">}
-#+ Check constraints on the "cotb00033" table
-#+
-#+ @param p_data - a row data LIKE cotb00033.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00033_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cotb00033.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cotb00033_num_oc_checkColumnConstraints(p_data.num_oc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00033_tipo_checkColumnConstraints(p_data.tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00033_fech_oc_checkColumnConstraints(p_data.fech_oc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00033_num_pr_checkColumnConstraints(p_data.num_pr) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00033_cod_sp_checkColumnConstraints(p_data.cod_sp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00033_cod_sp_sec_checkColumnConstraints(p_data.cod_sp_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00033_term_sp_checkColumnConstraints(p_data.term_sp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00033_via_checkColumnConstraints(p_data.via) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00033_enviada_checkColumnConstraints(p_data.enviada) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00033_fech_enviada_checkColumnConstraints(p_data.fech_enviada) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00033_pago_checkColumnConstraints(p_data.pago) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00033_fech_pago_checkColumnConstraints(p_data.fech_pago) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00033_cierre_checkColumnConstraints(p_data.cierre) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00033_cod_pt_checkColumnConstraints(p_data.cod_pt) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00033_c_flete_checkColumnConstraints(p_data.c_flete) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00033_otros_g_checkColumnConstraints(p_data.otros_g) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00033_detalle_checkColumnConstraints(p_data.detalle) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00033_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00033_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00033_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00033_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00033_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00033_checkTableConstraints
-
-{<BLOCK Name="fct.cotb00033_num_oc_checkColumnConstraints">}
-#+ Check constraints on the "cotb00033.num_oc" column
-#+
-#+ @param p_num_oc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00033_num_oc_checkColumnConstraints(p_num_oc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_oc LIKE cotb00033.num_oc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00033_num_oc_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00033_tipo_checkColumnConstraints">}
-#+ Check constraints on the "cotb00033.tipo" column
-#+
-#+ @param p_tipo - CHAR(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00033_tipo_checkColumnConstraints(p_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo LIKE cotb00033.tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00033_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00033_fech_oc_checkColumnConstraints">}
-#+ Check constraints on the "cotb00033.fech_oc" column
-#+
-#+ @param p_fech_oc - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00033_fech_oc_checkColumnConstraints(p_fech_oc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_oc LIKE cotb00033.fech_oc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00033_fech_oc_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00033_num_pr_checkColumnConstraints">}
-#+ Check constraints on the "cotb00033.num_pr" column
-#+
-#+ @param p_num_pr - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00033_num_pr_checkColumnConstraints(p_num_pr)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_pr LIKE cotb00033.num_pr
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00033_num_pr_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00033_cod_sp_checkColumnConstraints">}
-#+ Check constraints on the "cotb00033.cod_sp" column
-#+
-#+ @param p_cod_sp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00033_cod_sp_checkColumnConstraints(p_cod_sp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sp LIKE cotb00033.cod_sp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00033_cod_sp_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00033_cod_sp_sec_checkColumnConstraints">}
-#+ Check constraints on the "cotb00033.cod_sp_sec" column
-#+
-#+ @param p_cod_sp_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00033_cod_sp_sec_checkColumnConstraints(p_cod_sp_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sp_sec LIKE cotb00033.cod_sp_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00033_cod_sp_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00033_term_sp_checkColumnConstraints">}
-#+ Check constraints on the "cotb00033.term_sp" column
-#+
-#+ @param p_term_sp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00033_term_sp_checkColumnConstraints(p_term_sp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_term_sp LIKE cotb00033.term_sp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00033_term_sp_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00033_via_checkColumnConstraints">}
-#+ Check constraints on the "cotb00033.via" column
-#+
-#+ @param p_via - CHAR(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00033_via_checkColumnConstraints(p_via)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_via LIKE cotb00033.via
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00033_via_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00033_enviada_checkColumnConstraints">}
-#+ Check constraints on the "cotb00033.enviada" column
-#+
-#+ @param p_enviada - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00033_enviada_checkColumnConstraints(p_enviada)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_enviada LIKE cotb00033.enviada
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00033_enviada_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00033_fech_enviada_checkColumnConstraints">}
-#+ Check constraints on the "cotb00033.fech_enviada" column
-#+
-#+ @param p_fech_enviada - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00033_fech_enviada_checkColumnConstraints(p_fech_enviada)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_enviada LIKE cotb00033.fech_enviada
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00033_fech_enviada_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00033_pago_checkColumnConstraints">}
-#+ Check constraints on the "cotb00033.pago" column
-#+
-#+ @param p_pago - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00033_pago_checkColumnConstraints(p_pago)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_pago LIKE cotb00033.pago
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00033_pago_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00033_fech_pago_checkColumnConstraints">}
-#+ Check constraints on the "cotb00033.fech_pago" column
-#+
-#+ @param p_fech_pago - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00033_fech_pago_checkColumnConstraints(p_fech_pago)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_pago LIKE cotb00033.fech_pago
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00033_fech_pago_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00033_cierre_checkColumnConstraints">}
-#+ Check constraints on the "cotb00033.cierre" column
-#+
-#+ @param p_cierre - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00033_cierre_checkColumnConstraints(p_cierre)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cierre LIKE cotb00033.cierre
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00033_cierre_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00033_cod_pt_checkColumnConstraints">}
-#+ Check constraints on the "cotb00033.cod_pt" column
-#+
-#+ @param p_cod_pt - CHAR(4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00033_cod_pt_checkColumnConstraints(p_cod_pt)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_pt LIKE cotb00033.cod_pt
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00033_cod_pt_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00033_c_flete_checkColumnConstraints">}
-#+ Check constraints on the "cotb00033.c_flete" column
-#+
-#+ @param p_c_flete - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00033_c_flete_checkColumnConstraints(p_c_flete)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_c_flete LIKE cotb00033.c_flete
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00033_c_flete_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00033_otros_g_checkColumnConstraints">}
-#+ Check constraints on the "cotb00033.otros_g" column
-#+
-#+ @param p_otros_g - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00033_otros_g_checkColumnConstraints(p_otros_g)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_otros_g LIKE cotb00033.otros_g
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00033_otros_g_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00033_detalle_checkColumnConstraints">}
-#+ Check constraints on the "cotb00033.detalle" column
-#+
-#+ @param p_detalle - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00033_detalle_checkColumnConstraints(p_detalle)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_detalle LIKE cotb00033.detalle
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00033_detalle_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00033_status_t_checkColumnConstraints">}
-#+ Check constraints on the "cotb00033.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00033_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cotb00033.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00033_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00033_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "cotb00033.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00033_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cotb00033.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00033_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00033_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "cotb00033.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00033_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cotb00033.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00033_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00033_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "cotb00033.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00033_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cotb00033.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00033_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00033_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "cotb00033.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00033_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cotb00033.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00033_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00031_checkTableConstraints">}
-#+ Check constraints on the "cotb00031" table
-#+
-#+ @param p_data - a row data LIKE cotb00031.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00031_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cotb00031.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cotb00031_cod_mon_checkColumnConstraints(p_data.cod_mon) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00031_descrip_mon_checkColumnConstraints(p_data.descrip_mon) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00031_simbolo_checkColumnConstraints(p_data.simbolo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00031_tasa_cambio_checkColumnConstraints(p_data.tasa_cambio) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00031_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00031_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00031_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00031_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00031_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00031_checkTableConstraints
-
-{<BLOCK Name="fct.cotb00031_cod_mon_checkColumnConstraints">}
-#+ Check constraints on the "cotb00031.cod_mon" column
-#+
-#+ @param p_cod_mon - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00031_cod_mon_checkColumnConstraints(p_cod_mon)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mon LIKE cotb00031.cod_mon
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00031_cod_mon_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00031_descrip_mon_checkColumnConstraints">}
-#+ Check constraints on the "cotb00031.descrip_mon" column
-#+
-#+ @param p_descrip_mon - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00031_descrip_mon_checkColumnConstraints(p_descrip_mon)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descrip_mon LIKE cotb00031.descrip_mon
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00031_descrip_mon_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00031_simbolo_checkColumnConstraints">}
-#+ Check constraints on the "cotb00031.simbolo" column
-#+
-#+ @param p_simbolo - CHAR(4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00031_simbolo_checkColumnConstraints(p_simbolo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_simbolo LIKE cotb00031.simbolo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00031_simbolo_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00031_tasa_cambio_checkColumnConstraints">}
-#+ Check constraints on the "cotb00031.tasa_cambio" column
-#+
-#+ @param p_tasa_cambio - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00031_tasa_cambio_checkColumnConstraints(p_tasa_cambio)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tasa_cambio LIKE cotb00031.tasa_cambio
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00031_tasa_cambio_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00031_status_t_checkColumnConstraints">}
-#+ Check constraints on the "cotb00031.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00031_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cotb00031.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00031_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00031_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "cotb00031.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00031_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cotb00031.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00031_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00031_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "cotb00031.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00031_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cotb00031.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00031_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00031_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "cotb00031.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00031_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cotb00031.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00031_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00031_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "cotb00031.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00031_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cotb00031.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00031_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00030_checkTableConstraints">}
-#+ Check constraints on the "cotb00030" table
-#+
-#+ @param p_data - a row data LIKE cotb00030.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00030_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cotb00030.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cotb00030_num_oc_checkColumnConstraints(p_data.num_oc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00030_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00030_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00030_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00030_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00030_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00030_checkTableConstraints
-
-{<BLOCK Name="fct.cotb00030_num_oc_checkColumnConstraints">}
-#+ Check constraints on the "cotb00030.num_oc" column
-#+
-#+ @param p_num_oc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00030_num_oc_checkColumnConstraints(p_num_oc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_oc LIKE cotb00030.num_oc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00030_num_oc_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00030_status_t_checkColumnConstraints">}
-#+ Check constraints on the "cotb00030.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00030_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cotb00030.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00030_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00030_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "cotb00030.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00030_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cotb00030.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00030_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00030_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "cotb00030.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00030_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cotb00030.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00030_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00030_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "cotb00030.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00030_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cotb00030.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00030_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00030_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "cotb00030.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00030_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cotb00030.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00030_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00029_checkTableConstraints">}
-#+ Check constraints on the "cotb00029" table
-#+
-#+ @param p_data - a row data LIKE cotb00029.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00029_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cotb00029.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cotb00029_num_oc_checkColumnConstraints(p_data.num_oc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00029_tipo_checkColumnConstraints(p_data.tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00029_cod_sp_checkColumnConstraints(p_data.cod_sp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00029_cod_sp_sec_checkColumnConstraints(p_data.cod_sp_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00029_ship_to_checkColumnConstraints(p_data.ship_to) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00029_n_a_b_checkColumnConstraints(p_data.n_a_b) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00029_c_i_d_checkColumnConstraints(p_data.c_i_d) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00029_c_i_d1_checkColumnConstraints(p_data.c_i_d1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00029_nota_checkColumnConstraints(p_data.nota) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00029_nota1_checkColumnConstraints(p_data.nota1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00029_desc_flete_checkColumnConstraints(p_data.desc_flete) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00029_total_flete_checkColumnConstraints(p_data.total_flete) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00029_desc_valor_checkColumnConstraints(p_data.desc_valor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00029_total_valor_checkColumnConstraints(p_data.total_valor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00029_desc_otro_checkColumnConstraints(p_data.desc_otro) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00029_total_otro_checkColumnConstraints(p_data.total_otro) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00029_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00029_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00029_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00029_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00029_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00029_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00029_checkTableConstraints
-
-{<BLOCK Name="fct.cotb00029_num_oc_checkColumnConstraints">}
-#+ Check constraints on the "cotb00029.num_oc" column
-#+
-#+ @param p_num_oc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00029_num_oc_checkColumnConstraints(p_num_oc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_oc LIKE cotb00029.num_oc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00029_num_oc_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00029_tipo_checkColumnConstraints">}
-#+ Check constraints on the "cotb00029.tipo" column
-#+
-#+ @param p_tipo - CHAR(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00029_tipo_checkColumnConstraints(p_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo LIKE cotb00029.tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00029_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00029_cod_sp_checkColumnConstraints">}
-#+ Check constraints on the "cotb00029.cod_sp" column
-#+
-#+ @param p_cod_sp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00029_cod_sp_checkColumnConstraints(p_cod_sp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sp LIKE cotb00029.cod_sp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00029_cod_sp_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00029_cod_sp_sec_checkColumnConstraints">}
-#+ Check constraints on the "cotb00029.cod_sp_sec" column
-#+
-#+ @param p_cod_sp_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00029_cod_sp_sec_checkColumnConstraints(p_cod_sp_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sp_sec LIKE cotb00029.cod_sp_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00029_cod_sp_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00029_ship_to_checkColumnConstraints">}
-#+ Check constraints on the "cotb00029.ship_to" column
-#+
-#+ @param p_ship_to - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00029_ship_to_checkColumnConstraints(p_ship_to)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ship_to LIKE cotb00029.ship_to
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00029_ship_to_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00029_n_a_b_checkColumnConstraints">}
-#+ Check constraints on the "cotb00029.n_a_b" column
-#+
-#+ @param p_n_a_b - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00029_n_a_b_checkColumnConstraints(p_n_a_b)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_n_a_b LIKE cotb00029.n_a_b
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00029_n_a_b_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00029_c_i_d_checkColumnConstraints">}
-#+ Check constraints on the "cotb00029.c_i_d" column
-#+
-#+ @param p_c_i_d - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00029_c_i_d_checkColumnConstraints(p_c_i_d)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_c_i_d LIKE cotb00029.c_i_d
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00029_c_i_d_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00029_c_i_d1_checkColumnConstraints">}
-#+ Check constraints on the "cotb00029.c_i_d1" column
-#+
-#+ @param p_c_i_d1 - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00029_c_i_d1_checkColumnConstraints(p_c_i_d1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_c_i_d1 LIKE cotb00029.c_i_d1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00029_c_i_d1_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00029_nota_checkColumnConstraints">}
-#+ Check constraints on the "cotb00029.nota" column
-#+
-#+ @param p_nota - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00029_nota_checkColumnConstraints(p_nota)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nota LIKE cotb00029.nota
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00029_nota_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00029_nota1_checkColumnConstraints">}
-#+ Check constraints on the "cotb00029.nota1" column
-#+
-#+ @param p_nota1 - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00029_nota1_checkColumnConstraints(p_nota1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nota1 LIKE cotb00029.nota1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00029_nota1_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00029_desc_flete_checkColumnConstraints">}
-#+ Check constraints on the "cotb00029.desc_flete" column
-#+
-#+ @param p_desc_flete - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00029_desc_flete_checkColumnConstraints(p_desc_flete)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_desc_flete LIKE cotb00029.desc_flete
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00029_desc_flete_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00029_total_flete_checkColumnConstraints">}
-#+ Check constraints on the "cotb00029.total_flete" column
-#+
-#+ @param p_total_flete - DECIMAL(18,0) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00029_total_flete_checkColumnConstraints(p_total_flete)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_total_flete LIKE cotb00029.total_flete
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00029_total_flete_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00029_desc_valor_checkColumnConstraints">}
-#+ Check constraints on the "cotb00029.desc_valor" column
-#+
-#+ @param p_desc_valor - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00029_desc_valor_checkColumnConstraints(p_desc_valor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_desc_valor LIKE cotb00029.desc_valor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00029_desc_valor_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00029_total_valor_checkColumnConstraints">}
-#+ Check constraints on the "cotb00029.total_valor" column
-#+
-#+ @param p_total_valor - DECIMAL(18,0) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00029_total_valor_checkColumnConstraints(p_total_valor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_total_valor LIKE cotb00029.total_valor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00029_total_valor_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00029_desc_otro_checkColumnConstraints">}
-#+ Check constraints on the "cotb00029.desc_otro" column
-#+
-#+ @param p_desc_otro - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00029_desc_otro_checkColumnConstraints(p_desc_otro)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_desc_otro LIKE cotb00029.desc_otro
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00029_desc_otro_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00029_total_otro_checkColumnConstraints">}
-#+ Check constraints on the "cotb00029.total_otro" column
-#+
-#+ @param p_total_otro - DECIMAL(18,0) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00029_total_otro_checkColumnConstraints(p_total_otro)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_total_otro LIKE cotb00029.total_otro
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00029_total_otro_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00029_descripcion_checkColumnConstraints">}
-#+ Check constraints on the "cotb00029.descripcion" column
-#+
-#+ @param p_descripcion - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00029_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE cotb00029.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00029_descripcion_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00029_status_t_checkColumnConstraints">}
-#+ Check constraints on the "cotb00029.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00029_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cotb00029.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00029_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00029_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "cotb00029.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00029_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cotb00029.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00029_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00029_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "cotb00029.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00029_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cotb00029.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00029_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00029_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "cotb00029.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00029_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cotb00029.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00029_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00029_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "cotb00029.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00029_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cotb00029.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00029_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00028_checkTableConstraints">}
-#+ Check constraints on the "cotb00028" table
-#+
-#+ @param p_data - a row data LIKE cotb00028.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00028_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cotb00028.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cotb00028_dia_checkColumnConstraints(p_data.dia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00028_checkTableConstraints
-
-{<BLOCK Name="fct.cotb00028_dia_checkColumnConstraints">}
-#+ Check constraints on the "cotb00028.dia" column
-#+
-#+ @param p_dia - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00028_dia_checkColumnConstraints(p_dia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_dia LIKE cotb00028.dia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00028_dia_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00027_checkTableConstraints">}
-#+ Check constraints on the "cotb00027" table
-#+
-#+ @param p_data - a row data LIKE cotb00027.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00027_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cotb00027.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cotb00027_cod_embarque_checkColumnConstraints(p_data.cod_embarque) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00027_descrip_emb_checkColumnConstraints(p_data.descrip_emb) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00027_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00027_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00027_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00027_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00027_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00027_checkTableConstraints
-
-{<BLOCK Name="fct.cotb00027_cod_embarque_checkColumnConstraints">}
-#+ Check constraints on the "cotb00027.cod_embarque" column
-#+
-#+ @param p_cod_embarque - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00027_cod_embarque_checkColumnConstraints(p_cod_embarque)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_embarque LIKE cotb00027.cod_embarque
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_embarque IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_embarque: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00027_cod_embarque_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00027_descrip_emb_checkColumnConstraints">}
-#+ Check constraints on the "cotb00027.descrip_emb" column
-#+
-#+ @param p_descrip_emb - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00027_descrip_emb_checkColumnConstraints(p_descrip_emb)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descrip_emb LIKE cotb00027.descrip_emb
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00027_descrip_emb_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00027_status_t_checkColumnConstraints">}
-#+ Check constraints on the "cotb00027.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00027_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cotb00027.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00027_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00027_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "cotb00027.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00027_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cotb00027.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00027_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00027_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "cotb00027.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00027_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cotb00027.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00027_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00027_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "cotb00027.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00027_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cotb00027.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00027_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00027_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "cotb00027.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00027_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cotb00027.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00027_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00025_checkTableConstraints">}
-#+ Check constraints on the "cotb00025" table
-#+
-#+ @param p_data - a row data LIKE cotb00025.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00025_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cotb00025.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cotb00025_num_oc_checkColumnConstraints(p_data.num_oc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00025_tipo_checkColumnConstraints(p_data.tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00025_num_req_checkColumnConstraints(p_data.num_req) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00025_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00025_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00025_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00025_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00025_fech_emb_checkColumnConstraints(p_data.fech_emb) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00025_fech_ent_checkColumnConstraints(p_data.fech_ent) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00025_fecha_a_checkColumnConstraints(p_data.fecha_a) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00025_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00025_cantidad_r_checkColumnConstraints(p_data.cantidad_r) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00025_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00025_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00025_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00025_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00025_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00025_checkTableConstraints
-
-{<BLOCK Name="fct.cotb00025_num_oc_checkColumnConstraints">}
-#+ Check constraints on the "cotb00025.num_oc" column
-#+
-#+ @param p_num_oc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00025_num_oc_checkColumnConstraints(p_num_oc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_oc LIKE cotb00025.num_oc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00025_num_oc_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00025_tipo_checkColumnConstraints">}
-#+ Check constraints on the "cotb00025.tipo" column
-#+
-#+ @param p_tipo - CHAR(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00025_tipo_checkColumnConstraints(p_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo LIKE cotb00025.tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00025_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00025_num_req_checkColumnConstraints">}
-#+ Check constraints on the "cotb00025.num_req" column
-#+
-#+ @param p_num_req - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00025_num_req_checkColumnConstraints(p_num_req)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_req LIKE cotb00025.num_req
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_num_req IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- num_req: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00025_num_req_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00025_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "cotb00025.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00025_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE cotb00025.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00025_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00025_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "cotb00025.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00025_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE cotb00025.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00025_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00025_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "cotb00025.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00025_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE cotb00025.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00025_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00025_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "cotb00025.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00025_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE cotb00025.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00025_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00025_fech_emb_checkColumnConstraints">}
-#+ Check constraints on the "cotb00025.fech_emb" column
-#+
-#+ @param p_fech_emb - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00025_fech_emb_checkColumnConstraints(p_fech_emb)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_emb LIKE cotb00025.fech_emb
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00025_fech_emb_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00025_fech_ent_checkColumnConstraints">}
-#+ Check constraints on the "cotb00025.fech_ent" column
-#+
-#+ @param p_fech_ent - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00025_fech_ent_checkColumnConstraints(p_fech_ent)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_ent LIKE cotb00025.fech_ent
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00025_fech_ent_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00025_fecha_a_checkColumnConstraints">}
-#+ Check constraints on the "cotb00025.fecha_a" column
-#+
-#+ @param p_fecha_a - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00025_fecha_a_checkColumnConstraints(p_fecha_a)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_a LIKE cotb00025.fecha_a
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00025_fecha_a_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00025_cantidad_checkColumnConstraints">}
-#+ Check constraints on the "cotb00025.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00025_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE cotb00025.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00025_cantidad_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00025_cantidad_r_checkColumnConstraints">}
-#+ Check constraints on the "cotb00025.cantidad_r" column
-#+
-#+ @param p_cantidad_r - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00025_cantidad_r_checkColumnConstraints(p_cantidad_r)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad_r LIKE cotb00025.cantidad_r
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00025_cantidad_r_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00025_status_t_checkColumnConstraints">}
-#+ Check constraints on the "cotb00025.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00025_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cotb00025.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00025_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00025_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "cotb00025.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00025_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cotb00025.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00025_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00025_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "cotb00025.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00025_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cotb00025.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00025_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00025_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "cotb00025.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00025_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cotb00025.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00025_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00025_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "cotb00025.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00025_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cotb00025.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00025_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00024_checkTableConstraints">}
-#+ Check constraints on the "cotb00024" table
-#+
-#+ @param p_data - a row data LIKE cotb00024.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00024_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cotb00024.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cotb00024_term_sp_checkColumnConstraints(p_data.term_sp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00024_descrip_term_checkColumnConstraints(p_data.descrip_term) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00024_descrip_ting_checkColumnConstraints(p_data.descrip_ting) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00024_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00024_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00024_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00024_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00024_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00024_checkTableConstraints
-
-{<BLOCK Name="fct.cotb00024_term_sp_checkColumnConstraints">}
-#+ Check constraints on the "cotb00024.term_sp" column
-#+
-#+ @param p_term_sp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00024_term_sp_checkColumnConstraints(p_term_sp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_term_sp LIKE cotb00024.term_sp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00024_term_sp_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00024_descrip_term_checkColumnConstraints">}
-#+ Check constraints on the "cotb00024.descrip_term" column
-#+
-#+ @param p_descrip_term - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00024_descrip_term_checkColumnConstraints(p_descrip_term)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descrip_term LIKE cotb00024.descrip_term
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00024_descrip_term_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00024_descrip_ting_checkColumnConstraints">}
-#+ Check constraints on the "cotb00024.descrip_ting" column
-#+
-#+ @param p_descrip_ting - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00024_descrip_ting_checkColumnConstraints(p_descrip_ting)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descrip_ting LIKE cotb00024.descrip_ting
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00024_descrip_ting_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00024_status_t_checkColumnConstraints">}
-#+ Check constraints on the "cotb00024.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00024_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cotb00024.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00024_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00024_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "cotb00024.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00024_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cotb00024.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00024_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00024_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "cotb00024.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00024_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cotb00024.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00024_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00024_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "cotb00024.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00024_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cotb00024.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00024_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00024_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "cotb00024.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00024_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cotb00024.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00024_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00022_checkTableConstraints">}
-#+ Check constraints on the "cotb00022" table
-#+
-#+ @param p_data - a row data LIKE cotb00022.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00022_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cotb00022.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cotb00022_cod_ca_checkColumnConstraints(p_data.cod_ca) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00022_nom_ca_checkColumnConstraints(p_data.nom_ca) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00022_poliza_checkColumnConstraints(p_data.poliza) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00022_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00022_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00022_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00022_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00022_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00022_checkTableConstraints
-
-{<BLOCK Name="fct.cotb00022_cod_ca_checkColumnConstraints">}
-#+ Check constraints on the "cotb00022.cod_ca" column
-#+
-#+ @param p_cod_ca - CHAR(4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00022_cod_ca_checkColumnConstraints(p_cod_ca)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_ca LIKE cotb00022.cod_ca
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00022_cod_ca_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00022_nom_ca_checkColumnConstraints">}
-#+ Check constraints on the "cotb00022.nom_ca" column
-#+
-#+ @param p_nom_ca - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00022_nom_ca_checkColumnConstraints(p_nom_ca)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nom_ca LIKE cotb00022.nom_ca
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00022_nom_ca_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00022_poliza_checkColumnConstraints">}
-#+ Check constraints on the "cotb00022.poliza" column
-#+
-#+ @param p_poliza - CHAR(15) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00022_poliza_checkColumnConstraints(p_poliza)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_poliza LIKE cotb00022.poliza
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00022_poliza_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00022_status_t_checkColumnConstraints">}
-#+ Check constraints on the "cotb00022.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00022_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cotb00022.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00022_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00022_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "cotb00022.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00022_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cotb00022.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00022_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00022_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "cotb00022.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00022_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cotb00022.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00022_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00022_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "cotb00022.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00022_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cotb00022.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00022_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00022_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "cotb00022.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00022_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cotb00022.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00022_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00019_checkTableConstraints">}
-#+ Check constraints on the "cotb00019" table
-#+
-#+ @param p_data - a row data LIKE cotb00019.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00019_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cotb00019.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cotb00019_cod_pt_checkColumnConstraints(p_data.cod_pt) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00019_nom_pt_checkColumnConstraints(p_data.nom_pt) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00019_cod_pais_checkColumnConstraints(p_data.cod_pais) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00019_ciudad_checkColumnConstraints(p_data.ciudad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00019_duracion_checkColumnConstraints(p_data.duracion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00019_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00019_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00019_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00019_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00019_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00019_checkTableConstraints
-
-{<BLOCK Name="fct.cotb00019_cod_pt_checkColumnConstraints">}
-#+ Check constraints on the "cotb00019.cod_pt" column
-#+
-#+ @param p_cod_pt - CHAR(4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00019_cod_pt_checkColumnConstraints(p_cod_pt)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_pt LIKE cotb00019.cod_pt
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00019_cod_pt_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00019_nom_pt_checkColumnConstraints">}
-#+ Check constraints on the "cotb00019.nom_pt" column
-#+
-#+ @param p_nom_pt - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00019_nom_pt_checkColumnConstraints(p_nom_pt)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nom_pt LIKE cotb00019.nom_pt
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00019_nom_pt_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00019_cod_pais_checkColumnConstraints">}
-#+ Check constraints on the "cotb00019.cod_pais" column
-#+
-#+ @param p_cod_pais - CHAR(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00019_cod_pais_checkColumnConstraints(p_cod_pais)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_pais LIKE cotb00019.cod_pais
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00019_cod_pais_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00019_ciudad_checkColumnConstraints">}
-#+ Check constraints on the "cotb00019.ciudad" column
-#+
-#+ @param p_ciudad - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00019_ciudad_checkColumnConstraints(p_ciudad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ciudad LIKE cotb00019.ciudad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00019_ciudad_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00019_duracion_checkColumnConstraints">}
-#+ Check constraints on the "cotb00019.duracion" column
-#+
-#+ @param p_duracion - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00019_duracion_checkColumnConstraints(p_duracion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_duracion LIKE cotb00019.duracion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00019_duracion_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00019_status_t_checkColumnConstraints">}
-#+ Check constraints on the "cotb00019.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00019_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cotb00019.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00019_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00019_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "cotb00019.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00019_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cotb00019.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00019_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00019_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "cotb00019.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00019_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cotb00019.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00019_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00019_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "cotb00019.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00019_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cotb00019.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00019_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00019_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "cotb00019.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00019_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cotb00019.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00019_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00018_checkTableConstraints">}
-#+ Check constraints on the "cotb00018" table
-#+
-#+ @param p_data - a row data LIKE cotb00018.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00018_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cotb00018.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cotb00018_cod_pais_checkColumnConstraints(p_data.cod_pais) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00018_nom_pais_checkColumnConstraints(p_data.nom_pais) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00018_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00018_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00018_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00018_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00018_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- CALL smarmotech_dbxconstraints_cotb00018_pk_cotb00018_checkUniqueConstraint(p_forUpdate, p_data.cod_pais) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00018_checkTableConstraints
-
-{<BLOCK Name="fct.cotb00018_pk_cotb00018_checkUniqueConstraint">}
-#+ Check the primary key uniqueness constraint on the "cotb00018"
-#+
-#+ @param p_key - Primary Key
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00018_pk_cotb00018_checkUniqueConstraint(p_forUpdate, p_key)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_key
- RECORD
- cotb00018_cod_pais LIKE cotb00018.cod_pais
- END RECORD
- DEFINE l_key
- RECORD
- cotb00018_cod_pais LIKE cotb00018.cod_pais
- END RECORD
- DEFINE l_where STRING
- DEFINE l_sqlQuery STRING
- DEFINE l_count INTEGER
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- LET l_where = "WHERE cotb00018.cod_pais = ? "
-
- let l_sqlQuery = "SELECT COUNT(*), cod_pais FROM cotb00018 ", l_where, " GROUP BY cod_pais"
-
- PREPARE cur_cotb00018_pk_cotb00018_checkUniqueConstraint FROM l_sqlQuery
- EXECUTE cur_cotb00018_pk_cotb00018_checkUniqueConstraint INTO l_count, l_key.* USING p_key.*
- FREE cur_cotb00018_pk_cotb00018_checkUniqueConstraint
- IF (NOT p_forUpdate AND l_count > 0) OR (p_forUpdate AND l_count > 0 AND p_key.* != l_key.*) THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_pais: " || ERROR_BAM_00002) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00018_pk_cotb00018_checkUniqueConstraint
-
-{<BLOCK Name="fct.cotb00018_cod_pais_checkColumnConstraints">}
-#+ Check constraints on the "cotb00018.cod_pais" column
-#+
-#+ @param p_cod_pais - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00018_cod_pais_checkColumnConstraints(p_cod_pais)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_pais LIKE cotb00018.cod_pais
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_pais IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_pais: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00018_cod_pais_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00018_nom_pais_checkColumnConstraints">}
-#+ Check constraints on the "cotb00018.nom_pais" column
-#+
-#+ @param p_nom_pais - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00018_nom_pais_checkColumnConstraints(p_nom_pais)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nom_pais LIKE cotb00018.nom_pais
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00018_nom_pais_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00018_status_t_checkColumnConstraints">}
-#+ Check constraints on the "cotb00018.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00018_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cotb00018.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00018_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00018_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "cotb00018.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00018_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cotb00018.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00018_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00018_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "cotb00018.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00018_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cotb00018.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00018_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00018_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "cotb00018.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00018_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cotb00018.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00018_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00018_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "cotb00018.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00018_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cotb00018.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00018_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00017_checkTableConstraints">}
-#+ Check constraints on the "cotb00017" table
-#+
-#+ @param p_data - a row data LIKE cotb00017.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00017_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cotb00017.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cotb00017_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00017_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00017_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00017_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00017_procedencia_checkColumnConstraints(p_data.procedencia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00017_cod_pt_checkColumnConstraints(p_data.cod_pt) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00017_via_t_checkColumnConstraints(p_data.via_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00017_seguro_checkColumnConstraints(p_data.seguro) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00017_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00017_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00017_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00017_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00017_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00017_checkTableConstraints
-
-{<BLOCK Name="fct.cotb00017_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "cotb00017.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00017_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE cotb00017.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00017_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00017_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "cotb00017.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00017_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE cotb00017.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00017_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00017_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "cotb00017.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00017_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE cotb00017.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00017_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00017_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "cotb00017.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00017_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE cotb00017.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00017_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00017_procedencia_checkColumnConstraints">}
-#+ Check constraints on the "cotb00017.procedencia" column
-#+
-#+ @param p_procedencia - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00017_procedencia_checkColumnConstraints(p_procedencia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_procedencia LIKE cotb00017.procedencia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00017_procedencia_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00017_cod_pt_checkColumnConstraints">}
-#+ Check constraints on the "cotb00017.cod_pt" column
-#+
-#+ @param p_cod_pt - CHAR(4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00017_cod_pt_checkColumnConstraints(p_cod_pt)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_pt LIKE cotb00017.cod_pt
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00017_cod_pt_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00017_via_t_checkColumnConstraints">}
-#+ Check constraints on the "cotb00017.via_t" column
-#+
-#+ @param p_via_t - CHAR(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00017_via_t_checkColumnConstraints(p_via_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_via_t LIKE cotb00017.via_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00017_via_t_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00017_seguro_checkColumnConstraints">}
-#+ Check constraints on the "cotb00017.seguro" column
-#+
-#+ @param p_seguro - DECIMAL(5,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00017_seguro_checkColumnConstraints(p_seguro)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_seguro LIKE cotb00017.seguro
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00017_seguro_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00017_status_t_checkColumnConstraints">}
-#+ Check constraints on the "cotb00017.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00017_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cotb00017.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00017_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00017_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "cotb00017.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00017_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cotb00017.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00017_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00017_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "cotb00017.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00017_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cotb00017.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00017_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00017_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "cotb00017.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00017_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cotb00017.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00017_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00017_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "cotb00017.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00017_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cotb00017.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00017_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00015_checkTableConstraints">}
-#+ Check constraints on the "cotb00015" table
-#+
-#+ @param p_data - a row data LIKE cotb00015.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00015_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cotb00015.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cotb00015_num_oc_checkColumnConstraints(p_data.num_oc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00015_num_req_checkColumnConstraints(p_data.num_req) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00015_tipo_checkColumnConstraints(p_data.tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00015_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00015_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00015_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00015_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00015_num_parte_checkColumnConstraints(p_data.num_parte) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00015_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00015_precio_checkColumnConstraints(p_data.precio) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00015_cod_mon_checkColumnConstraints(p_data.cod_mon) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00015_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00015_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00015_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00015_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00015_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00015_checkTableConstraints
-
-{<BLOCK Name="fct.cotb00015_num_oc_checkColumnConstraints">}
-#+ Check constraints on the "cotb00015.num_oc" column
-#+
-#+ @param p_num_oc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00015_num_oc_checkColumnConstraints(p_num_oc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_oc LIKE cotb00015.num_oc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00015_num_oc_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00015_num_req_checkColumnConstraints">}
-#+ Check constraints on the "cotb00015.num_req" column
-#+
-#+ @param p_num_req - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00015_num_req_checkColumnConstraints(p_num_req)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_req LIKE cotb00015.num_req
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00015_num_req_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00015_tipo_checkColumnConstraints">}
-#+ Check constraints on the "cotb00015.tipo" column
-#+
-#+ @param p_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00015_tipo_checkColumnConstraints(p_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo LIKE cotb00015.tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00015_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00015_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "cotb00015.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00015_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE cotb00015.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00015_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00015_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "cotb00015.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00015_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE cotb00015.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00015_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00015_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "cotb00015.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00015_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE cotb00015.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00015_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00015_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "cotb00015.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00015_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE cotb00015.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00015_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00015_num_parte_checkColumnConstraints">}
-#+ Check constraints on the "cotb00015.num_parte" column
-#+
-#+ @param p_num_parte - CHAR(12) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00015_num_parte_checkColumnConstraints(p_num_parte)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_parte LIKE cotb00015.num_parte
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00015_num_parte_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00015_cantidad_checkColumnConstraints">}
-#+ Check constraints on the "cotb00015.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00015_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE cotb00015.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00015_cantidad_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00015_precio_checkColumnConstraints">}
-#+ Check constraints on the "cotb00015.precio" column
-#+
-#+ @param p_precio - DECIMAL(11,3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00015_precio_checkColumnConstraints(p_precio)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_precio LIKE cotb00015.precio
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00015_precio_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00015_cod_mon_checkColumnConstraints">}
-#+ Check constraints on the "cotb00015.cod_mon" column
-#+
-#+ @param p_cod_mon - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00015_cod_mon_checkColumnConstraints(p_cod_mon)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mon LIKE cotb00015.cod_mon
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00015_cod_mon_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00015_status_t_checkColumnConstraints">}
-#+ Check constraints on the "cotb00015.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00015_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cotb00015.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00015_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00015_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "cotb00015.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00015_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cotb00015.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00015_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00015_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "cotb00015.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00015_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cotb00015.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00015_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00015_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "cotb00015.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00015_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cotb00015.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00015_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00015_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "cotb00015.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00015_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cotb00015.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00015_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00014_checkTableConstraints">}
-#+ Check constraints on the "cotb00014" table
-#+
-#+ @param p_data - a row data LIKE cotb00014.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00014_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cotb00014.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cotb00014_num_oc_checkColumnConstraints(p_data.num_oc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00014_tipo_checkColumnConstraints(p_data.tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00014_fech_oc_checkColumnConstraints(p_data.fech_oc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00014_num_pr_checkColumnConstraints(p_data.num_pr) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00014_cod_sp_checkColumnConstraints(p_data.cod_sp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00014_cod_sp_sec_checkColumnConstraints(p_data.cod_sp_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00014_term_sp_checkColumnConstraints(p_data.term_sp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00014_via_checkColumnConstraints(p_data.via) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00014_enviada_checkColumnConstraints(p_data.enviada) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00014_fech_enviada_checkColumnConstraints(p_data.fech_enviada) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00014_pago_checkColumnConstraints(p_data.pago) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00014_fech_pago_checkColumnConstraints(p_data.fech_pago) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00014_cierre_checkColumnConstraints(p_data.cierre) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00014_cod_pt_checkColumnConstraints(p_data.cod_pt) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00014_c_flete_checkColumnConstraints(p_data.c_flete) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00014_otros_g_checkColumnConstraints(p_data.otros_g) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00014_detalle_checkColumnConstraints(p_data.detalle) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00014_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00014_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00014_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00014_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00014_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00014_checkTableConstraints
-
-{<BLOCK Name="fct.cotb00014_num_oc_checkColumnConstraints">}
-#+ Check constraints on the "cotb00014.num_oc" column
-#+
-#+ @param p_num_oc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00014_num_oc_checkColumnConstraints(p_num_oc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_oc LIKE cotb00014.num_oc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_num_oc IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- num_oc: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00014_num_oc_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00014_tipo_checkColumnConstraints">}
-#+ Check constraints on the "cotb00014.tipo" column
-#+
-#+ @param p_tipo - CHAR(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00014_tipo_checkColumnConstraints(p_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo LIKE cotb00014.tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00014_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00014_fech_oc_checkColumnConstraints">}
-#+ Check constraints on the "cotb00014.fech_oc" column
-#+
-#+ @param p_fech_oc - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00014_fech_oc_checkColumnConstraints(p_fech_oc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_oc LIKE cotb00014.fech_oc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00014_fech_oc_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00014_num_pr_checkColumnConstraints">}
-#+ Check constraints on the "cotb00014.num_pr" column
-#+
-#+ @param p_num_pr - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00014_num_pr_checkColumnConstraints(p_num_pr)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_pr LIKE cotb00014.num_pr
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00014_num_pr_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00014_cod_sp_checkColumnConstraints">}
-#+ Check constraints on the "cotb00014.cod_sp" column
-#+
-#+ @param p_cod_sp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00014_cod_sp_checkColumnConstraints(p_cod_sp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sp LIKE cotb00014.cod_sp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00014_cod_sp_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00014_cod_sp_sec_checkColumnConstraints">}
-#+ Check constraints on the "cotb00014.cod_sp_sec" column
-#+
-#+ @param p_cod_sp_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00014_cod_sp_sec_checkColumnConstraints(p_cod_sp_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sp_sec LIKE cotb00014.cod_sp_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00014_cod_sp_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00014_term_sp_checkColumnConstraints">}
-#+ Check constraints on the "cotb00014.term_sp" column
-#+
-#+ @param p_term_sp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00014_term_sp_checkColumnConstraints(p_term_sp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_term_sp LIKE cotb00014.term_sp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00014_term_sp_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00014_via_checkColumnConstraints">}
-#+ Check constraints on the "cotb00014.via" column
-#+
-#+ @param p_via - CHAR(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00014_via_checkColumnConstraints(p_via)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_via LIKE cotb00014.via
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00014_via_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00014_enviada_checkColumnConstraints">}
-#+ Check constraints on the "cotb00014.enviada" column
-#+
-#+ @param p_enviada - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00014_enviada_checkColumnConstraints(p_enviada)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_enviada LIKE cotb00014.enviada
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00014_enviada_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00014_fech_enviada_checkColumnConstraints">}
-#+ Check constraints on the "cotb00014.fech_enviada" column
-#+
-#+ @param p_fech_enviada - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00014_fech_enviada_checkColumnConstraints(p_fech_enviada)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_enviada LIKE cotb00014.fech_enviada
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00014_fech_enviada_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00014_pago_checkColumnConstraints">}
-#+ Check constraints on the "cotb00014.pago" column
-#+
-#+ @param p_pago - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00014_pago_checkColumnConstraints(p_pago)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_pago LIKE cotb00014.pago
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00014_pago_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00014_fech_pago_checkColumnConstraints">}
-#+ Check constraints on the "cotb00014.fech_pago" column
-#+
-#+ @param p_fech_pago - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00014_fech_pago_checkColumnConstraints(p_fech_pago)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_pago LIKE cotb00014.fech_pago
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00014_fech_pago_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00014_cierre_checkColumnConstraints">}
-#+ Check constraints on the "cotb00014.cierre" column
-#+
-#+ @param p_cierre - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00014_cierre_checkColumnConstraints(p_cierre)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cierre LIKE cotb00014.cierre
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00014_cierre_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00014_cod_pt_checkColumnConstraints">}
-#+ Check constraints on the "cotb00014.cod_pt" column
-#+
-#+ @param p_cod_pt - CHAR(4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00014_cod_pt_checkColumnConstraints(p_cod_pt)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_pt LIKE cotb00014.cod_pt
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00014_cod_pt_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00014_c_flete_checkColumnConstraints">}
-#+ Check constraints on the "cotb00014.c_flete" column
-#+
-#+ @param p_c_flete - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00014_c_flete_checkColumnConstraints(p_c_flete)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_c_flete LIKE cotb00014.c_flete
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00014_c_flete_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00014_otros_g_checkColumnConstraints">}
-#+ Check constraints on the "cotb00014.otros_g" column
-#+
-#+ @param p_otros_g - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00014_otros_g_checkColumnConstraints(p_otros_g)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_otros_g LIKE cotb00014.otros_g
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00014_otros_g_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00014_detalle_checkColumnConstraints">}
-#+ Check constraints on the "cotb00014.detalle" column
-#+
-#+ @param p_detalle - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00014_detalle_checkColumnConstraints(p_detalle)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_detalle LIKE cotb00014.detalle
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00014_detalle_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00014_status_t_checkColumnConstraints">}
-#+ Check constraints on the "cotb00014.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00014_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cotb00014.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00014_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00014_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "cotb00014.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00014_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cotb00014.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00014_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00014_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "cotb00014.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00014_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cotb00014.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00014_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00014_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "cotb00014.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00014_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cotb00014.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00014_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00014_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "cotb00014.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00014_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cotb00014.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00014_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00013_checkTableConstraints">}
-#+ Check constraints on the "cotb00013" table
-#+
-#+ @param p_data - a row data LIKE cotb00013.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00013_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cotb00013.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cotb00013_num_pr_checkColumnConstraints(p_data.num_pr) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00013_tipo_checkColumnConstraints(p_data.tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00013_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00013_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00013_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00013_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00013_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00013_costo_mp_checkColumnConstraints(p_data.costo_mp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00013_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00013_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00013_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00013_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00013_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00013_checkTableConstraints
-
-{<BLOCK Name="fct.cotb00013_num_pr_checkColumnConstraints">}
-#+ Check constraints on the "cotb00013.num_pr" column
-#+
-#+ @param p_num_pr - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00013_num_pr_checkColumnConstraints(p_num_pr)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_pr LIKE cotb00013.num_pr
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00013_num_pr_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00013_tipo_checkColumnConstraints">}
-#+ Check constraints on the "cotb00013.tipo" column
-#+
-#+ @param p_tipo - CHAR(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00013_tipo_checkColumnConstraints(p_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo LIKE cotb00013.tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00013_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00013_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "cotb00013.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00013_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE cotb00013.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00013_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00013_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "cotb00013.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00013_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE cotb00013.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00013_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00013_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "cotb00013.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00013_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE cotb00013.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00013_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00013_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "cotb00013.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00013_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE cotb00013.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00013_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00013_cantidad_checkColumnConstraints">}
-#+ Check constraints on the "cotb00013.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00013_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE cotb00013.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00013_cantidad_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00013_costo_mp_checkColumnConstraints">}
-#+ Check constraints on the "cotb00013.costo_mp" column
-#+
-#+ @param p_costo_mp - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00013_costo_mp_checkColumnConstraints(p_costo_mp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_costo_mp LIKE cotb00013.costo_mp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00013_costo_mp_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00013_status_t_checkColumnConstraints">}
-#+ Check constraints on the "cotb00013.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00013_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cotb00013.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00013_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00013_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "cotb00013.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00013_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cotb00013.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00013_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00013_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "cotb00013.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00013_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cotb00013.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00013_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00013_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "cotb00013.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00013_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cotb00013.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00013_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00013_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "cotb00013.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00013_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cotb00013.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00013_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00012_checkTableConstraints">}
-#+ Check constraints on the "cotb00012" table
-#+
-#+ @param p_data - a row data LIKE cotb00012.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00012_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cotb00012.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cotb00012_num_pr_checkColumnConstraints(p_data.num_pr) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00012_tipo_checkColumnConstraints(p_data.tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00012_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00012_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00012_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00012_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00012_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00012_costo_mp_checkColumnConstraints(p_data.costo_mp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00012_fech_emb_checkColumnConstraints(p_data.fech_emb) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00012_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00012_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00012_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00012_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00012_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00012_checkTableConstraints
-
-{<BLOCK Name="fct.cotb00012_num_pr_checkColumnConstraints">}
-#+ Check constraints on the "cotb00012.num_pr" column
-#+
-#+ @param p_num_pr - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00012_num_pr_checkColumnConstraints(p_num_pr)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_pr LIKE cotb00012.num_pr
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00012_num_pr_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00012_tipo_checkColumnConstraints">}
-#+ Check constraints on the "cotb00012.tipo" column
-#+
-#+ @param p_tipo - CHAR(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00012_tipo_checkColumnConstraints(p_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo LIKE cotb00012.tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00012_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00012_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "cotb00012.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00012_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE cotb00012.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00012_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00012_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "cotb00012.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00012_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE cotb00012.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00012_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00012_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "cotb00012.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00012_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE cotb00012.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00012_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00012_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "cotb00012.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00012_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE cotb00012.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00012_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00012_cantidad_checkColumnConstraints">}
-#+ Check constraints on the "cotb00012.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00012_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE cotb00012.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00012_cantidad_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00012_costo_mp_checkColumnConstraints">}
-#+ Check constraints on the "cotb00012.costo_mp" column
-#+
-#+ @param p_costo_mp - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00012_costo_mp_checkColumnConstraints(p_costo_mp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_costo_mp LIKE cotb00012.costo_mp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00012_costo_mp_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00012_fech_emb_checkColumnConstraints">}
-#+ Check constraints on the "cotb00012.fech_emb" column
-#+
-#+ @param p_fech_emb - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00012_fech_emb_checkColumnConstraints(p_fech_emb)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_emb LIKE cotb00012.fech_emb
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00012_fech_emb_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00012_status_t_checkColumnConstraints">}
-#+ Check constraints on the "cotb00012.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00012_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cotb00012.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00012_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00012_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "cotb00012.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00012_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cotb00012.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00012_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00012_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "cotb00012.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00012_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cotb00012.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00012_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00012_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "cotb00012.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00012_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cotb00012.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00012_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00012_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "cotb00012.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00012_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cotb00012.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00012_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00011_checkTableConstraints">}
-#+ Check constraints on the "cotb00011" table
-#+
-#+ @param p_data - a row data LIKE cotb00011.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00011_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cotb00011.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cotb00011_num_pr_checkColumnConstraints(p_data.num_pr) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00011_cod_sp_checkColumnConstraints(p_data.cod_sp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00011_cod_sp_sec_checkColumnConstraints(p_data.cod_sp_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00011_cod_pais_checkColumnConstraints(p_data.cod_pais) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00011_cod_pt_checkColumnConstraints(p_data.cod_pt) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00011_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00011_flete_checkColumnConstraints(p_data.flete) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00011_decl_cons_checkColumnConstraints(p_data.decl_cons) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00011_otros_imp_checkColumnConstraints(p_data.otros_imp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00011_term_sp_checkColumnConstraints(p_data.term_sp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00011_descrip_term_checkColumnConstraints(p_data.descrip_term) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00011_via_checkColumnConstraints(p_data.via) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00011_procesada_checkColumnConstraints(p_data.procesada) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00011_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00011_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00011_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00011_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00011_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00011_checkTableConstraints
-
-{<BLOCK Name="fct.cotb00011_num_pr_checkColumnConstraints">}
-#+ Check constraints on the "cotb00011.num_pr" column
-#+
-#+ @param p_num_pr - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00011_num_pr_checkColumnConstraints(p_num_pr)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_pr LIKE cotb00011.num_pr
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00011_num_pr_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00011_cod_sp_checkColumnConstraints">}
-#+ Check constraints on the "cotb00011.cod_sp" column
-#+
-#+ @param p_cod_sp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00011_cod_sp_checkColumnConstraints(p_cod_sp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sp LIKE cotb00011.cod_sp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00011_cod_sp_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00011_cod_sp_sec_checkColumnConstraints">}
-#+ Check constraints on the "cotb00011.cod_sp_sec" column
-#+
-#+ @param p_cod_sp_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00011_cod_sp_sec_checkColumnConstraints(p_cod_sp_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sp_sec LIKE cotb00011.cod_sp_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00011_cod_sp_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00011_cod_pais_checkColumnConstraints">}
-#+ Check constraints on the "cotb00011.cod_pais" column
-#+
-#+ @param p_cod_pais - CHAR(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00011_cod_pais_checkColumnConstraints(p_cod_pais)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_pais LIKE cotb00011.cod_pais
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00011_cod_pais_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00011_cod_pt_checkColumnConstraints">}
-#+ Check constraints on the "cotb00011.cod_pt" column
-#+
-#+ @param p_cod_pt - CHAR(4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00011_cod_pt_checkColumnConstraints(p_cod_pt)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_pt LIKE cotb00011.cod_pt
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00011_cod_pt_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00011_fecha_checkColumnConstraints">}
-#+ Check constraints on the "cotb00011.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00011_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE cotb00011.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00011_fecha_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00011_flete_checkColumnConstraints">}
-#+ Check constraints on the "cotb00011.flete" column
-#+
-#+ @param p_flete - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00011_flete_checkColumnConstraints(p_flete)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_flete LIKE cotb00011.flete
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00011_flete_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00011_decl_cons_checkColumnConstraints">}
-#+ Check constraints on the "cotb00011.decl_cons" column
-#+
-#+ @param p_decl_cons - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00011_decl_cons_checkColumnConstraints(p_decl_cons)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_decl_cons LIKE cotb00011.decl_cons
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00011_decl_cons_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00011_otros_imp_checkColumnConstraints">}
-#+ Check constraints on the "cotb00011.otros_imp" column
-#+
-#+ @param p_otros_imp - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00011_otros_imp_checkColumnConstraints(p_otros_imp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_otros_imp LIKE cotb00011.otros_imp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00011_otros_imp_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00011_term_sp_checkColumnConstraints">}
-#+ Check constraints on the "cotb00011.term_sp" column
-#+
-#+ @param p_term_sp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00011_term_sp_checkColumnConstraints(p_term_sp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_term_sp LIKE cotb00011.term_sp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00011_term_sp_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00011_descrip_term_checkColumnConstraints">}
-#+ Check constraints on the "cotb00011.descrip_term" column
-#+
-#+ @param p_descrip_term - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00011_descrip_term_checkColumnConstraints(p_descrip_term)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descrip_term LIKE cotb00011.descrip_term
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00011_descrip_term_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00011_via_checkColumnConstraints">}
-#+ Check constraints on the "cotb00011.via" column
-#+
-#+ @param p_via - CHAR(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00011_via_checkColumnConstraints(p_via)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_via LIKE cotb00011.via
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00011_via_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00011_procesada_checkColumnConstraints">}
-#+ Check constraints on the "cotb00011.procesada" column
-#+
-#+ @param p_procesada - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00011_procesada_checkColumnConstraints(p_procesada)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_procesada LIKE cotb00011.procesada
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00011_procesada_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00011_status_t_checkColumnConstraints">}
-#+ Check constraints on the "cotb00011.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00011_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cotb00011.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00011_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00011_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "cotb00011.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00011_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cotb00011.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00011_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00011_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "cotb00011.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00011_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cotb00011.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00011_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00011_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "cotb00011.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00011_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cotb00011.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00011_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00011_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "cotb00011.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00011_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cotb00011.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00011_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00010_checkTableConstraints">}
-#+ Check constraints on the "cotb00010" table
-#+
-#+ @param p_data - a row data LIKE cotb00010.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00010_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cotb00010.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cotb00010_tipo_checkColumnConstraints(p_data.tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00010_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00010_checkTableConstraints
-
-{<BLOCK Name="fct.cotb00010_tipo_checkColumnConstraints">}
-#+ Check constraints on the "cotb00010.tipo" column
-#+
-#+ @param p_tipo - CHAR(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00010_tipo_checkColumnConstraints(p_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo LIKE cotb00010.tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00010_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00010_descripcion_checkColumnConstraints">}
-#+ Check constraints on the "cotb00010.descripcion" column
-#+
-#+ @param p_descripcion - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00010_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE cotb00010.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00010_descripcion_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00008_checkTableConstraints">}
-#+ Check constraints on the "cotb00008" table
-#+
-#+ @param p_data - a row data LIKE cotb00008.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00008_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cotb00008.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cotb00008_num_req_checkColumnConstraints(p_data.num_req) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00008_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00008_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00008_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00008_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00008_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00008_cod_sp_checkColumnConstraints(p_data.cod_sp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00008_cod_sp_sec_checkColumnConstraints(p_data.cod_sp_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00008_precio_checkColumnConstraints(p_data.precio) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00008_procesada_checkColumnConstraints(p_data.procesada) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00008_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00008_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00008_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00008_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00008_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00008_checkTableConstraints
-
-{<BLOCK Name="fct.cotb00008_num_req_checkColumnConstraints">}
-#+ Check constraints on the "cotb00008.num_req" column
-#+
-#+ @param p_num_req - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00008_num_req_checkColumnConstraints(p_num_req)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_req LIKE cotb00008.num_req
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00008_num_req_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00008_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "cotb00008.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00008_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE cotb00008.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00008_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00008_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "cotb00008.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00008_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE cotb00008.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00008_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00008_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "cotb00008.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00008_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE cotb00008.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00008_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00008_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "cotb00008.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00008_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE cotb00008.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00008_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00008_cantidad_checkColumnConstraints">}
-#+ Check constraints on the "cotb00008.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00008_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE cotb00008.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00008_cantidad_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00008_cod_sp_checkColumnConstraints">}
-#+ Check constraints on the "cotb00008.cod_sp" column
-#+
-#+ @param p_cod_sp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00008_cod_sp_checkColumnConstraints(p_cod_sp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sp LIKE cotb00008.cod_sp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00008_cod_sp_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00008_cod_sp_sec_checkColumnConstraints">}
-#+ Check constraints on the "cotb00008.cod_sp_sec" column
-#+
-#+ @param p_cod_sp_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00008_cod_sp_sec_checkColumnConstraints(p_cod_sp_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sp_sec LIKE cotb00008.cod_sp_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00008_cod_sp_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00008_precio_checkColumnConstraints">}
-#+ Check constraints on the "cotb00008.precio" column
-#+
-#+ @param p_precio - DECIMAL(11,3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00008_precio_checkColumnConstraints(p_precio)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_precio LIKE cotb00008.precio
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00008_precio_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00008_procesada_checkColumnConstraints">}
-#+ Check constraints on the "cotb00008.procesada" column
-#+
-#+ @param p_procesada - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00008_procesada_checkColumnConstraints(p_procesada)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_procesada LIKE cotb00008.procesada
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00008_procesada_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00008_status_t_checkColumnConstraints">}
-#+ Check constraints on the "cotb00008.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00008_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cotb00008.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00008_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00008_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "cotb00008.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00008_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cotb00008.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00008_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00008_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "cotb00008.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00008_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cotb00008.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00008_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00008_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "cotb00008.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00008_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cotb00008.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00008_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00008_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "cotb00008.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00008_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cotb00008.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00008_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00006_checkTableConstraints">}
-#+ Check constraints on the "cotb00006" table
-#+
-#+ @param p_data - a row data LIKE cotb00006.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00006_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cotb00006.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cotb00006_num_req_checkColumnConstraints(p_data.num_req) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00006_fech_req_checkColumnConstraints(p_data.fech_req) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00006_departamento_checkColumnConstraints(p_data.departamento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00006_cod_emp_sec_checkColumnConstraints(p_data.cod_emp_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00006_fech_ent_checkColumnConstraints(p_data.fech_ent) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00006_uso_checkColumnConstraints(p_data.uso) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00006_prioridad_checkColumnConstraints(p_data.prioridad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00006_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00006_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00006_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00006_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00006_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00006_checkTableConstraints
-
-{<BLOCK Name="fct.cotb00006_num_req_checkColumnConstraints">}
-#+ Check constraints on the "cotb00006.num_req" column
-#+
-#+ @param p_num_req - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00006_num_req_checkColumnConstraints(p_num_req)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_req LIKE cotb00006.num_req
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_num_req IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- num_req: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00006_num_req_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00006_fech_req_checkColumnConstraints">}
-#+ Check constraints on the "cotb00006.fech_req" column
-#+
-#+ @param p_fech_req - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00006_fech_req_checkColumnConstraints(p_fech_req)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_req LIKE cotb00006.fech_req
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00006_fech_req_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00006_departamento_checkColumnConstraints">}
-#+ Check constraints on the "cotb00006.departamento" column
-#+
-#+ @param p_departamento - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00006_departamento_checkColumnConstraints(p_departamento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_departamento LIKE cotb00006.departamento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00006_departamento_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00006_cod_emp_sec_checkColumnConstraints">}
-#+ Check constraints on the "cotb00006.cod_emp_sec" column
-#+
-#+ @param p_cod_emp_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00006_cod_emp_sec_checkColumnConstraints(p_cod_emp_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_emp_sec LIKE cotb00006.cod_emp_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00006_cod_emp_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00006_fech_ent_checkColumnConstraints">}
-#+ Check constraints on the "cotb00006.fech_ent" column
-#+
-#+ @param p_fech_ent - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00006_fech_ent_checkColumnConstraints(p_fech_ent)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_ent LIKE cotb00006.fech_ent
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00006_fech_ent_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00006_uso_checkColumnConstraints">}
-#+ Check constraints on the "cotb00006.uso" column
-#+
-#+ @param p_uso - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00006_uso_checkColumnConstraints(p_uso)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_uso LIKE cotb00006.uso
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00006_uso_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00006_prioridad_checkColumnConstraints">}
-#+ Check constraints on the "cotb00006.prioridad" column
-#+
-#+ @param p_prioridad - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00006_prioridad_checkColumnConstraints(p_prioridad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_prioridad LIKE cotb00006.prioridad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00006_prioridad_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00006_status_t_checkColumnConstraints">}
-#+ Check constraints on the "cotb00006.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00006_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cotb00006.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00006_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00006_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "cotb00006.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00006_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cotb00006.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00006_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00006_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "cotb00006.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00006_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cotb00006.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00006_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00006_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "cotb00006.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00006_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cotb00006.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00006_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00006_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "cotb00006.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00006_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cotb00006.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00006_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00005_checkTableConstraints">}
-#+ Check constraints on the "cotb00005" table
-#+
-#+ @param p_data - a row data LIKE cotb00005.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00005_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cotb00005.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cotb00005_cod_nab_checkColumnConstraints(p_data.cod_nab) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00005_descrip_esp_checkColumnConstraints(p_data.descrip_esp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00005_descrip_ing_checkColumnConstraints(p_data.descrip_ing) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00005_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00005_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00005_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00005_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00005_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00005_checkTableConstraints
-
-{<BLOCK Name="fct.cotb00005_cod_nab_checkColumnConstraints">}
-#+ Check constraints on the "cotb00005.cod_nab" column
-#+
-#+ @param p_cod_nab - CHAR(11) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00005_cod_nab_checkColumnConstraints(p_cod_nab)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_nab LIKE cotb00005.cod_nab
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00005_cod_nab_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00005_descrip_esp_checkColumnConstraints">}
-#+ Check constraints on the "cotb00005.descrip_esp" column
-#+
-#+ @param p_descrip_esp - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00005_descrip_esp_checkColumnConstraints(p_descrip_esp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descrip_esp LIKE cotb00005.descrip_esp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00005_descrip_esp_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00005_descrip_ing_checkColumnConstraints">}
-#+ Check constraints on the "cotb00005.descrip_ing" column
-#+
-#+ @param p_descrip_ing - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00005_descrip_ing_checkColumnConstraints(p_descrip_ing)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descrip_ing LIKE cotb00005.descrip_ing
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00005_descrip_ing_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00005_status_t_checkColumnConstraints">}
-#+ Check constraints on the "cotb00005.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00005_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cotb00005.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00005_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00005_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "cotb00005.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00005_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cotb00005.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00005_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00005_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "cotb00005.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00005_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cotb00005.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00005_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00005_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "cotb00005.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00005_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cotb00005.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00005_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00005_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "cotb00005.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00005_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cotb00005.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00005_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00004_checkTableConstraints">}
-#+ Check constraints on the "cotb00004" table
-#+
-#+ @param p_data - a row data LIKE cotb00004.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00004_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cotb00004.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cotb00004_cod_embarque_checkColumnConstraints(p_data.cod_embarque) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00004_cod_furg_checkColumnConstraints(p_data.cod_furg) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00004_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00004_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00004_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00004_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00004_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00004_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00004_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00004_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00004_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00004_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00004_checkTableConstraints
-
-{<BLOCK Name="fct.cotb00004_cod_embarque_checkColumnConstraints">}
-#+ Check constraints on the "cotb00004.cod_embarque" column
-#+
-#+ @param p_cod_embarque - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00004_cod_embarque_checkColumnConstraints(p_cod_embarque)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_embarque LIKE cotb00004.cod_embarque
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00004_cod_embarque_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00004_cod_furg_checkColumnConstraints">}
-#+ Check constraints on the "cotb00004.cod_furg" column
-#+
-#+ @param p_cod_furg - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00004_cod_furg_checkColumnConstraints(p_cod_furg)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_furg LIKE cotb00004.cod_furg
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00004_cod_furg_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00004_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "cotb00004.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00004_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE cotb00004.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00004_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00004_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "cotb00004.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00004_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE cotb00004.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00004_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00004_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "cotb00004.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00004_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE cotb00004.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00004_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00004_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "cotb00004.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00004_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE cotb00004.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00004_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00004_cantidad_checkColumnConstraints">}
-#+ Check constraints on the "cotb00004.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00004_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE cotb00004.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00004_cantidad_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00004_status_t_checkColumnConstraints">}
-#+ Check constraints on the "cotb00004.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00004_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cotb00004.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00004_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00004_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "cotb00004.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00004_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cotb00004.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00004_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00004_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "cotb00004.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00004_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cotb00004.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00004_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00004_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "cotb00004.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00004_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cotb00004.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00004_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00004_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "cotb00004.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00004_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cotb00004.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00004_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00003_checkTableConstraints">}
-#+ Check constraints on the "cotb00003" table
-#+
-#+ @param p_data - a row data LIKE cotb00003.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00003_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cotb00003.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cotb00003_cod_furg_checkColumnConstraints(p_data.cod_furg) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00003_descrip_furg_checkColumnConstraints(p_data.descrip_furg) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00003_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00003_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00003_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00003_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00003_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00003_checkTableConstraints
-
-{<BLOCK Name="fct.cotb00003_cod_furg_checkColumnConstraints">}
-#+ Check constraints on the "cotb00003.cod_furg" column
-#+
-#+ @param p_cod_furg - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00003_cod_furg_checkColumnConstraints(p_cod_furg)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_furg LIKE cotb00003.cod_furg
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00003_cod_furg_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00003_descrip_furg_checkColumnConstraints">}
-#+ Check constraints on the "cotb00003.descrip_furg" column
-#+
-#+ @param p_descrip_furg - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00003_descrip_furg_checkColumnConstraints(p_descrip_furg)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descrip_furg LIKE cotb00003.descrip_furg
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00003_descrip_furg_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00003_status_t_checkColumnConstraints">}
-#+ Check constraints on the "cotb00003.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00003_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cotb00003.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00003_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00003_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "cotb00003.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00003_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cotb00003.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00003_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00003_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "cotb00003.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00003_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cotb00003.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00003_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00003_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "cotb00003.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00003_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cotb00003.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00003_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00003_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "cotb00003.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00003_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cotb00003.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00003_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00002_checkTableConstraints">}
-#+ Check constraints on the "cotb00002" table
-#+
-#+ @param p_data - a row data LIKE cotb00002.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00002_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cotb00002.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cotb00002_cod_sp_checkColumnConstraints(p_data.cod_sp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00002_cod_sp_sec_checkColumnConstraints(p_data.cod_sp_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00002_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00002_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00002_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00002_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00002_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00002_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00002_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00002_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00002_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00002_checkTableConstraints
-
-{<BLOCK Name="fct.cotb00002_cod_sp_checkColumnConstraints">}
-#+ Check constraints on the "cotb00002.cod_sp" column
-#+
-#+ @param p_cod_sp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00002_cod_sp_checkColumnConstraints(p_cod_sp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sp LIKE cotb00002.cod_sp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00002_cod_sp_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00002_cod_sp_sec_checkColumnConstraints">}
-#+ Check constraints on the "cotb00002.cod_sp_sec" column
-#+
-#+ @param p_cod_sp_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00002_cod_sp_sec_checkColumnConstraints(p_cod_sp_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sp_sec LIKE cotb00002.cod_sp_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00002_cod_sp_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00002_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "cotb00002.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00002_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE cotb00002.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00002_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00002_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "cotb00002.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00002_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE cotb00002.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00002_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00002_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "cotb00002.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00002_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE cotb00002.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00002_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00002_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "cotb00002.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00002_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE cotb00002.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00002_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00002_status_t_checkColumnConstraints">}
-#+ Check constraints on the "cotb00002.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00002_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cotb00002.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00002_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00002_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "cotb00002.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00002_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cotb00002.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00002_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00002_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "cotb00002.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00002_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cotb00002.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00002_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00002_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "cotb00002.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00002_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cotb00002.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00002_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00002_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "cotb00002.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00002_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cotb00002.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00002_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00001_checkTableConstraints">}
-#+ Check constraints on the "cotb00001" table
-#+
-#+ @param p_data - a row data LIKE cotb00001.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00001_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cotb00001.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cotb00001_cod_sp_checkColumnConstraints(p_data.cod_sp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00001_cod_sp_sec_checkColumnConstraints(p_data.cod_sp_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00001_nom_sp_checkColumnConstraints(p_data.nom_sp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00001_dir_sp_checkColumnConstraints(p_data.dir_sp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00001_ciu_sp_checkColumnConstraints(p_data.ciu_sp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00001_cod_pais_checkColumnConstraints(p_data.cod_pais) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00001_tel_sp_checkColumnConstraints(p_data.tel_sp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00001_area_sp_checkColumnConstraints(p_data.area_sp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00001_fax_sp_checkColumnConstraints(p_data.fax_sp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00001_cont_sp_checkColumnConstraints(p_data.cont_sp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00001_term_sp_checkColumnConstraints(p_data.term_sp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00001_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00001_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00001_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00001_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cotb00001_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00001_checkTableConstraints
-
-{<BLOCK Name="fct.cotb00001_cod_sp_checkColumnConstraints">}
-#+ Check constraints on the "cotb00001.cod_sp" column
-#+
-#+ @param p_cod_sp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00001_cod_sp_checkColumnConstraints(p_cod_sp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sp LIKE cotb00001.cod_sp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00001_cod_sp_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00001_cod_sp_sec_checkColumnConstraints">}
-#+ Check constraints on the "cotb00001.cod_sp_sec" column
-#+
-#+ @param p_cod_sp_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00001_cod_sp_sec_checkColumnConstraints(p_cod_sp_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sp_sec LIKE cotb00001.cod_sp_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00001_cod_sp_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00001_nom_sp_checkColumnConstraints">}
-#+ Check constraints on the "cotb00001.nom_sp" column
-#+
-#+ @param p_nom_sp - VARCHAR2(41) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00001_nom_sp_checkColumnConstraints(p_nom_sp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nom_sp LIKE cotb00001.nom_sp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00001_nom_sp_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00001_dir_sp_checkColumnConstraints">}
-#+ Check constraints on the "cotb00001.dir_sp" column
-#+
-#+ @param p_dir_sp - VARCHAR2(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00001_dir_sp_checkColumnConstraints(p_dir_sp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_dir_sp LIKE cotb00001.dir_sp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00001_dir_sp_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00001_ciu_sp_checkColumnConstraints">}
-#+ Check constraints on the "cotb00001.ciu_sp" column
-#+
-#+ @param p_ciu_sp - VARCHAR2(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00001_ciu_sp_checkColumnConstraints(p_ciu_sp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ciu_sp LIKE cotb00001.ciu_sp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00001_ciu_sp_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00001_cod_pais_checkColumnConstraints">}
-#+ Check constraints on the "cotb00001.cod_pais" column
-#+
-#+ @param p_cod_pais - VARCHAR2(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00001_cod_pais_checkColumnConstraints(p_cod_pais)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_pais LIKE cotb00001.cod_pais
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00001_cod_pais_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00001_tel_sp_checkColumnConstraints">}
-#+ Check constraints on the "cotb00001.tel_sp" column
-#+
-#+ @param p_tel_sp - VARCHAR2(25) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00001_tel_sp_checkColumnConstraints(p_tel_sp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tel_sp LIKE cotb00001.tel_sp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00001_tel_sp_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00001_area_sp_checkColumnConstraints">}
-#+ Check constraints on the "cotb00001.area_sp" column
-#+
-#+ @param p_area_sp - VARCHAR2(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00001_area_sp_checkColumnConstraints(p_area_sp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_area_sp LIKE cotb00001.area_sp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00001_area_sp_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00001_fax_sp_checkColumnConstraints">}
-#+ Check constraints on the "cotb00001.fax_sp" column
-#+
-#+ @param p_fax_sp - VARCHAR2(25) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00001_fax_sp_checkColumnConstraints(p_fax_sp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fax_sp LIKE cotb00001.fax_sp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00001_fax_sp_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00001_cont_sp_checkColumnConstraints">}
-#+ Check constraints on the "cotb00001.cont_sp" column
-#+
-#+ @param p_cont_sp - VARCHAR2(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00001_cont_sp_checkColumnConstraints(p_cont_sp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cont_sp LIKE cotb00001.cont_sp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00001_cont_sp_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00001_term_sp_checkColumnConstraints">}
-#+ Check constraints on the "cotb00001.term_sp" column
-#+
-#+ @param p_term_sp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00001_term_sp_checkColumnConstraints(p_term_sp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_term_sp LIKE cotb00001.term_sp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00001_term_sp_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00001_status_t_checkColumnConstraints">}
-#+ Check constraints on the "cotb00001.status_t" column
-#+
-#+ @param p_status_t - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00001_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cotb00001.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00001_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00001_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "cotb00001.us_crea" column
-#+
-#+ @param p_us_crea - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00001_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cotb00001.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00001_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00001_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "cotb00001.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00001_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cotb00001.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00001_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00001_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "cotb00001.us_mod" column
-#+
-#+ @param p_us_mod - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00001_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cotb00001.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00001_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cotb00001_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "cotb00001.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cotb00001_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cotb00001.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cotb00001_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.correos_checkTableConstraints">}
-#+ Check constraints on the "correos" table
-#+
-#+ @param p_data - a row data LIKE correos.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_correos_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE correos.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_correos_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_correos_emailto_checkColumnConstraints(p_data.emailto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_correos_usubject_checkColumnConstraints(p_data.usubject) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_correos_cuerpo_checkColumnConstraints(p_data.cuerpo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.correos_checkTableConstraints
-
-{<BLOCK Name="fct.correos_fecha_checkColumnConstraints">}
-#+ Check constraints on the "correos.fecha" column
-#+
-#+ @param p_fecha - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_correos_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE correos.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.correos_fecha_checkColumnConstraints
-
-{<BLOCK Name="fct.correos_emailto_checkColumnConstraints">}
-#+ Check constraints on the "correos.emailto" column
-#+
-#+ @param p_emailto - CHAR(150) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_correos_emailto_checkColumnConstraints(p_emailto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_emailto LIKE correos.emailto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.correos_emailto_checkColumnConstraints
-
-{<BLOCK Name="fct.correos_usubject_checkColumnConstraints">}
-#+ Check constraints on the "correos.usubject" column
-#+
-#+ @param p_usubject - CHAR(150) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_correos_usubject_checkColumnConstraints(p_usubject)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_usubject LIKE correos.usubject
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.correos_usubject_checkColumnConstraints
-
-{<BLOCK Name="fct.correos_cuerpo_checkColumnConstraints">}
-#+ Check constraints on the "correos.cuerpo" column
-#+
-#+ @param p_cuerpo - CHAR(150) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_correos_cuerpo_checkColumnConstraints(p_cuerpo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cuerpo LIKE correos.cuerpo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.correos_cuerpo_checkColumnConstraints
-
-{<BLOCK Name="fct.companias_checkTableConstraints">}
-#+ Check constraints on the "companias" table
-#+
-#+ @param p_data - a row data LIKE companias.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_companias_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE companias.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_companias_cod_comp_checkColumnConstraints(p_data.cod_comp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_companias_nombre_checkColumnConstraints(p_data.nombre) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_companias_rnc_checkColumnConstraints(p_data.rnc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_companias_direccion_checkColumnConstraints(p_data.direccion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_companias_telefono_checkColumnConstraints(p_data.telefono) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_companias_fax_checkColumnConstraints(p_data.fax) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_companias_administrador_checkColumnConstraints(p_data.administrador) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_companias_email_checkColumnConstraints(p_data.email) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_companias_paginaweb_checkColumnConstraints(p_data.paginaweb) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_companias_direccion1_checkColumnConstraints(p_data.direccion1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_companias_telefono1_checkColumnConstraints(p_data.telefono1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_companias_fax1_checkColumnConstraints(p_data.fax1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_companias_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_companias_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_companias_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_companias_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_companias_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_companias_codnomina_checkColumnConstraints(p_data.codnomina) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_companias_cuenta_no_inv_checkColumnConstraints(p_data.cuenta_no_inv) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_companias_logo_file_checkColumnConstraints(p_data.logo_file) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.companias_checkTableConstraints
-
-{<BLOCK Name="fct.companias_cod_comp_checkColumnConstraints">}
-#+ Check constraints on the "companias.cod_comp" column
-#+
-#+ @param p_cod_comp - CHAR(5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_companias_cod_comp_checkColumnConstraints(p_cod_comp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_comp LIKE companias.cod_comp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_comp IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_comp: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.companias_cod_comp_checkColumnConstraints
-
-{<BLOCK Name="fct.companias_nombre_checkColumnConstraints">}
-#+ Check constraints on the "companias.nombre" column
-#+
-#+ @param p_nombre - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_companias_nombre_checkColumnConstraints(p_nombre)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombre LIKE companias.nombre
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.companias_nombre_checkColumnConstraints
-
-{<BLOCK Name="fct.companias_rnc_checkColumnConstraints">}
-#+ Check constraints on the "companias.rnc" column
-#+
-#+ @param p_rnc - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_companias_rnc_checkColumnConstraints(p_rnc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_rnc LIKE companias.rnc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.companias_rnc_checkColumnConstraints
-
-{<BLOCK Name="fct.companias_direccion_checkColumnConstraints">}
-#+ Check constraints on the "companias.direccion" column
-#+
-#+ @param p_direccion - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_companias_direccion_checkColumnConstraints(p_direccion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_direccion LIKE companias.direccion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.companias_direccion_checkColumnConstraints
-
-{<BLOCK Name="fct.companias_telefono_checkColumnConstraints">}
-#+ Check constraints on the "companias.telefono" column
-#+
-#+ @param p_telefono - CHAR(15) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_companias_telefono_checkColumnConstraints(p_telefono)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_telefono LIKE companias.telefono
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.companias_telefono_checkColumnConstraints
-
-{<BLOCK Name="fct.companias_fax_checkColumnConstraints">}
-#+ Check constraints on the "companias.fax" column
-#+
-#+ @param p_fax - CHAR(15) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_companias_fax_checkColumnConstraints(p_fax)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fax LIKE companias.fax
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.companias_fax_checkColumnConstraints
-
-{<BLOCK Name="fct.companias_administrador_checkColumnConstraints">}
-#+ Check constraints on the "companias.administrador" column
-#+
-#+ @param p_administrador - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_companias_administrador_checkColumnConstraints(p_administrador)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_administrador LIKE companias.administrador
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.companias_administrador_checkColumnConstraints
-
-{<BLOCK Name="fct.companias_email_checkColumnConstraints">}
-#+ Check constraints on the "companias.email" column
-#+
-#+ @param p_email - CHAR(100) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_companias_email_checkColumnConstraints(p_email)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_email LIKE companias.email
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.companias_email_checkColumnConstraints
-
-{<BLOCK Name="fct.companias_paginaweb_checkColumnConstraints">}
-#+ Check constraints on the "companias.paginaweb" column
-#+
-#+ @param p_paginaweb - CHAR(100) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_companias_paginaweb_checkColumnConstraints(p_paginaweb)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_paginaweb LIKE companias.paginaweb
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.companias_paginaweb_checkColumnConstraints
-
-{<BLOCK Name="fct.companias_direccion1_checkColumnConstraints">}
-#+ Check constraints on the "companias.direccion1" column
-#+
-#+ @param p_direccion1 - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_companias_direccion1_checkColumnConstraints(p_direccion1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_direccion1 LIKE companias.direccion1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.companias_direccion1_checkColumnConstraints
-
-{<BLOCK Name="fct.companias_telefono1_checkColumnConstraints">}
-#+ Check constraints on the "companias.telefono1" column
-#+
-#+ @param p_telefono1 - CHAR(15) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_companias_telefono1_checkColumnConstraints(p_telefono1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_telefono1 LIKE companias.telefono1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.companias_telefono1_checkColumnConstraints
-
-{<BLOCK Name="fct.companias_fax1_checkColumnConstraints">}
-#+ Check constraints on the "companias.fax1" column
-#+
-#+ @param p_fax1 - CHAR(15) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_companias_fax1_checkColumnConstraints(p_fax1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fax1 LIKE companias.fax1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.companias_fax1_checkColumnConstraints
-
-{<BLOCK Name="fct.companias_status_t_checkColumnConstraints">}
-#+ Check constraints on the "companias.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_companias_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE companias.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.companias_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.companias_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "companias.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_companias_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE companias.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.companias_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.companias_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "companias.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_companias_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE companias.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.companias_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.companias_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "companias.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_companias_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE companias.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.companias_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.companias_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "companias.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_companias_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE companias.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.companias_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.companias_codnomina_checkColumnConstraints">}
-#+ Check constraints on the "companias.codnomina" column
-#+
-#+ @param p_codnomina - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_companias_codnomina_checkColumnConstraints(p_codnomina)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codnomina LIKE companias.codnomina
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.companias_codnomina_checkColumnConstraints
-
-{<BLOCK Name="fct.companias_cuenta_no_inv_checkColumnConstraints">}
-#+ Check constraints on the "companias.cuenta_no_inv" column
-#+
-#+ @param p_cuenta_no_inv - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_companias_cuenta_no_inv_checkColumnConstraints(p_cuenta_no_inv)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cuenta_no_inv LIKE companias.cuenta_no_inv
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.companias_cuenta_no_inv_checkColumnConstraints
-
-{<BLOCK Name="fct.companias_logo_file_checkColumnConstraints">}
-#+ Check constraints on the "companias.logo_file" column
-#+
-#+ @param p_logo_file - CHAR(200) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_companias_logo_file_checkColumnConstraints(p_logo_file)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_logo_file LIKE companias.logo_file
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.companias_logo_file_checkColumnConstraints
-
-{<BLOCK Name="fct.codigos22_checkTableConstraints">}
-#+ Check constraints on the "codigos22" table
-#+
-#+ @param p_data - a row data LIKE codigos22.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_codigos22_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE codigos22.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_codigos22_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_codigos22_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_codigos22_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_codigos22_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.codigos22_checkTableConstraints
-
-{<BLOCK Name="fct.codigos22_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "codigos22.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_codigos22_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE codigos22.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.codigos22_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.codigos22_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "codigos22.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_codigos22_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE codigos22.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.codigos22_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.codigos22_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "codigos22.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_codigos22_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE codigos22.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.codigos22_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.codigos22_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "codigos22.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_codigos22_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE codigos22.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.codigos22_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.codigos_checkTableConstraints">}
-#+ Check constraints on the "codigos" table
-#+
-#+ @param p_data - a row data LIKE codigos.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_codigos_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE codigos.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_codigos_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_codigos_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_codigos_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_codigos_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.codigos_checkTableConstraints
-
-{<BLOCK Name="fct.codigos_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "codigos.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_codigos_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE codigos.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.codigos_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.codigos_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "codigos.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_codigos_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE codigos.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.codigos_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.codigos_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "codigos.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_codigos_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE codigos.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.codigos_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.codigos_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "codigos.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_codigos_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE codigos.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.codigos_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.codigo21_checkTableConstraints">}
-#+ Check constraints on the "codigo21" table
-#+
-#+ @param p_data - a row data LIKE codigo21.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_codigo21_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE codigo21.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_codigo21_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_codigo21_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_codigo21_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_codigo21_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.codigo21_checkTableConstraints
-
-{<BLOCK Name="fct.codigo21_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "codigo21.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_codigo21_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE codigo21.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.codigo21_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.codigo21_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "codigo21.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_codigo21_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE codigo21.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.codigo21_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.codigo21_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "codigo21.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_codigo21_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE codigo21.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.codigo21_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.codigo21_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "codigo21.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_codigo21_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE codigo21.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.codigo21_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.codigo20_checkTableConstraints">}
-#+ Check constraints on the "codigo20" table
-#+
-#+ @param p_data - a row data LIKE codigo20.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_codigo20_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE codigo20.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_codigo20_f1_checkColumnConstraints(p_data.f1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_codigo20_f2_checkColumnConstraints(p_data.f2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_codigo20_f3_checkColumnConstraints(p_data.f3) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_codigo20_f4_checkColumnConstraints(p_data.f4) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.codigo20_checkTableConstraints
-
-{<BLOCK Name="fct.codigo20_f1_checkColumnConstraints">}
-#+ Check constraints on the "codigo20.f1" column
-#+
-#+ @param p_f1 - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_codigo20_f1_checkColumnConstraints(p_f1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_f1 LIKE codigo20.f1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.codigo20_f1_checkColumnConstraints
-
-{<BLOCK Name="fct.codigo20_f2_checkColumnConstraints">}
-#+ Check constraints on the "codigo20.f2" column
-#+
-#+ @param p_f2 - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_codigo20_f2_checkColumnConstraints(p_f2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_f2 LIKE codigo20.f2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.codigo20_f2_checkColumnConstraints
-
-{<BLOCK Name="fct.codigo20_f3_checkColumnConstraints">}
-#+ Check constraints on the "codigo20.f3" column
-#+
-#+ @param p_f3 - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_codigo20_f3_checkColumnConstraints(p_f3)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_f3 LIKE codigo20.f3
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.codigo20_f3_checkColumnConstraints
-
-{<BLOCK Name="fct.codigo20_f4_checkColumnConstraints">}
-#+ Check constraints on the "codigo20.f4" column
-#+
-#+ @param p_f4 - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_codigo20_f4_checkColumnConstraints(p_f4)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_f4 LIKE codigo20.f4
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.codigo20_f4_checkColumnConstraints
-
-{<BLOCK Name="fct.chequeo_checkTableConstraints">}
-#+ Check constraints on the "chequeo" table
-#+
-#+ @param p_data - a row data LIKE chequeo.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_chequeo_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE chequeo.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_chequeo_dpto_checkColumnConstraints(p_data.dpto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_chequeo_departamento_checkColumnConstraints(p_data.departamento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_chequeo_nom_dpto_checkColumnConstraints(p_data.nom_dpto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.chequeo_checkTableConstraints
-
-{<BLOCK Name="fct.chequeo_dpto_checkColumnConstraints">}
-#+ Check constraints on the "chequeo.dpto" column
-#+
-#+ @param p_dpto - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_chequeo_dpto_checkColumnConstraints(p_dpto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_dpto LIKE chequeo.dpto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.chequeo_dpto_checkColumnConstraints
-
-{<BLOCK Name="fct.chequeo_departamento_checkColumnConstraints">}
-#+ Check constraints on the "chequeo.departamento" column
-#+
-#+ @param p_departamento - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_chequeo_departamento_checkColumnConstraints(p_departamento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_departamento LIKE chequeo.departamento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.chequeo_departamento_checkColumnConstraints
-
-{<BLOCK Name="fct.chequeo_nom_dpto_checkColumnConstraints">}
-#+ Check constraints on the "chequeo.nom_dpto" column
-#+
-#+ @param p_nom_dpto - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_chequeo_nom_dpto_checkColumnConstraints(p_nom_dpto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nom_dpto LIKE chequeo.nom_dpto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.chequeo_nom_dpto_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtbh00004_checkTableConstraints">}
-#+ Check constraints on the "cgtbh00004" table
-#+
-#+ @param p_data - a row data LIKE cgtbh00004.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtbh00004_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cgtbh00004.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cgtbh00004_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtbh00004_tipo_checkColumnConstraints(p_data.tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtbh00004_ref_checkColumnConstraints(p_data.ref) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtbh00004_cuenta_no_checkColumnConstraints(p_data.cuenta_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtbh00004_departamento_checkColumnConstraints(p_data.departamento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtbh00004_num_doc_checkColumnConstraints(p_data.num_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtbh00004_cod_aux_checkColumnConstraints(p_data.cod_aux) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtbh00004_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtbh00004_detalles_checkColumnConstraints(p_data.detalles) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtbh00004_detalle_1_checkColumnConstraints(p_data.detalle_1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtbh00004_detalle_2_checkColumnConstraints(p_data.detalle_2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtbh00004_debito_checkColumnConstraints(p_data.debito) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtbh00004_credito_checkColumnConstraints(p_data.credito) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtbh00004_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtbh00004_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtbh00004_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtbh00004_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtbh00004_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtbh00004_checkTableConstraints
-
-{<BLOCK Name="fct.cgtbh00004_fecha_checkColumnConstraints">}
-#+ Check constraints on the "cgtbh00004.fecha" column
-#+
-#+ @param p_fecha - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtbh00004_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE cgtbh00004.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtbh00004_fecha_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtbh00004_tipo_checkColumnConstraints">}
-#+ Check constraints on the "cgtbh00004.tipo" column
-#+
-#+ @param p_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtbh00004_tipo_checkColumnConstraints(p_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo LIKE cgtbh00004.tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtbh00004_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtbh00004_ref_checkColumnConstraints">}
-#+ Check constraints on the "cgtbh00004.ref" column
-#+
-#+ @param p_ref - VARCHAR2(14) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtbh00004_ref_checkColumnConstraints(p_ref)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ref LIKE cgtbh00004.ref
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_ref IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- ref: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtbh00004_ref_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtbh00004_cuenta_no_checkColumnConstraints">}
-#+ Check constraints on the "cgtbh00004.cuenta_no" column
-#+
-#+ @param p_cuenta_no - VARCHAR2(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtbh00004_cuenta_no_checkColumnConstraints(p_cuenta_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cuenta_no LIKE cgtbh00004.cuenta_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtbh00004_cuenta_no_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtbh00004_departamento_checkColumnConstraints">}
-#+ Check constraints on the "cgtbh00004.departamento" column
-#+
-#+ @param p_departamento - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtbh00004_departamento_checkColumnConstraints(p_departamento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_departamento LIKE cgtbh00004.departamento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtbh00004_departamento_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtbh00004_num_doc_checkColumnConstraints">}
-#+ Check constraints on the "cgtbh00004.num_doc" column
-#+
-#+ @param p_num_doc - VARCHAR2(12) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtbh00004_num_doc_checkColumnConstraints(p_num_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_doc LIKE cgtbh00004.num_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtbh00004_num_doc_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtbh00004_cod_aux_checkColumnConstraints">}
-#+ Check constraints on the "cgtbh00004.cod_aux" column
-#+
-#+ @param p_cod_aux - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtbh00004_cod_aux_checkColumnConstraints(p_cod_aux)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_aux LIKE cgtbh00004.cod_aux
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtbh00004_cod_aux_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtbh00004_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "cgtbh00004.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtbh00004_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE cgtbh00004.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtbh00004_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtbh00004_detalles_checkColumnConstraints">}
-#+ Check constraints on the "cgtbh00004.detalles" column
-#+
-#+ @param p_detalles - VARCHAR2(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtbh00004_detalles_checkColumnConstraints(p_detalles)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_detalles LIKE cgtbh00004.detalles
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtbh00004_detalles_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtbh00004_detalle_1_checkColumnConstraints">}
-#+ Check constraints on the "cgtbh00004.detalle_1" column
-#+
-#+ @param p_detalle_1 - VARCHAR2(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtbh00004_detalle_1_checkColumnConstraints(p_detalle_1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_detalle_1 LIKE cgtbh00004.detalle_1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtbh00004_detalle_1_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtbh00004_detalle_2_checkColumnConstraints">}
-#+ Check constraints on the "cgtbh00004.detalle_2" column
-#+
-#+ @param p_detalle_2 - VARCHAR2(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtbh00004_detalle_2_checkColumnConstraints(p_detalle_2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_detalle_2 LIKE cgtbh00004.detalle_2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtbh00004_detalle_2_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtbh00004_debito_checkColumnConstraints">}
-#+ Check constraints on the "cgtbh00004.debito" column
-#+
-#+ @param p_debito - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtbh00004_debito_checkColumnConstraints(p_debito)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_debito LIKE cgtbh00004.debito
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtbh00004_debito_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtbh00004_credito_checkColumnConstraints">}
-#+ Check constraints on the "cgtbh00004.credito" column
-#+
-#+ @param p_credito - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtbh00004_credito_checkColumnConstraints(p_credito)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_credito LIKE cgtbh00004.credito
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtbh00004_credito_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtbh00004_status_t_checkColumnConstraints">}
-#+ Check constraints on the "cgtbh00004.status_t" column
-#+
-#+ @param p_status_t - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtbh00004_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cgtbh00004.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtbh00004_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtbh00004_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "cgtbh00004.us_crea" column
-#+
-#+ @param p_us_crea - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtbh00004_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cgtbh00004.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtbh00004_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtbh00004_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "cgtbh00004.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtbh00004_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cgtbh00004.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtbh00004_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtbh00004_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "cgtbh00004.us_mod" column
-#+
-#+ @param p_us_mod - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtbh00004_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cgtbh00004.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtbh00004_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtbh00004_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "cgtbh00004.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtbh00004_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cgtbh00004.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtbh00004_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb04_checkTableConstraints">}
-#+ Check constraints on the "cgtb04" table
-#+
-#+ @param p_data - a row data LIKE cgtb04.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb04_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cgtb04.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cgtb04_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb04_tipo_checkColumnConstraints(p_data.tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb04_ref_checkColumnConstraints(p_data.ref) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb04_cuenta_no_checkColumnConstraints(p_data.cuenta_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb04_departamento_checkColumnConstraints(p_data.departamento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb04_num_doc_checkColumnConstraints(p_data.num_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb04_cod_aux_checkColumnConstraints(p_data.cod_aux) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb04_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb04_detalles_checkColumnConstraints(p_data.detalles) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb04_detalle_1_checkColumnConstraints(p_data.detalle_1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb04_detalle_2_checkColumnConstraints(p_data.detalle_2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb04_debito_checkColumnConstraints(p_data.debito) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb04_credito_checkColumnConstraints(p_data.credito) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb04_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb04_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb04_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb04_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb04_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb04_checkTableConstraints
-
-{<BLOCK Name="fct.cgtb04_fecha_checkColumnConstraints">}
-#+ Check constraints on the "cgtb04.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb04_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE cgtb04.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb04_fecha_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb04_tipo_checkColumnConstraints">}
-#+ Check constraints on the "cgtb04.tipo" column
-#+
-#+ @param p_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb04_tipo_checkColumnConstraints(p_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo LIKE cgtb04.tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb04_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb04_ref_checkColumnConstraints">}
-#+ Check constraints on the "cgtb04.ref" column
-#+
-#+ @param p_ref - CHAR(14) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb04_ref_checkColumnConstraints(p_ref)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ref LIKE cgtb04.ref
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_ref IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- ref: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb04_ref_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb04_cuenta_no_checkColumnConstraints">}
-#+ Check constraints on the "cgtb04.cuenta_no" column
-#+
-#+ @param p_cuenta_no - CHAR(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb04_cuenta_no_checkColumnConstraints(p_cuenta_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cuenta_no LIKE cgtb04.cuenta_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb04_cuenta_no_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb04_departamento_checkColumnConstraints">}
-#+ Check constraints on the "cgtb04.departamento" column
-#+
-#+ @param p_departamento - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb04_departamento_checkColumnConstraints(p_departamento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_departamento LIKE cgtb04.departamento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb04_departamento_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb04_num_doc_checkColumnConstraints">}
-#+ Check constraints on the "cgtb04.num_doc" column
-#+
-#+ @param p_num_doc - CHAR(12) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb04_num_doc_checkColumnConstraints(p_num_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_doc LIKE cgtb04.num_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb04_num_doc_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb04_cod_aux_checkColumnConstraints">}
-#+ Check constraints on the "cgtb04.cod_aux" column
-#+
-#+ @param p_cod_aux - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb04_cod_aux_checkColumnConstraints(p_cod_aux)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_aux LIKE cgtb04.cod_aux
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb04_cod_aux_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb04_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "cgtb04.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb04_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE cgtb04.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb04_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb04_detalles_checkColumnConstraints">}
-#+ Check constraints on the "cgtb04.detalles" column
-#+
-#+ @param p_detalles - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb04_detalles_checkColumnConstraints(p_detalles)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_detalles LIKE cgtb04.detalles
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb04_detalles_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb04_detalle_1_checkColumnConstraints">}
-#+ Check constraints on the "cgtb04.detalle_1" column
-#+
-#+ @param p_detalle_1 - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb04_detalle_1_checkColumnConstraints(p_detalle_1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_detalle_1 LIKE cgtb04.detalle_1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb04_detalle_1_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb04_detalle_2_checkColumnConstraints">}
-#+ Check constraints on the "cgtb04.detalle_2" column
-#+
-#+ @param p_detalle_2 - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb04_detalle_2_checkColumnConstraints(p_detalle_2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_detalle_2 LIKE cgtb04.detalle_2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb04_detalle_2_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb04_debito_checkColumnConstraints">}
-#+ Check constraints on the "cgtb04.debito" column
-#+
-#+ @param p_debito - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb04_debito_checkColumnConstraints(p_debito)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_debito LIKE cgtb04.debito
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb04_debito_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb04_credito_checkColumnConstraints">}
-#+ Check constraints on the "cgtb04.credito" column
-#+
-#+ @param p_credito - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb04_credito_checkColumnConstraints(p_credito)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_credito LIKE cgtb04.credito
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb04_credito_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb04_status_t_checkColumnConstraints">}
-#+ Check constraints on the "cgtb04.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb04_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cgtb04.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb04_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb04_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "cgtb04.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb04_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cgtb04.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb04_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb04_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "cgtb04.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb04_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cgtb04.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb04_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb04_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "cgtb04.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb04_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cgtb04.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb04_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb04_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "cgtb04.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb04_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cgtb04.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb04_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00084_checkTableConstraints">}
-#+ Check constraints on the "cgtb00084" table
-#+
-#+ @param p_data - a row data LIKE cgtb00084.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00084_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cgtb00084.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cgtb00084_ventas_checkColumnConstraints(p_data.ventas) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00084_tipo_cliente_checkColumnConstraints(p_data.tipo_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00084_ano_checkColumnConstraints(p_data.ano) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00084_mes_checkColumnConstraints(p_data.mes) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00084_tasa_checkColumnConstraints(p_data.tasa) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00084_checkTableConstraints
-
-{<BLOCK Name="fct.cgtb00084_ventas_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00084.ventas" column
-#+
-#+ @param p_ventas - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00084_ventas_checkColumnConstraints(p_ventas)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ventas LIKE cgtb00084.ventas
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00084_ventas_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00084_tipo_cliente_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00084.tipo_cliente" column
-#+
-#+ @param p_tipo_cliente - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00084_tipo_cliente_checkColumnConstraints(p_tipo_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_cliente LIKE cgtb00084.tipo_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00084_tipo_cliente_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00084_ano_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00084.ano" column
-#+
-#+ @param p_ano - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00084_ano_checkColumnConstraints(p_ano)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ano LIKE cgtb00084.ano
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00084_ano_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00084_mes_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00084.mes" column
-#+
-#+ @param p_mes - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00084_mes_checkColumnConstraints(p_mes)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mes LIKE cgtb00084.mes
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00084_mes_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00084_tasa_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00084.tasa" column
-#+
-#+ @param p_tasa - DECIMAL(12,3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00084_tasa_checkColumnConstraints(p_tasa)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tasa LIKE cgtb00084.tasa
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00084_tasa_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00083_checkTableConstraints">}
-#+ Check constraints on the "cgtb00083" table
-#+
-#+ @param p_data - a row data LIKE cgtb00083.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00083_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cgtb00083.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cgtb00083_primern_checkColumnConstraints(p_data.primern) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00083_descrip_n_checkColumnConstraints(p_data.descrip_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00083_aplica_a_checkColumnConstraints(p_data.aplica_a) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00083_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00083_checkTableConstraints
-
-{<BLOCK Name="fct.cgtb00083_primern_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00083.primern" column
-#+
-#+ @param p_primern - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00083_primern_checkColumnConstraints(p_primern)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_primern LIKE cgtb00083.primern
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00083_primern_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00083_descrip_n_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00083.descrip_n" column
-#+
-#+ @param p_descrip_n - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00083_descrip_n_checkColumnConstraints(p_descrip_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descrip_n LIKE cgtb00083.descrip_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00083_descrip_n_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00083_aplica_a_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00083.aplica_a" column
-#+
-#+ @param p_aplica_a - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00083_aplica_a_checkColumnConstraints(p_aplica_a)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_aplica_a LIKE cgtb00083.aplica_a
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00083_aplica_a_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00083_descripcion_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00083.descripcion" column
-#+
-#+ @param p_descripcion - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00083_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE cgtb00083.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00083_descripcion_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00060_checkTableConstraints">}
-#+ Check constraints on the "cgtb00060" table
-#+
-#+ @param p_data - a row data LIKE cgtb00060.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00060_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cgtb00060.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cgtb00060_ano_checkColumnConstraints(p_data.ano) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00060_mes_checkColumnConstraints(p_data.mes) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00060_fecha_ini_checkColumnConstraints(p_data.fecha_ini) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00060_fecha_fin_checkColumnConstraints(p_data.fecha_fin) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00060_entrada_datos_checkColumnConstraints(p_data.entrada_datos) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00060_codigo_lote_checkColumnConstraints(p_data.codigo_lote) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00060_afecta_checkColumnConstraints(p_data.afecta) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00060_checkTableConstraints
-
-{<BLOCK Name="fct.cgtb00060_ano_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00060.ano" column
-#+
-#+ @param p_ano - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00060_ano_checkColumnConstraints(p_ano)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ano LIKE cgtb00060.ano
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00060_ano_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00060_mes_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00060.mes" column
-#+
-#+ @param p_mes - CHAR(12) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00060_mes_checkColumnConstraints(p_mes)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mes LIKE cgtb00060.mes
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00060_mes_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00060_fecha_ini_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00060.fecha_ini" column
-#+
-#+ @param p_fecha_ini - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00060_fecha_ini_checkColumnConstraints(p_fecha_ini)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_ini LIKE cgtb00060.fecha_ini
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00060_fecha_ini_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00060_fecha_fin_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00060.fecha_fin" column
-#+
-#+ @param p_fecha_fin - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00060_fecha_fin_checkColumnConstraints(p_fecha_fin)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_fin LIKE cgtb00060.fecha_fin
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00060_fecha_fin_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00060_entrada_datos_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00060.entrada_datos" column
-#+
-#+ @param p_entrada_datos - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00060_entrada_datos_checkColumnConstraints(p_entrada_datos)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_entrada_datos LIKE cgtb00060.entrada_datos
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00060_entrada_datos_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00060_codigo_lote_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00060.codigo_lote" column
-#+
-#+ @param p_codigo_lote - CHAR(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00060_codigo_lote_checkColumnConstraints(p_codigo_lote)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codigo_lote LIKE cgtb00060.codigo_lote
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00060_codigo_lote_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00060_afecta_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00060.afecta" column
-#+
-#+ @param p_afecta - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00060_afecta_checkColumnConstraints(p_afecta)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_afecta LIKE cgtb00060.afecta
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00060_afecta_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00035_checkTableConstraints">}
-#+ Check constraints on the "cgtb00035" table
-#+
-#+ @param p_data - a row data LIKE cgtb00035.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00035_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cgtb00035.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cgtb00035_codigo_estado_checkColumnConstraints(p_data.codigo_estado) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00035_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00035_checkTableConstraints
-
-{<BLOCK Name="fct.cgtb00035_codigo_estado_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00035.codigo_estado" column
-#+
-#+ @param p_codigo_estado - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00035_codigo_estado_checkColumnConstraints(p_codigo_estado)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codigo_estado LIKE cgtb00035.codigo_estado
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00035_codigo_estado_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00035_descripcion_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00035.descripcion" column
-#+
-#+ @param p_descripcion - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00035_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE cgtb00035.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00035_descripcion_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00034_checkTableConstraints">}
-#+ Check constraints on the "cgtb00034" table
-#+
-#+ @param p_data - a row data LIKE cgtb00034.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00034_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cgtb00034.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cgtb00034_cuenta_no_checkColumnConstraints(p_data.cuenta_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00034_departamento_checkColumnConstraints(p_data.departamento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00034_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00034_sec_vend_checkColumnConstraints(p_data.sec_vend) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00034_cod_cia_checkColumnConstraints(p_data.cod_cia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00034_id_checkColumnConstraints(p_data.id) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00034_checkTableConstraints
-
-{<BLOCK Name="fct.cgtb00034_cuenta_no_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00034.cuenta_no" column
-#+
-#+ @param p_cuenta_no - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00034_cuenta_no_checkColumnConstraints(p_cuenta_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cuenta_no LIKE cgtb00034.cuenta_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00034_cuenta_no_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00034_departamento_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00034.departamento" column
-#+
-#+ @param p_departamento - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00034_departamento_checkColumnConstraints(p_departamento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_departamento LIKE cgtb00034.departamento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00034_departamento_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00034_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00034.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00034_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE cgtb00034.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00034_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00034_sec_vend_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00034.sec_vend" column
-#+
-#+ @param p_sec_vend - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00034_sec_vend_checkColumnConstraints(p_sec_vend)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_vend LIKE cgtb00034.sec_vend
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00034_sec_vend_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00034_cod_cia_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00034.cod_cia" column
-#+
-#+ @param p_cod_cia - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00034_cod_cia_checkColumnConstraints(p_cod_cia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_cia LIKE cgtb00034.cod_cia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00034_cod_cia_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00034_id_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00034.id" column
-#+
-#+ @param p_id - CHAR(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00034_id_checkColumnConstraints(p_id)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_id LIKE cgtb00034.id
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00034_id_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00033_checkTableConstraints">}
-#+ Check constraints on the "cgtb00033" table
-#+
-#+ @param p_data - a row data LIKE cgtb00033.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00033_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cgtb00033.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cgtb00033_cheque_no_checkColumnConstraints(p_data.cheque_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00033_banco_checkColumnConstraints(p_data.banco) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00033_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00033_monto_checkColumnConstraints(p_data.monto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00033_portador_checkColumnConstraints(p_data.portador) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00033_cod_cro_checkColumnConstraints(p_data.cod_cro) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00033_recibido_por_checkColumnConstraints(p_data.recibido_por) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00033_cedula_checkColumnConstraints(p_data.cedula) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00033_direccion_checkColumnConstraints(p_data.direccion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00033_fecha_ent_checkColumnConstraints(p_data.fecha_ent) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00033_hora_ent_checkColumnConstraints(p_data.hora_ent) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00033_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00033_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00033_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00033_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00033_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00033_checkTableConstraints
-
-{<BLOCK Name="fct.cgtb00033_cheque_no_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00033.cheque_no" column
-#+
-#+ @param p_cheque_no - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00033_cheque_no_checkColumnConstraints(p_cheque_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cheque_no LIKE cgtb00033.cheque_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cheque_no IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cheque_no: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00033_cheque_no_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00033_banco_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00033.banco" column
-#+
-#+ @param p_banco - CHAR(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00033_banco_checkColumnConstraints(p_banco)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_banco LIKE cgtb00033.banco
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_banco IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- banco: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00033_banco_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00033_fecha_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00033.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00033_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE cgtb00033.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00033_fecha_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00033_monto_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00033.monto" column
-#+
-#+ @param p_monto - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00033_monto_checkColumnConstraints(p_monto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_monto LIKE cgtb00033.monto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00033_monto_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00033_portador_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00033.portador" column
-#+
-#+ @param p_portador - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00033_portador_checkColumnConstraints(p_portador)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_portador LIKE cgtb00033.portador
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00033_portador_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00033_cod_cro_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00033.cod_cro" column
-#+
-#+ @param p_cod_cro - CHAR(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00033_cod_cro_checkColumnConstraints(p_cod_cro)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_cro LIKE cgtb00033.cod_cro
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_cro IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_cro: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00033_cod_cro_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00033_recibido_por_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00033.recibido_por" column
-#+
-#+ @param p_recibido_por - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00033_recibido_por_checkColumnConstraints(p_recibido_por)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_recibido_por LIKE cgtb00033.recibido_por
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_recibido_por IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- recibido_por: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00033_recibido_por_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00033_cedula_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00033.cedula" column
-#+
-#+ @param p_cedula - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00033_cedula_checkColumnConstraints(p_cedula)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cedula LIKE cgtb00033.cedula
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cedula IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cedula: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00033_cedula_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00033_direccion_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00033.direccion" column
-#+
-#+ @param p_direccion - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00033_direccion_checkColumnConstraints(p_direccion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_direccion LIKE cgtb00033.direccion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00033_direccion_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00033_fecha_ent_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00033.fecha_ent" column
-#+
-#+ @param p_fecha_ent - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00033_fecha_ent_checkColumnConstraints(p_fecha_ent)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_ent LIKE cgtb00033.fecha_ent
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_fecha_ent IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- fecha_ent: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00033_fecha_ent_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00033_hora_ent_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00033.hora_ent" column
-#+
-#+ @param p_hora_ent - CHAR(5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00033_hora_ent_checkColumnConstraints(p_hora_ent)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_hora_ent LIKE cgtb00033.hora_ent
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_hora_ent IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- hora_ent: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00033_hora_ent_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00033_status_t_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00033.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00033_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cgtb00033.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00033_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00033_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00033.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00033_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cgtb00033.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00033_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00033_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00033.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00033_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cgtb00033.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00033_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00033_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00033.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00033_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cgtb00033.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00033_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00033_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00033.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00033_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cgtb00033.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00033_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00032_checkTableConstraints">}
-#+ Check constraints on the "cgtb00032" table
-#+
-#+ @param p_data - a row data LIKE cgtb00032.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00032_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cgtb00032.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cgtb00032_cheque_no_checkColumnConstraints(p_data.cheque_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00032_banco_checkColumnConstraints(p_data.banco) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00032_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00032_cod_cro_checkColumnConstraints(p_data.cod_cro) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00032_recibido_por_checkColumnConstraints(p_data.recibido_por) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00032_cedula_checkColumnConstraints(p_data.cedula) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00032_direccion_checkColumnConstraints(p_data.direccion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00032_fecha_ent_checkColumnConstraints(p_data.fecha_ent) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00032_hora_ent_checkColumnConstraints(p_data.hora_ent) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00032_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00032_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00032_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00032_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00032_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00032_checkTableConstraints
-
-{<BLOCK Name="fct.cgtb00032_cheque_no_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00032.cheque_no" column
-#+
-#+ @param p_cheque_no - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00032_cheque_no_checkColumnConstraints(p_cheque_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cheque_no LIKE cgtb00032.cheque_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cheque_no IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cheque_no: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00032_cheque_no_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00032_banco_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00032.banco" column
-#+
-#+ @param p_banco - CHAR(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00032_banco_checkColumnConstraints(p_banco)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_banco LIKE cgtb00032.banco
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_banco IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- banco: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00032_banco_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00032_fecha_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00032.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00032_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE cgtb00032.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00032_fecha_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00032_cod_cro_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00032.cod_cro" column
-#+
-#+ @param p_cod_cro - CHAR(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00032_cod_cro_checkColumnConstraints(p_cod_cro)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_cro LIKE cgtb00032.cod_cro
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_cro IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_cro: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00032_cod_cro_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00032_recibido_por_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00032.recibido_por" column
-#+
-#+ @param p_recibido_por - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00032_recibido_por_checkColumnConstraints(p_recibido_por)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_recibido_por LIKE cgtb00032.recibido_por
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_recibido_por IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- recibido_por: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00032_recibido_por_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00032_cedula_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00032.cedula" column
-#+
-#+ @param p_cedula - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00032_cedula_checkColumnConstraints(p_cedula)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cedula LIKE cgtb00032.cedula
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cedula IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cedula: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00032_cedula_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00032_direccion_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00032.direccion" column
-#+
-#+ @param p_direccion - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00032_direccion_checkColumnConstraints(p_direccion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_direccion LIKE cgtb00032.direccion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00032_direccion_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00032_fecha_ent_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00032.fecha_ent" column
-#+
-#+ @param p_fecha_ent - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00032_fecha_ent_checkColumnConstraints(p_fecha_ent)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_ent LIKE cgtb00032.fecha_ent
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_fecha_ent IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- fecha_ent: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00032_fecha_ent_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00032_hora_ent_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00032.hora_ent" column
-#+
-#+ @param p_hora_ent - CHAR(5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00032_hora_ent_checkColumnConstraints(p_hora_ent)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_hora_ent LIKE cgtb00032.hora_ent
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_hora_ent IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- hora_ent: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00032_hora_ent_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00032_status_t_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00032.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00032_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cgtb00032.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00032_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00032_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00032.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00032_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cgtb00032.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00032_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00032_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00032.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00032_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cgtb00032.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00032_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00032_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00032.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00032_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cgtb00032.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00032_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00032_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00032.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00032_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cgtb00032.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00032_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00031_checkTableConstraints">}
-#+ Check constraints on the "cgtb00031" table
-#+
-#+ @param p_data - a row data LIKE cgtb00031.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00031_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cgtb00031.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cgtb00031_cod_cro_checkColumnConstraints(p_data.cod_cro) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00031_beneficiario_checkColumnConstraints(p_data.beneficiario) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00031_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00031_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00031_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00031_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00031_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00031_checkTableConstraints
-
-{<BLOCK Name="fct.cgtb00031_cod_cro_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00031.cod_cro" column
-#+
-#+ @param p_cod_cro - CHAR(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00031_cod_cro_checkColumnConstraints(p_cod_cro)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_cro LIKE cgtb00031.cod_cro
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00031_cod_cro_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00031_beneficiario_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00031.beneficiario" column
-#+
-#+ @param p_beneficiario - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00031_beneficiario_checkColumnConstraints(p_beneficiario)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_beneficiario LIKE cgtb00031.beneficiario
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00031_beneficiario_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00031_status_t_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00031.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00031_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cgtb00031.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00031_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00031_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00031.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00031_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cgtb00031.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00031_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00031_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00031.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00031_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cgtb00031.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00031_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00031_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00031.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00031_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cgtb00031.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00031_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00031_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00031.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00031_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cgtb00031.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00031_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00023_checkTableConstraints">}
-#+ Check constraints on the "cgtb00023" table
-#+
-#+ @param p_data - a row data LIKE cgtb00023.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00023_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cgtb00023.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cgtb00023_cuenta_no_checkColumnConstraints(p_data.cuenta_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00023_presupuesto_checkColumnConstraints(p_data.presupuesto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00023_ano_checkColumnConstraints(p_data.ano) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00023_mes_checkColumnConstraints(p_data.mes) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00023_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00023_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00023_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00023_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00023_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00023_checkTableConstraints
-
-{<BLOCK Name="fct.cgtb00023_cuenta_no_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00023.cuenta_no" column
-#+
-#+ @param p_cuenta_no - CHAR(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00023_cuenta_no_checkColumnConstraints(p_cuenta_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cuenta_no LIKE cgtb00023.cuenta_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cuenta_no IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cuenta_no: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00023_cuenta_no_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00023_presupuesto_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00023.presupuesto" column
-#+
-#+ @param p_presupuesto - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00023_presupuesto_checkColumnConstraints(p_presupuesto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_presupuesto LIKE cgtb00023.presupuesto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_presupuesto IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- presupuesto: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00023_presupuesto_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00023_ano_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00023.ano" column
-#+
-#+ @param p_ano - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00023_ano_checkColumnConstraints(p_ano)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ano LIKE cgtb00023.ano
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_ano IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- ano: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00023_ano_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00023_mes_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00023.mes" column
-#+
-#+ @param p_mes - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00023_mes_checkColumnConstraints(p_mes)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mes LIKE cgtb00023.mes
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_mes IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- mes: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00023_mes_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00023_status_t_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00023.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00023_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cgtb00023.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00023_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00023_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00023.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00023_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cgtb00023.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00023_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00023_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00023.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00023_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cgtb00023.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00023_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00023_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00023.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00023_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cgtb00023.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00023_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00023_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00023.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00023_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cgtb00023.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00023_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00018_checkTableConstraints">}
-#+ Check constraints on the "cgtb00018" table
-#+
-#+ @param p_data - a row data LIKE cgtb00018.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00018_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cgtb00018.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cgtb00018_tipo_checkColumnConstraints(p_data.tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00018_num_oc_checkColumnConstraints(p_data.num_oc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00018_rep_entrada_checkColumnConstraints(p_data.rep_entrada) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00018_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00018_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00018_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00018_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00018_cantidad_oc_checkColumnConstraints(p_data.cantidad_oc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00018_fob_checkColumnConstraints(p_data.fob) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00018_costo_flete_checkColumnConstraints(p_data.costo_flete) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00018_impuesto_checkColumnConstraints(p_data.impuesto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00018_otros_g_checkColumnConstraints(p_data.otros_g) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00018_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00018_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00018_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00018_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00018_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00018_checkTableConstraints
-
-{<BLOCK Name="fct.cgtb00018_tipo_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00018.tipo" column
-#+
-#+ @param p_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00018_tipo_checkColumnConstraints(p_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo LIKE cgtb00018.tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00018_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00018_num_oc_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00018.num_oc" column
-#+
-#+ @param p_num_oc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00018_num_oc_checkColumnConstraints(p_num_oc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_oc LIKE cgtb00018.num_oc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00018_num_oc_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00018_rep_entrada_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00018.rep_entrada" column
-#+
-#+ @param p_rep_entrada - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00018_rep_entrada_checkColumnConstraints(p_rep_entrada)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_rep_entrada LIKE cgtb00018.rep_entrada
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00018_rep_entrada_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00018_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00018.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00018_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE cgtb00018.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00018_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00018_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00018.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00018_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE cgtb00018.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00018_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00018_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00018.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00018_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE cgtb00018.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00018_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00018_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00018.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00018_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE cgtb00018.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00018_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00018_cantidad_oc_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00018.cantidad_oc" column
-#+
-#+ @param p_cantidad_oc - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00018_cantidad_oc_checkColumnConstraints(p_cantidad_oc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad_oc LIKE cgtb00018.cantidad_oc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00018_cantidad_oc_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00018_fob_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00018.fob" column
-#+
-#+ @param p_fob - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00018_fob_checkColumnConstraints(p_fob)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fob LIKE cgtb00018.fob
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00018_fob_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00018_costo_flete_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00018.costo_flete" column
-#+
-#+ @param p_costo_flete - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00018_costo_flete_checkColumnConstraints(p_costo_flete)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_costo_flete LIKE cgtb00018.costo_flete
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00018_costo_flete_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00018_impuesto_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00018.impuesto" column
-#+
-#+ @param p_impuesto - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00018_impuesto_checkColumnConstraints(p_impuesto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_impuesto LIKE cgtb00018.impuesto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00018_impuesto_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00018_otros_g_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00018.otros_g" column
-#+
-#+ @param p_otros_g - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00018_otros_g_checkColumnConstraints(p_otros_g)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_otros_g LIKE cgtb00018.otros_g
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00018_otros_g_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00018_status_t_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00018.status_t" column
-#+
-#+ @param p_status_t - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00018_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cgtb00018.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00018_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00018_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00018.us_crea" column
-#+
-#+ @param p_us_crea - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00018_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cgtb00018.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00018_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00018_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00018.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00018_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cgtb00018.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00018_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00018_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00018.us_mod" column
-#+
-#+ @param p_us_mod - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00018_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cgtb00018.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00018_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00018_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00018.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00018_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cgtb00018.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00018_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00017_checkTableConstraints">}
-#+ Check constraints on the "cgtb00017" table
-#+
-#+ @param p_data - a row data LIKE cgtb00017.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00017_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cgtb00017.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cgtb00017_tipo_checkColumnConstraints(p_data.tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00017_num_oc_checkColumnConstraints(p_data.num_oc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00017_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00017_liquidada_checkColumnConstraints(p_data.liquidada) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00017_cerrada_checkColumnConstraints(p_data.cerrada) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00017_pagada_checkColumnConstraints(p_data.pagada) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00017_rep_entrada_checkColumnConstraints(p_data.rep_entrada) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00017_factura_checkColumnConstraints(p_data.factura) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00017_prima_us_checkColumnConstraints(p_data.prima_us) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00017_cod_sp_checkColumnConstraints(p_data.cod_sp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00017_cod_sp_sec_checkColumnConstraints(p_data.cod_sp_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00017_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00017_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00017_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00017_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00017_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00017_checkTableConstraints
-
-{<BLOCK Name="fct.cgtb00017_tipo_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00017.tipo" column
-#+
-#+ @param p_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00017_tipo_checkColumnConstraints(p_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo LIKE cgtb00017.tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00017_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00017_num_oc_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00017.num_oc" column
-#+
-#+ @param p_num_oc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00017_num_oc_checkColumnConstraints(p_num_oc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_oc LIKE cgtb00017.num_oc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00017_num_oc_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00017_fecha_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00017.fecha" column
-#+
-#+ @param p_fecha - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00017_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE cgtb00017.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00017_fecha_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00017_liquidada_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00017.liquidada" column
-#+
-#+ @param p_liquidada - VARCHAR2(12) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00017_liquidada_checkColumnConstraints(p_liquidada)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_liquidada LIKE cgtb00017.liquidada
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00017_liquidada_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00017_cerrada_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00017.cerrada" column
-#+
-#+ @param p_cerrada - VARCHAR2(12) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00017_cerrada_checkColumnConstraints(p_cerrada)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cerrada LIKE cgtb00017.cerrada
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00017_cerrada_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00017_pagada_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00017.pagada" column
-#+
-#+ @param p_pagada - VARCHAR2(12) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00017_pagada_checkColumnConstraints(p_pagada)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_pagada LIKE cgtb00017.pagada
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00017_pagada_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00017_rep_entrada_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00017.rep_entrada" column
-#+
-#+ @param p_rep_entrada - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00017_rep_entrada_checkColumnConstraints(p_rep_entrada)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_rep_entrada LIKE cgtb00017.rep_entrada
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00017_rep_entrada_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00017_factura_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00017.factura" column
-#+
-#+ @param p_factura - VARCHAR2(12) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00017_factura_checkColumnConstraints(p_factura)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_factura LIKE cgtb00017.factura
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00017_factura_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00017_prima_us_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00017.prima_us" column
-#+
-#+ @param p_prima_us - DECIMAL(8,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00017_prima_us_checkColumnConstraints(p_prima_us)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_prima_us LIKE cgtb00017.prima_us
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00017_prima_us_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00017_cod_sp_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00017.cod_sp" column
-#+
-#+ @param p_cod_sp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00017_cod_sp_checkColumnConstraints(p_cod_sp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sp LIKE cgtb00017.cod_sp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00017_cod_sp_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00017_cod_sp_sec_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00017.cod_sp_sec" column
-#+
-#+ @param p_cod_sp_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00017_cod_sp_sec_checkColumnConstraints(p_cod_sp_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sp_sec LIKE cgtb00017.cod_sp_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00017_cod_sp_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00017_status_t_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00017.status_t" column
-#+
-#+ @param p_status_t - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00017_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cgtb00017.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00017_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00017_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00017.us_crea" column
-#+
-#+ @param p_us_crea - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00017_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cgtb00017.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00017_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00017_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00017.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00017_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cgtb00017.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00017_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00017_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00017.us_mod" column
-#+
-#+ @param p_us_mod - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00017_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cgtb00017.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00017_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00017_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00017.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00017_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cgtb00017.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00017_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00016_checkTableConstraints">}
-#+ Check constraints on the "cgtb00016" table
-#+
-#+ @param p_data - a row data LIKE cgtb00016.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00016_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cgtb00016.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cgtb00016_cuenta_no_checkColumnConstraints(p_data.cuenta_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00016_estado_a_checkColumnConstraints(p_data.estado_a) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00016_estado_m_checkColumnConstraints(p_data.estado_m) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00016_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00016_debito_checkColumnConstraints(p_data.debito) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00016_credito_checkColumnConstraints(p_data.credito) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00016_balance_ant_checkColumnConstraints(p_data.balance_ant) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00016_actividad_checkColumnConstraints(p_data.actividad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00016_balance_act_checkColumnConstraints(p_data.balance_act) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00016_primern_checkColumnConstraints(p_data.primern) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00016_checkTableConstraints
-
-{<BLOCK Name="fct.cgtb00016_cuenta_no_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00016.cuenta_no" column
-#+
-#+ @param p_cuenta_no - CHAR(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00016_cuenta_no_checkColumnConstraints(p_cuenta_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cuenta_no LIKE cgtb00016.cuenta_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00016_cuenta_no_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00016_estado_a_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00016.estado_a" column
-#+
-#+ @param p_estado_a - CHAR(4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00016_estado_a_checkColumnConstraints(p_estado_a)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_estado_a LIKE cgtb00016.estado_a
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00016_estado_a_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00016_estado_m_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00016.estado_m" column
-#+
-#+ @param p_estado_m - CHAR(4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00016_estado_m_checkColumnConstraints(p_estado_m)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_estado_m LIKE cgtb00016.estado_m
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00016_estado_m_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00016_descripcion_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00016.descripcion" column
-#+
-#+ @param p_descripcion - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00016_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE cgtb00016.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00016_descripcion_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00016_debito_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00016.debito" column
-#+
-#+ @param p_debito - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00016_debito_checkColumnConstraints(p_debito)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_debito LIKE cgtb00016.debito
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00016_debito_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00016_credito_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00016.credito" column
-#+
-#+ @param p_credito - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00016_credito_checkColumnConstraints(p_credito)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_credito LIKE cgtb00016.credito
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00016_credito_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00016_balance_ant_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00016.balance_ant" column
-#+
-#+ @param p_balance_ant - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00016_balance_ant_checkColumnConstraints(p_balance_ant)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_balance_ant LIKE cgtb00016.balance_ant
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00016_balance_ant_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00016_actividad_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00016.actividad" column
-#+
-#+ @param p_actividad - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00016_actividad_checkColumnConstraints(p_actividad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_actividad LIKE cgtb00016.actividad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00016_actividad_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00016_balance_act_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00016.balance_act" column
-#+
-#+ @param p_balance_act - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00016_balance_act_checkColumnConstraints(p_balance_act)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_balance_act LIKE cgtb00016.balance_act
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00016_balance_act_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00016_primern_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00016.primern" column
-#+
-#+ @param p_primern - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00016_primern_checkColumnConstraints(p_primern)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_primern LIKE cgtb00016.primern
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00016_primern_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00014_checkTableConstraints">}
-#+ Check constraints on the "cgtb00014" table
-#+
-#+ @param p_data - a row data LIKE cgtb00014.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00014_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cgtb00014.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cgtb00014_cuenta_no_checkColumnConstraints(p_data.cuenta_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00014_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00014_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00014_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00014_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00014_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00014_checkTableConstraints
-
-{<BLOCK Name="fct.cgtb00014_cuenta_no_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00014.cuenta_no" column
-#+
-#+ @param p_cuenta_no - CHAR(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00014_cuenta_no_checkColumnConstraints(p_cuenta_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cuenta_no LIKE cgtb00014.cuenta_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00014_cuenta_no_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00014_status_t_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00014.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00014_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cgtb00014.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00014_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00014_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00014.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00014_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cgtb00014.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00014_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00014_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00014.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00014_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cgtb00014.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00014_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00014_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00014.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00014_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cgtb00014.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00014_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00014_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00014.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00014_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cgtb00014.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00014_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00012_checkTableConstraints">}
-#+ Check constraints on the "cgtb00012" table
-#+
-#+ @param p_data - a row data LIKE cgtb00012.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00012_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cgtb00012.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cgtb00012_cheque_no_checkColumnConstraints(p_data.cheque_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00012_cuenta_no_checkColumnConstraints(p_data.cuenta_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00012_nombre_bco_checkColumnConstraints(p_data.nombre_bco) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00012_direccion_checkColumnConstraints(p_data.direccion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00012_cuenta_bank_checkColumnConstraints(p_data.cuenta_bank) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00012_codigo_1_checkColumnConstraints(p_data.codigo_1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00012_codigo_2_checkColumnConstraints(p_data.codigo_2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00012_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00012_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00012_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00012_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00012_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00012_checkTableConstraints
-
-{<BLOCK Name="fct.cgtb00012_cheque_no_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00012.cheque_no" column
-#+
-#+ @param p_cheque_no - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00012_cheque_no_checkColumnConstraints(p_cheque_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cheque_no LIKE cgtb00012.cheque_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00012_cheque_no_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00012_cuenta_no_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00012.cuenta_no" column
-#+
-#+ @param p_cuenta_no - VARCHAR2(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00012_cuenta_no_checkColumnConstraints(p_cuenta_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cuenta_no LIKE cgtb00012.cuenta_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00012_cuenta_no_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00012_nombre_bco_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00012.nombre_bco" column
-#+
-#+ @param p_nombre_bco - VARCHAR2(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00012_nombre_bco_checkColumnConstraints(p_nombre_bco)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombre_bco LIKE cgtb00012.nombre_bco
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00012_nombre_bco_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00012_direccion_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00012.direccion" column
-#+
-#+ @param p_direccion - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00012_direccion_checkColumnConstraints(p_direccion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_direccion LIKE cgtb00012.direccion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00012_direccion_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00012_cuenta_bank_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00012.cuenta_bank" column
-#+
-#+ @param p_cuenta_bank - VARCHAR2(14) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00012_cuenta_bank_checkColumnConstraints(p_cuenta_bank)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cuenta_bank LIKE cgtb00012.cuenta_bank
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00012_cuenta_bank_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00012_codigo_1_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00012.codigo_1" column
-#+
-#+ @param p_codigo_1 - VARCHAR2(7) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00012_codigo_1_checkColumnConstraints(p_codigo_1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codigo_1 LIKE cgtb00012.codigo_1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00012_codigo_1_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00012_codigo_2_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00012.codigo_2" column
-#+
-#+ @param p_codigo_2 - VARCHAR2(7) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00012_codigo_2_checkColumnConstraints(p_codigo_2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codigo_2 LIKE cgtb00012.codigo_2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00012_codigo_2_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00012_status_t_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00012.status_t" column
-#+
-#+ @param p_status_t - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00012_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cgtb00012.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00012_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00012_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00012.us_crea" column
-#+
-#+ @param p_us_crea - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00012_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cgtb00012.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00012_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00012_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00012.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00012_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cgtb00012.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00012_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00012_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00012.us_mod" column
-#+
-#+ @param p_us_mod - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00012_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cgtb00012.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00012_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00012_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00012.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00012_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cgtb00012.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00012_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00011_checkTableConstraints">}
-#+ Check constraints on the "cgtb00011" table
-#+
-#+ @param p_data - a row data LIKE cgtb00011.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00011_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cgtb00011.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cgtb00011_entrada_no_checkColumnConstraints(p_data.entrada_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00011_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00011_prog_4gl_checkColumnConstraints(p_data.prog_4gl) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00011_referencia_checkColumnConstraints(p_data.referencia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00011_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00011_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00011_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00011_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00011_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00011_checkTableConstraints
-
-{<BLOCK Name="fct.cgtb00011_entrada_no_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00011.entrada_no" column
-#+
-#+ @param p_entrada_no - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00011_entrada_no_checkColumnConstraints(p_entrada_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_entrada_no LIKE cgtb00011.entrada_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00011_entrada_no_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00011_descripcion_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00011.descripcion" column
-#+
-#+ @param p_descripcion - VARCHAR2(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00011_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE cgtb00011.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00011_descripcion_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00011_prog_4gl_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00011.prog_4gl" column
-#+
-#+ @param p_prog_4gl - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00011_prog_4gl_checkColumnConstraints(p_prog_4gl)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_prog_4gl LIKE cgtb00011.prog_4gl
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00011_prog_4gl_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00011_referencia_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00011.referencia" column
-#+
-#+ @param p_referencia - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00011_referencia_checkColumnConstraints(p_referencia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_referencia LIKE cgtb00011.referencia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00011_referencia_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00011_status_t_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00011.status_t" column
-#+
-#+ @param p_status_t - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00011_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cgtb00011.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00011_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00011_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00011.us_crea" column
-#+
-#+ @param p_us_crea - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00011_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cgtb00011.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00011_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00011_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00011.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00011_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cgtb00011.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00011_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00011_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00011.us_mod" column
-#+
-#+ @param p_us_mod - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00011_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cgtb00011.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00011_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00011_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00011.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00011_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cgtb00011.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00011_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00010_checkTableConstraints">}
-#+ Check constraints on the "cgtb00010" table
-#+
-#+ @param p_data - a row data LIKE cgtb00010.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00010_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cgtb00010.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cgtb00010_cod_mov_checkColumnConstraints(p_data.cod_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00010_cuenta_no_checkColumnConstraints(p_data.cuenta_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00010_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00010_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00010_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00010_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00010_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00010_checkTableConstraints
-
-{<BLOCK Name="fct.cgtb00010_cod_mov_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00010.cod_mov" column
-#+
-#+ @param p_cod_mov - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00010_cod_mov_checkColumnConstraints(p_cod_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mov LIKE cgtb00010.cod_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00010_cod_mov_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00010_cuenta_no_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00010.cuenta_no" column
-#+
-#+ @param p_cuenta_no - CHAR(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00010_cuenta_no_checkColumnConstraints(p_cuenta_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cuenta_no LIKE cgtb00010.cuenta_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00010_cuenta_no_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00010_status_t_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00010.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00010_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cgtb00010.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00010_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00010_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00010.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00010_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cgtb00010.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00010_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00010_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00010.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00010_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cgtb00010.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00010_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00010_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00010.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00010_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cgtb00010.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00010_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00010_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00010.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00010_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cgtb00010.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00010_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00009_checkTableConstraints">}
-#+ Check constraints on the "cgtb00009" table
-#+
-#+ @param p_data - a row data LIKE cgtb00009.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00009_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cgtb00009.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cgtb00009_cod_mov_checkColumnConstraints(p_data.cod_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00009_cuenta_no_checkColumnConstraints(p_data.cuenta_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00009_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00009_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00009_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00009_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00009_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00009_checkTableConstraints
-
-{<BLOCK Name="fct.cgtb00009_cod_mov_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00009.cod_mov" column
-#+
-#+ @param p_cod_mov - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00009_cod_mov_checkColumnConstraints(p_cod_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mov LIKE cgtb00009.cod_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00009_cod_mov_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00009_cuenta_no_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00009.cuenta_no" column
-#+
-#+ @param p_cuenta_no - CHAR(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00009_cuenta_no_checkColumnConstraints(p_cuenta_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cuenta_no LIKE cgtb00009.cuenta_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00009_cuenta_no_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00009_status_t_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00009.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00009_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cgtb00009.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00009_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00009_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00009.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00009_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cgtb00009.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00009_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00009_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00009.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00009_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cgtb00009.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00009_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00009_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00009.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00009_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cgtb00009.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00009_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00009_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00009.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00009_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cgtb00009.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00009_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00005_checkTableConstraints">}
-#+ Check constraints on the "cgtb00005" table
-#+
-#+ @param p_data - a row data LIKE cgtb00005.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00005_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cgtb00005.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cgtb00005_cuenta_no_checkColumnConstraints(p_data.cuenta_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00005_cheque_no_checkColumnConstraints(p_data.cheque_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00005_num_emp_checkColumnConstraints(p_data.num_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00005_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00005_portador_checkColumnConstraints(p_data.portador) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00005_tasa_checkColumnConstraints(p_data.tasa) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00005_monto_checkColumnConstraints(p_data.monto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00005_status_impresion_checkColumnConstraints(p_data.status_impresion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00005_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00005_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00005_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00005_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00005_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00005_checkTableConstraints
-
-{<BLOCK Name="fct.cgtb00005_cuenta_no_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00005.cuenta_no" column
-#+
-#+ @param p_cuenta_no - VARCHAR2(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00005_cuenta_no_checkColumnConstraints(p_cuenta_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cuenta_no LIKE cgtb00005.cuenta_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cuenta_no IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cuenta_no: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00005_cuenta_no_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00005_cheque_no_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00005.cheque_no" column
-#+
-#+ @param p_cheque_no - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00005_cheque_no_checkColumnConstraints(p_cheque_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cheque_no LIKE cgtb00005.cheque_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cheque_no IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cheque_no: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00005_cheque_no_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00005_num_emp_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00005.num_emp" column
-#+
-#+ @param p_num_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00005_num_emp_checkColumnConstraints(p_num_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_emp LIKE cgtb00005.num_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00005_num_emp_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00005_fecha_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00005.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00005_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE cgtb00005.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_fecha IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- fecha: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00005_fecha_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00005_portador_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00005.portador" column
-#+
-#+ @param p_portador - VARCHAR2(44) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00005_portador_checkColumnConstraints(p_portador)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_portador LIKE cgtb00005.portador
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_portador IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- portador: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00005_portador_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00005_tasa_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00005.tasa" column
-#+
-#+ @param p_tasa - DECIMAL(8,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00005_tasa_checkColumnConstraints(p_tasa)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tasa LIKE cgtb00005.tasa
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00005_tasa_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00005_monto_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00005.monto" column
-#+
-#+ @param p_monto - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00005_monto_checkColumnConstraints(p_monto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_monto LIKE cgtb00005.monto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_monto IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- monto: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00005_monto_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00005_status_impresion_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00005.status_impresion" column
-#+
-#+ @param p_status_impresion - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00005_status_impresion_checkColumnConstraints(p_status_impresion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_impresion LIKE cgtb00005.status_impresion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00005_status_impresion_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00005_status_t_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00005.status_t" column
-#+
-#+ @param p_status_t - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00005_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cgtb00005.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00005_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00005_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00005.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00005_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cgtb00005.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00005_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00005_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00005.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00005_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cgtb00005.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00005_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00005_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00005.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00005_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cgtb00005.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00005_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00005_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00005.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00005_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cgtb00005.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00005_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00004_checkTableConstraints">}
-#+ Check constraints on the "cgtb00004" table
-#+
-#+ @param p_data - a row data LIKE cgtb00004.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00004_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cgtb00004.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cgtb00004_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00004_tipo_checkColumnConstraints(p_data.tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00004_ref_checkColumnConstraints(p_data.ref) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00004_cuenta_no_checkColumnConstraints(p_data.cuenta_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00004_departamento_checkColumnConstraints(p_data.departamento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00004_num_doc_checkColumnConstraints(p_data.num_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00004_cod_aux_checkColumnConstraints(p_data.cod_aux) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00004_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00004_detalles_checkColumnConstraints(p_data.detalles) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00004_detalle_1_checkColumnConstraints(p_data.detalle_1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00004_detalle_2_checkColumnConstraints(p_data.detalle_2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00004_debito_checkColumnConstraints(p_data.debito) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00004_credito_checkColumnConstraints(p_data.credito) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00004_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00004_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00004_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00004_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00004_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00004_checkTableConstraints
-
-{<BLOCK Name="fct.cgtb00004_fecha_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00004.fecha" column
-#+
-#+ @param p_fecha - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00004_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE cgtb00004.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00004_fecha_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00004_tipo_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00004.tipo" column
-#+
-#+ @param p_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00004_tipo_checkColumnConstraints(p_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo LIKE cgtb00004.tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00004_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00004_ref_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00004.ref" column
-#+
-#+ @param p_ref - VARCHAR2(14) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00004_ref_checkColumnConstraints(p_ref)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ref LIKE cgtb00004.ref
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_ref IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- ref: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00004_ref_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00004_cuenta_no_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00004.cuenta_no" column
-#+
-#+ @param p_cuenta_no - VARCHAR2(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00004_cuenta_no_checkColumnConstraints(p_cuenta_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cuenta_no LIKE cgtb00004.cuenta_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00004_cuenta_no_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00004_departamento_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00004.departamento" column
-#+
-#+ @param p_departamento - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00004_departamento_checkColumnConstraints(p_departamento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_departamento LIKE cgtb00004.departamento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00004_departamento_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00004_num_doc_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00004.num_doc" column
-#+
-#+ @param p_num_doc - VARCHAR2(12) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00004_num_doc_checkColumnConstraints(p_num_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_doc LIKE cgtb00004.num_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00004_num_doc_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00004_cod_aux_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00004.cod_aux" column
-#+
-#+ @param p_cod_aux - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00004_cod_aux_checkColumnConstraints(p_cod_aux)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_aux LIKE cgtb00004.cod_aux
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00004_cod_aux_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00004_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00004.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00004_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE cgtb00004.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00004_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00004_detalles_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00004.detalles" column
-#+
-#+ @param p_detalles - VARCHAR2(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00004_detalles_checkColumnConstraints(p_detalles)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_detalles LIKE cgtb00004.detalles
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00004_detalles_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00004_detalle_1_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00004.detalle_1" column
-#+
-#+ @param p_detalle_1 - VARCHAR2(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00004_detalle_1_checkColumnConstraints(p_detalle_1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_detalle_1 LIKE cgtb00004.detalle_1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00004_detalle_1_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00004_detalle_2_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00004.detalle_2" column
-#+
-#+ @param p_detalle_2 - VARCHAR2(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00004_detalle_2_checkColumnConstraints(p_detalle_2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_detalle_2 LIKE cgtb00004.detalle_2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00004_detalle_2_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00004_debito_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00004.debito" column
-#+
-#+ @param p_debito - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00004_debito_checkColumnConstraints(p_debito)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_debito LIKE cgtb00004.debito
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00004_debito_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00004_credito_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00004.credito" column
-#+
-#+ @param p_credito - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00004_credito_checkColumnConstraints(p_credito)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_credito LIKE cgtb00004.credito
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00004_credito_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00004_status_t_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00004.status_t" column
-#+
-#+ @param p_status_t - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00004_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cgtb00004.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00004_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00004_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00004.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00004_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cgtb00004.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00004_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00004_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00004.fech_crea" column
-#+
-#+ @param p_fech_crea - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00004_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cgtb00004.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00004_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00004_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00004.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00004_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cgtb00004.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00004_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00004_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00004.fech_mod" column
-#+
-#+ @param p_fech_mod - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00004_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cgtb00004.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00004_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00003_checkTableConstraints">}
-#+ Check constraints on the "cgtb00003" table
-#+
-#+ @param p_data - a row data LIKE cgtb00003.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00003_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cgtb00003.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cgtb00003_tipo_checkColumnConstraints(p_data.tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00003_clave_checkColumnConstraints(p_data.clave) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00003_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00003_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00003_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00003_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00003_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00003_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00003_checkTableConstraints
-
-{<BLOCK Name="fct.cgtb00003_tipo_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00003.tipo" column
-#+
-#+ @param p_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00003_tipo_checkColumnConstraints(p_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo LIKE cgtb00003.tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00003_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00003_clave_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00003.clave" column
-#+
-#+ @param p_clave - CHAR(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00003_clave_checkColumnConstraints(p_clave)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_clave LIKE cgtb00003.clave
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00003_clave_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00003_descripcion_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00003.descripcion" column
-#+
-#+ @param p_descripcion - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00003_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE cgtb00003.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00003_descripcion_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00003_status_t_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00003.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00003_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cgtb00003.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00003_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00003_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00003.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00003_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cgtb00003.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00003_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00003_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00003.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00003_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cgtb00003.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00003_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00003_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00003.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00003_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cgtb00003.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00003_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00003_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00003.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00003_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cgtb00003.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00003_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00002_checkTableConstraints">}
-#+ Check constraints on the "cgtb00002" table
-#+
-#+ @param p_data - a row data LIKE cgtb00002.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00002_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cgtb00002.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cgtb00002_cuenta_no_checkColumnConstraints(p_data.cuenta_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00002_departamento_checkColumnConstraints(p_data.departamento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00002_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00002_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00002_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00002_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00002_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00002_checkTableConstraints
-
-{<BLOCK Name="fct.cgtb00002_cuenta_no_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00002.cuenta_no" column
-#+
-#+ @param p_cuenta_no - CHAR(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00002_cuenta_no_checkColumnConstraints(p_cuenta_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cuenta_no LIKE cgtb00002.cuenta_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00002_cuenta_no_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00002_departamento_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00002.departamento" column
-#+
-#+ @param p_departamento - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00002_departamento_checkColumnConstraints(p_departamento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_departamento LIKE cgtb00002.departamento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00002_departamento_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00002_status_t_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00002.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00002_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cgtb00002.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00002_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00002_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00002.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00002_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cgtb00002.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00002_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00002_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00002.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00002_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cgtb00002.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00002_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00002_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00002.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00002_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cgtb00002.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00002_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00002_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00002.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00002_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cgtb00002.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00002_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00001_checkTableConstraints">}
-#+ Check constraints on the "cgtb00001" table
-#+
-#+ @param p_data - a row data LIKE cgtb00001.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00001_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cgtb00001.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cgtb00001_cuenta_no_checkColumnConstraints(p_data.cuenta_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00001_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00001_descrip_ing_checkColumnConstraints(p_data.descrip_ing) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00001_analitico_checkColumnConstraints(p_data.analitico) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00001_cata_checkColumnConstraints(p_data.cata) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00001_depto_checkColumnConstraints(p_data.depto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00001_nivel_checkColumnConstraints(p_data.nivel) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00001_ref_checkColumnConstraints(p_data.ref) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00001_origen_checkColumnConstraints(p_data.origen) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00001_estado_a_checkColumnConstraints(p_data.estado_a) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00001_estado_m_checkColumnConstraints(p_data.estado_m) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00001_aplica_a_checkColumnConstraints(p_data.aplica_a) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00001_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00001_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00001_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00001_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00001_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00001_cuenta_resultado_checkColumnConstraints(p_data.cuenta_resultado) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cgtb00001_grupo_checkColumnConstraints(p_data.grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00001_checkTableConstraints
-
-{<BLOCK Name="fct.cgtb00001_cuenta_no_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00001.cuenta_no" column
-#+
-#+ @param p_cuenta_no - VARCHAR2(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00001_cuenta_no_checkColumnConstraints(p_cuenta_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cuenta_no LIKE cgtb00001.cuenta_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00001_cuenta_no_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00001_descripcion_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00001.descripcion" column
-#+
-#+ @param p_descripcion - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00001_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE cgtb00001.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00001_descripcion_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00001_descrip_ing_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00001.descrip_ing" column
-#+
-#+ @param p_descrip_ing - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00001_descrip_ing_checkColumnConstraints(p_descrip_ing)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descrip_ing LIKE cgtb00001.descrip_ing
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00001_descrip_ing_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00001_analitico_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00001.analitico" column
-#+
-#+ @param p_analitico - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00001_analitico_checkColumnConstraints(p_analitico)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_analitico LIKE cgtb00001.analitico
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00001_analitico_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00001_cata_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00001.cata" column
-#+
-#+ @param p_cata - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00001_cata_checkColumnConstraints(p_cata)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cata LIKE cgtb00001.cata
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00001_cata_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00001_depto_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00001.depto" column
-#+
-#+ @param p_depto - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00001_depto_checkColumnConstraints(p_depto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_depto LIKE cgtb00001.depto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00001_depto_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00001_nivel_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00001.nivel" column
-#+
-#+ @param p_nivel - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00001_nivel_checkColumnConstraints(p_nivel)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nivel LIKE cgtb00001.nivel
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00001_nivel_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00001_ref_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00001.ref" column
-#+
-#+ @param p_ref - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00001_ref_checkColumnConstraints(p_ref)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ref LIKE cgtb00001.ref
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00001_ref_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00001_origen_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00001.origen" column
-#+
-#+ @param p_origen - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00001_origen_checkColumnConstraints(p_origen)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_origen LIKE cgtb00001.origen
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00001_origen_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00001_estado_a_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00001.estado_a" column
-#+
-#+ @param p_estado_a - VARCHAR2(4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00001_estado_a_checkColumnConstraints(p_estado_a)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_estado_a LIKE cgtb00001.estado_a
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00001_estado_a_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00001_estado_m_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00001.estado_m" column
-#+
-#+ @param p_estado_m - VARCHAR2(4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00001_estado_m_checkColumnConstraints(p_estado_m)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_estado_m LIKE cgtb00001.estado_m
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00001_estado_m_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00001_aplica_a_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00001.aplica_a" column
-#+
-#+ @param p_aplica_a - VARCHAR2(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00001_aplica_a_checkColumnConstraints(p_aplica_a)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_aplica_a LIKE cgtb00001.aplica_a
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00001_aplica_a_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00001_status_t_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00001.status_t" column
-#+
-#+ @param p_status_t - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00001_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cgtb00001.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00001_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00001_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00001.us_crea" column
-#+
-#+ @param p_us_crea - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00001_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cgtb00001.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00001_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00001_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00001.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00001_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cgtb00001.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00001_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00001_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00001.us_mod" column
-#+
-#+ @param p_us_mod - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00001_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cgtb00001.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00001_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00001_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00001.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00001_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cgtb00001.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00001_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00001_cuenta_resultado_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00001.cuenta_resultado" column
-#+
-#+ @param p_cuenta_resultado - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00001_cuenta_resultado_checkColumnConstraints(p_cuenta_resultado)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cuenta_resultado LIKE cgtb00001.cuenta_resultado
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00001_cuenta_resultado_checkColumnConstraints
-
-{<BLOCK Name="fct.cgtb00001_grupo_checkColumnConstraints">}
-#+ Check constraints on the "cgtb00001.grupo" column
-#+
-#+ @param p_grupo - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cgtb00001_grupo_checkColumnConstraints(p_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_grupo LIKE cgtb00001.grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cgtb00001_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00041_checkTableConstraints">}
-#+ Check constraints on the "cctb00041" table
-#+
-#+ @param p_data - a row data LIKE cctb00041.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00041_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cctb00041.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cctb00041_num_doc_checkColumnConstraints(p_data.num_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00041_tipo_doc_checkColumnConstraints(p_data.tipo_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00041_num_req_checkColumnConstraints(p_data.num_req) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00041_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00041_checkTableConstraints
-
-{<BLOCK Name="fct.cctb00041_num_doc_checkColumnConstraints">}
-#+ Check constraints on the "cctb00041.num_doc" column
-#+
-#+ @param p_num_doc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00041_num_doc_checkColumnConstraints(p_num_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_doc LIKE cctb00041.num_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00041_num_doc_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00041_tipo_doc_checkColumnConstraints">}
-#+ Check constraints on the "cctb00041.tipo_doc" column
-#+
-#+ @param p_tipo_doc - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00041_tipo_doc_checkColumnConstraints(p_tipo_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_doc LIKE cctb00041.tipo_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00041_tipo_doc_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00041_num_req_checkColumnConstraints">}
-#+ Check constraints on the "cctb00041.num_req" column
-#+
-#+ @param p_num_req - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00041_num_req_checkColumnConstraints(p_num_req)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_req LIKE cctb00041.num_req
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00041_num_req_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00041_fecha_checkColumnConstraints">}
-#+ Check constraints on the "cctb00041.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00041_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE cctb00041.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00041_fecha_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00040_checkTableConstraints">}
-#+ Check constraints on the "cctb00040" table
-#+
-#+ @param p_data - a row data LIKE cctb00040.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00040_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cctb00040.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cctb00040_num_req_checkColumnConstraints(p_data.num_req) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00040_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00040_usuario_checkColumnConstraints(p_data.usuario) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00040_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00040_checkTableConstraints
-
-{<BLOCK Name="fct.cctb00040_num_req_checkColumnConstraints">}
-#+ Check constraints on the "cctb00040.num_req" column
-#+
-#+ @param p_num_req - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00040_num_req_checkColumnConstraints(p_num_req)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_req LIKE cctb00040.num_req
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_num_req IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- num_req: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00040_num_req_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00040_fecha_checkColumnConstraints">}
-#+ Check constraints on the "cctb00040.fecha" column
-#+
-#+ @param p_fecha - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00040_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE cctb00040.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00040_fecha_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00040_usuario_checkColumnConstraints">}
-#+ Check constraints on the "cctb00040.usuario" column
-#+
-#+ @param p_usuario - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00040_usuario_checkColumnConstraints(p_usuario)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_usuario LIKE cctb00040.usuario
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00040_usuario_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00040_descripcion_checkColumnConstraints">}
-#+ Check constraints on the "cctb00040.descripcion" column
-#+
-#+ @param p_descripcion - CHAR(220) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00040_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE cctb00040.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00040_descripcion_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00034_checkTableConstraints">}
-#+ Check constraints on the "cctb00034" table
-#+
-#+ @param p_data - a row data LIKE cctb00034.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00034_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cctb00034.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cctb00034_id_kit_checkColumnConstraints(p_data.id_kit) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00034_num_req_checkColumnConstraints(p_data.num_req) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00034_area_checkColumnConstraints(p_data.area) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00034_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00034_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00034_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00034_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00034_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00034_precio_checkColumnConstraints(p_data.precio) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00034_checkTableConstraints
-
-{<BLOCK Name="fct.cctb00034_id_kit_checkColumnConstraints">}
-#+ Check constraints on the "cctb00034.id_kit" column
-#+
-#+ @param p_id_kit - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00034_id_kit_checkColumnConstraints(p_id_kit)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_id_kit LIKE cctb00034.id_kit
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00034_id_kit_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00034_num_req_checkColumnConstraints">}
-#+ Check constraints on the "cctb00034.num_req" column
-#+
-#+ @param p_num_req - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00034_num_req_checkColumnConstraints(p_num_req)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_req LIKE cctb00034.num_req
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00034_num_req_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00034_area_checkColumnConstraints">}
-#+ Check constraints on the "cctb00034.area" column
-#+
-#+ @param p_area - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00034_area_checkColumnConstraints(p_area)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_area LIKE cctb00034.area
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00034_area_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00034_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "cctb00034.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00034_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE cctb00034.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00034_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00034_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "cctb00034.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00034_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE cctb00034.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00034_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00034_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "cctb00034.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00034_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE cctb00034.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00034_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00034_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "cctb00034.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00034_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE cctb00034.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00034_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00034_cantidad_checkColumnConstraints">}
-#+ Check constraints on the "cctb00034.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00034_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE cctb00034.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00034_cantidad_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00034_precio_checkColumnConstraints">}
-#+ Check constraints on the "cctb00034.precio" column
-#+
-#+ @param p_precio - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00034_precio_checkColumnConstraints(p_precio)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_precio LIKE cctb00034.precio
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00034_precio_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00033_checkTableConstraints">}
-#+ Check constraints on the "cctb00033" table
-#+
-#+ @param p_data - a row data LIKE cctb00033.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00033_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cctb00033.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cctb00033_idnum_checkColumnConstraints(p_data.idnum) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00033_num_doc_checkColumnConstraints(p_data.num_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00033_num_ref_checkColumnConstraints(p_data.num_ref) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00033_aplica_a_checkColumnConstraints(p_data.aplica_a) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00033_pendiente_checkColumnConstraints(p_data.pendiente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00033_descuento_checkColumnConstraints(p_data.descuento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00033_valor_pagado_checkColumnConstraints(p_data.valor_pagado) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00033_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00033_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00033_fecha_crea_checkColumnConstraints(p_data.fecha_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00033_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00033_fecha_mod_checkColumnConstraints(p_data.fecha_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00033_checkTableConstraints
-
-{<BLOCK Name="fct.cctb00033_idnum_checkColumnConstraints">}
-#+ Check constraints on the "cctb00033.idnum" column
-#+
-#+ @param p_idnum - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00033_idnum_checkColumnConstraints(p_idnum)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_idnum LIKE cctb00033.idnum
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00033_idnum_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00033_num_doc_checkColumnConstraints">}
-#+ Check constraints on the "cctb00033.num_doc" column
-#+
-#+ @param p_num_doc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00033_num_doc_checkColumnConstraints(p_num_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_doc LIKE cctb00033.num_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00033_num_doc_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00033_num_ref_checkColumnConstraints">}
-#+ Check constraints on the "cctb00033.num_ref" column
-#+
-#+ @param p_num_ref - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00033_num_ref_checkColumnConstraints(p_num_ref)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_ref LIKE cctb00033.num_ref
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00033_num_ref_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00033_aplica_a_checkColumnConstraints">}
-#+ Check constraints on the "cctb00033.aplica_a" column
-#+
-#+ @param p_aplica_a - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00033_aplica_a_checkColumnConstraints(p_aplica_a)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_aplica_a LIKE cctb00033.aplica_a
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00033_aplica_a_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00033_pendiente_checkColumnConstraints">}
-#+ Check constraints on the "cctb00033.pendiente" column
-#+
-#+ @param p_pendiente - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00033_pendiente_checkColumnConstraints(p_pendiente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_pendiente LIKE cctb00033.pendiente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00033_pendiente_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00033_descuento_checkColumnConstraints">}
-#+ Check constraints on the "cctb00033.descuento" column
-#+
-#+ @param p_descuento - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00033_descuento_checkColumnConstraints(p_descuento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descuento LIKE cctb00033.descuento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00033_descuento_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00033_valor_pagado_checkColumnConstraints">}
-#+ Check constraints on the "cctb00033.valor_pagado" column
-#+
-#+ @param p_valor_pagado - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00033_valor_pagado_checkColumnConstraints(p_valor_pagado)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valor_pagado LIKE cctb00033.valor_pagado
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00033_valor_pagado_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00033_status_t_checkColumnConstraints">}
-#+ Check constraints on the "cctb00033.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00033_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cctb00033.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00033_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00033_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "cctb00033.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00033_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cctb00033.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00033_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00033_fecha_crea_checkColumnConstraints">}
-#+ Check constraints on the "cctb00033.fecha_crea" column
-#+
-#+ @param p_fecha_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00033_fecha_crea_checkColumnConstraints(p_fecha_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_crea LIKE cctb00033.fecha_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00033_fecha_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00033_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "cctb00033.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00033_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cctb00033.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00033_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00033_fecha_mod_checkColumnConstraints">}
-#+ Check constraints on the "cctb00033.fecha_mod" column
-#+
-#+ @param p_fecha_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00033_fecha_mod_checkColumnConstraints(p_fecha_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_mod LIKE cctb00033.fecha_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00033_fecha_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00032_checkTableConstraints">}
-#+ Check constraints on the "cctb00032" table
-#+
-#+ @param p_data - a row data LIKE cctb00032.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00032_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cctb00032.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cctb00032_idnum_checkColumnConstraints(p_data.idnum) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00032_num_doc_checkColumnConstraints(p_data.num_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00032_tipo_doc_checkColumnConstraints(p_data.tipo_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00032_localidad_checkColumnConstraints(p_data.localidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00032_cuenta_no_checkColumnConstraints(p_data.cuenta_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00032_depsito_checkColumnConstraints(p_data.depsito) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00032_tipo_cliente_checkColumnConstraints(p_data.tipo_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00032_sec_cliente_checkColumnConstraints(p_data.sec_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00032_sec_vend_checkColumnConstraints(p_data.sec_vend) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00032_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00032_comentario_checkColumnConstraints(p_data.comentario) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00032_valor_recibo_checkColumnConstraints(p_data.valor_recibo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00032_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00032_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00032_fecha_crea_checkColumnConstraints(p_data.fecha_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00032_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00032_fecha_mod_checkColumnConstraints(p_data.fecha_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00032_checkTableConstraints
-
-{<BLOCK Name="fct.cctb00032_idnum_checkColumnConstraints">}
-#+ Check constraints on the "cctb00032.idnum" column
-#+
-#+ @param p_idnum - SERIAL -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00032_idnum_checkColumnConstraints(p_idnum)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_idnum LIKE cctb00032.idnum
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_idnum IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- idnum: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00032_idnum_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00032_num_doc_checkColumnConstraints">}
-#+ Check constraints on the "cctb00032.num_doc" column
-#+
-#+ @param p_num_doc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00032_num_doc_checkColumnConstraints(p_num_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_doc LIKE cctb00032.num_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00032_num_doc_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00032_tipo_doc_checkColumnConstraints">}
-#+ Check constraints on the "cctb00032.tipo_doc" column
-#+
-#+ @param p_tipo_doc - CHAR(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00032_tipo_doc_checkColumnConstraints(p_tipo_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_doc LIKE cctb00032.tipo_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00032_tipo_doc_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00032_localidad_checkColumnConstraints">}
-#+ Check constraints on the "cctb00032.localidad" column
-#+
-#+ @param p_localidad - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00032_localidad_checkColumnConstraints(p_localidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_localidad LIKE cctb00032.localidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00032_localidad_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00032_cuenta_no_checkColumnConstraints">}
-#+ Check constraints on the "cctb00032.cuenta_no" column
-#+
-#+ @param p_cuenta_no - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00032_cuenta_no_checkColumnConstraints(p_cuenta_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cuenta_no LIKE cctb00032.cuenta_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00032_cuenta_no_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00032_depsito_checkColumnConstraints">}
-#+ Check constraints on the "cctb00032.depsito" column
-#+
-#+ @param p_depsito - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00032_depsito_checkColumnConstraints(p_depsito)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_depsito LIKE cctb00032.depsito
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00032_depsito_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00032_tipo_cliente_checkColumnConstraints">}
-#+ Check constraints on the "cctb00032.tipo_cliente" column
-#+
-#+ @param p_tipo_cliente - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00032_tipo_cliente_checkColumnConstraints(p_tipo_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_cliente LIKE cctb00032.tipo_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00032_tipo_cliente_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00032_sec_cliente_checkColumnConstraints">}
-#+ Check constraints on the "cctb00032.sec_cliente" column
-#+
-#+ @param p_sec_cliente - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00032_sec_cliente_checkColumnConstraints(p_sec_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_cliente LIKE cctb00032.sec_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00032_sec_cliente_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00032_sec_vend_checkColumnConstraints">}
-#+ Check constraints on the "cctb00032.sec_vend" column
-#+
-#+ @param p_sec_vend - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00032_sec_vend_checkColumnConstraints(p_sec_vend)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_vend LIKE cctb00032.sec_vend
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00032_sec_vend_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00032_fecha_checkColumnConstraints">}
-#+ Check constraints on the "cctb00032.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00032_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE cctb00032.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00032_fecha_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00032_comentario_checkColumnConstraints">}
-#+ Check constraints on the "cctb00032.comentario" column
-#+
-#+ @param p_comentario - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00032_comentario_checkColumnConstraints(p_comentario)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_comentario LIKE cctb00032.comentario
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00032_comentario_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00032_valor_recibo_checkColumnConstraints">}
-#+ Check constraints on the "cctb00032.valor_recibo" column
-#+
-#+ @param p_valor_recibo - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00032_valor_recibo_checkColumnConstraints(p_valor_recibo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valor_recibo LIKE cctb00032.valor_recibo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00032_valor_recibo_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00032_status_t_checkColumnConstraints">}
-#+ Check constraints on the "cctb00032.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00032_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cctb00032.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00032_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00032_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "cctb00032.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00032_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cctb00032.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00032_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00032_fecha_crea_checkColumnConstraints">}
-#+ Check constraints on the "cctb00032.fecha_crea" column
-#+
-#+ @param p_fecha_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00032_fecha_crea_checkColumnConstraints(p_fecha_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_crea LIKE cctb00032.fecha_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00032_fecha_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00032_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "cctb00032.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00032_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cctb00032.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00032_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00032_fecha_mod_checkColumnConstraints">}
-#+ Check constraints on the "cctb00032.fecha_mod" column
-#+
-#+ @param p_fecha_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00032_fecha_mod_checkColumnConstraints(p_fecha_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_mod LIKE cctb00032.fecha_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00032_fecha_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00031_checkTableConstraints">}
-#+ Check constraints on the "cctb00031" table
-#+
-#+ @param p_data - a row data LIKE cctb00031.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00031_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cctb00031.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cctb00031_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00031_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00031_sec_vend_checkColumnConstraints(p_data.sec_vend) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00031_nombrevendedor_checkColumnConstraints(p_data.nombrevendedor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00031_tipo_cliente_checkColumnConstraints(p_data.tipo_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00031_sec_cliente_checkColumnConstraints(p_data.sec_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00031_nombrecliente_checkColumnConstraints(p_data.nombrecliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00031_num_req_checkColumnConstraints(p_data.num_req) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00031_limite_cr_checkColumnConstraints(p_data.limite_cr) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00031_monto_cotizacion_checkColumnConstraints(p_data.monto_cotizacion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00031_balance_checkColumnConstraints(p_data.balance) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00031_estado_checkColumnConstraints(p_data.estado) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00031_documento_ref_checkColumnConstraints(p_data.documento_ref) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00031_tipo_doc_ref_checkColumnConstraints(p_data.tipo_doc_ref) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00031_monto_req_checkColumnConstraints(p_data.monto_req) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00031_factura_checkColumnConstraints(p_data.factura) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00031_fecha_vence_checkColumnConstraints(p_data.fecha_vence) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00031_checkTableConstraints
-
-{<BLOCK Name="fct.cctb00031_fecha_checkColumnConstraints">}
-#+ Check constraints on the "cctb00031.fecha" column
-#+
-#+ @param p_fecha - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00031_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE cctb00031.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00031_fecha_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00031_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "cctb00031.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00031_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cctb00031.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00031_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00031_sec_vend_checkColumnConstraints">}
-#+ Check constraints on the "cctb00031.sec_vend" column
-#+
-#+ @param p_sec_vend - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00031_sec_vend_checkColumnConstraints(p_sec_vend)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_vend LIKE cctb00031.sec_vend
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00031_sec_vend_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00031_nombrevendedor_checkColumnConstraints">}
-#+ Check constraints on the "cctb00031.nombrevendedor" column
-#+
-#+ @param p_nombrevendedor - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00031_nombrevendedor_checkColumnConstraints(p_nombrevendedor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombrevendedor LIKE cctb00031.nombrevendedor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00031_nombrevendedor_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00031_tipo_cliente_checkColumnConstraints">}
-#+ Check constraints on the "cctb00031.tipo_cliente" column
-#+
-#+ @param p_tipo_cliente - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00031_tipo_cliente_checkColumnConstraints(p_tipo_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_cliente LIKE cctb00031.tipo_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00031_tipo_cliente_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00031_sec_cliente_checkColumnConstraints">}
-#+ Check constraints on the "cctb00031.sec_cliente" column
-#+
-#+ @param p_sec_cliente - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00031_sec_cliente_checkColumnConstraints(p_sec_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_cliente LIKE cctb00031.sec_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00031_sec_cliente_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00031_nombrecliente_checkColumnConstraints">}
-#+ Check constraints on the "cctb00031.nombrecliente" column
-#+
-#+ @param p_nombrecliente - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00031_nombrecliente_checkColumnConstraints(p_nombrecliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombrecliente LIKE cctb00031.nombrecliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00031_nombrecliente_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00031_num_req_checkColumnConstraints">}
-#+ Check constraints on the "cctb00031.num_req" column
-#+
-#+ @param p_num_req - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00031_num_req_checkColumnConstraints(p_num_req)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_req LIKE cctb00031.num_req
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00031_num_req_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00031_limite_cr_checkColumnConstraints">}
-#+ Check constraints on the "cctb00031.limite_cr" column
-#+
-#+ @param p_limite_cr - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00031_limite_cr_checkColumnConstraints(p_limite_cr)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_limite_cr LIKE cctb00031.limite_cr
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00031_limite_cr_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00031_monto_cotizacion_checkColumnConstraints">}
-#+ Check constraints on the "cctb00031.monto_cotizacion" column
-#+
-#+ @param p_monto_cotizacion - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00031_monto_cotizacion_checkColumnConstraints(p_monto_cotizacion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_monto_cotizacion LIKE cctb00031.monto_cotizacion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00031_monto_cotizacion_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00031_balance_checkColumnConstraints">}
-#+ Check constraints on the "cctb00031.balance" column
-#+
-#+ @param p_balance - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00031_balance_checkColumnConstraints(p_balance)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_balance LIKE cctb00031.balance
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00031_balance_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00031_estado_checkColumnConstraints">}
-#+ Check constraints on the "cctb00031.estado" column
-#+
-#+ @param p_estado - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00031_estado_checkColumnConstraints(p_estado)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_estado LIKE cctb00031.estado
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00031_estado_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00031_documento_ref_checkColumnConstraints">}
-#+ Check constraints on the "cctb00031.documento_ref" column
-#+
-#+ @param p_documento_ref - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00031_documento_ref_checkColumnConstraints(p_documento_ref)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_documento_ref LIKE cctb00031.documento_ref
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00031_documento_ref_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00031_tipo_doc_ref_checkColumnConstraints">}
-#+ Check constraints on the "cctb00031.tipo_doc_ref" column
-#+
-#+ @param p_tipo_doc_ref - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00031_tipo_doc_ref_checkColumnConstraints(p_tipo_doc_ref)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_doc_ref LIKE cctb00031.tipo_doc_ref
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00031_tipo_doc_ref_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00031_monto_req_checkColumnConstraints">}
-#+ Check constraints on the "cctb00031.monto_req" column
-#+
-#+ @param p_monto_req - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00031_monto_req_checkColumnConstraints(p_monto_req)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_monto_req LIKE cctb00031.monto_req
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00031_monto_req_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00031_factura_checkColumnConstraints">}
-#+ Check constraints on the "cctb00031.factura" column
-#+
-#+ @param p_factura - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00031_factura_checkColumnConstraints(p_factura)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_factura LIKE cctb00031.factura
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00031_factura_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00031_fecha_vence_checkColumnConstraints">}
-#+ Check constraints on the "cctb00031.fecha_vence" column
-#+
-#+ @param p_fecha_vence - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00031_fecha_vence_checkColumnConstraints(p_fecha_vence)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_vence LIKE cctb00031.fecha_vence
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00031_fecha_vence_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00030_checkTableConstraints">}
-#+ Check constraints on the "cctb00030" table
-#+
-#+ @param p_data - a row data LIKE cctb00030.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00030_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cctb00030.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cctb00030_num_req_checkColumnConstraints(p_data.num_req) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00030_etiqueta_checkColumnConstraints(p_data.etiqueta) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00030_num_oc_checkColumnConstraints(p_data.num_oc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00030_secuencia_checkColumnConstraints(p_data.secuencia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00030_area_checkColumnConstraints(p_data.area) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00030_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00030_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00030_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00030_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00030_lado_1_checkColumnConstraints(p_data.lado_1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00030_lado_2_checkColumnConstraints(p_data.lado_2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00030_lado_3_checkColumnConstraints(p_data.lado_3) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00030_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00030_medida_checkColumnConstraints(p_data.medida) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00030_cantidad_r_checkColumnConstraints(p_data.cantidad_r) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00030_medida_r_checkColumnConstraints(p_data.medida_r) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00030_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00030_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00030_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00030_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00030_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00030_checkTableConstraints
-
-{<BLOCK Name="fct.cctb00030_num_req_checkColumnConstraints">}
-#+ Check constraints on the "cctb00030.num_req" column
-#+
-#+ @param p_num_req - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00030_num_req_checkColumnConstraints(p_num_req)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_req LIKE cctb00030.num_req
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_num_req IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- num_req: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00030_num_req_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00030_etiqueta_checkColumnConstraints">}
-#+ Check constraints on the "cctb00030.etiqueta" column
-#+
-#+ @param p_etiqueta - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00030_etiqueta_checkColumnConstraints(p_etiqueta)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_etiqueta LIKE cctb00030.etiqueta
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00030_etiqueta_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00030_num_oc_checkColumnConstraints">}
-#+ Check constraints on the "cctb00030.num_oc" column
-#+
-#+ @param p_num_oc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00030_num_oc_checkColumnConstraints(p_num_oc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_oc LIKE cctb00030.num_oc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_num_oc IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- num_oc: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00030_num_oc_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00030_secuencia_checkColumnConstraints">}
-#+ Check constraints on the "cctb00030.secuencia" column
-#+
-#+ @param p_secuencia - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00030_secuencia_checkColumnConstraints(p_secuencia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_secuencia LIKE cctb00030.secuencia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_secuencia IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- secuencia: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00030_secuencia_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00030_area_checkColumnConstraints">}
-#+ Check constraints on the "cctb00030.area" column
-#+
-#+ @param p_area - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00030_area_checkColumnConstraints(p_area)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_area LIKE cctb00030.area
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00030_area_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00030_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "cctb00030.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00030_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE cctb00030.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_n IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_n: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00030_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00030_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "cctb00030.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00030_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE cctb00030.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_grupo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_grupo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00030_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00030_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "cctb00030.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00030_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE cctb00030.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_tipo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_tipo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00030_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00030_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "cctb00030.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00030_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE cctb00030.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_sec IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_sec: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00030_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00030_lado_1_checkColumnConstraints">}
-#+ Check constraints on the "cctb00030.lado_1" column
-#+
-#+ @param p_lado_1 - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00030_lado_1_checkColumnConstraints(p_lado_1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_lado_1 LIKE cctb00030.lado_1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00030_lado_1_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00030_lado_2_checkColumnConstraints">}
-#+ Check constraints on the "cctb00030.lado_2" column
-#+
-#+ @param p_lado_2 - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00030_lado_2_checkColumnConstraints(p_lado_2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_lado_2 LIKE cctb00030.lado_2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00030_lado_2_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00030_lado_3_checkColumnConstraints">}
-#+ Check constraints on the "cctb00030.lado_3" column
-#+
-#+ @param p_lado_3 - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00030_lado_3_checkColumnConstraints(p_lado_3)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_lado_3 LIKE cctb00030.lado_3
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00030_lado_3_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00030_cantidad_checkColumnConstraints">}
-#+ Check constraints on the "cctb00030.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00030_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE cctb00030.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cantidad IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cantidad: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00030_cantidad_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00030_medida_checkColumnConstraints">}
-#+ Check constraints on the "cctb00030.medida" column
-#+
-#+ @param p_medida - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00030_medida_checkColumnConstraints(p_medida)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_medida LIKE cctb00030.medida
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_medida IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- medida: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00030_medida_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00030_cantidad_r_checkColumnConstraints">}
-#+ Check constraints on the "cctb00030.cantidad_r" column
-#+
-#+ @param p_cantidad_r - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00030_cantidad_r_checkColumnConstraints(p_cantidad_r)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad_r LIKE cctb00030.cantidad_r
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cantidad_r IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cantidad_r: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00030_cantidad_r_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00030_medida_r_checkColumnConstraints">}
-#+ Check constraints on the "cctb00030.medida_r" column
-#+
-#+ @param p_medida_r - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00030_medida_r_checkColumnConstraints(p_medida_r)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_medida_r LIKE cctb00030.medida_r
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_medida_r IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- medida_r: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00030_medida_r_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00030_status_t_checkColumnConstraints">}
-#+ Check constraints on the "cctb00030.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00030_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cctb00030.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00030_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00030_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "cctb00030.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00030_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cctb00030.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00030_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00030_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "cctb00030.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00030_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cctb00030.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00030_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00030_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "cctb00030.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00030_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cctb00030.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00030_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00030_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "cctb00030.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00030_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cctb00030.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00030_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00029_checkTableConstraints">}
-#+ Check constraints on the "cctb00029" table
-#+
-#+ @param p_data - a row data LIKE cctb00029.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00029_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cctb00029.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cctb00029_num_req_checkColumnConstraints(p_data.num_req) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00029_mensaje_checkColumnConstraints(p_data.mensaje) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00029_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00029_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00029_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00029_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00029_checkTableConstraints
-
-{<BLOCK Name="fct.cctb00029_num_req_checkColumnConstraints">}
-#+ Check constraints on the "cctb00029.num_req" column
-#+
-#+ @param p_num_req - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00029_num_req_checkColumnConstraints(p_num_req)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_req LIKE cctb00029.num_req
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_num_req IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- num_req: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00029_num_req_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00029_mensaje_checkColumnConstraints">}
-#+ Check constraints on the "cctb00029.mensaje" column
-#+
-#+ @param p_mensaje - VARCHAR2(200) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00029_mensaje_checkColumnConstraints(p_mensaje)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mensaje LIKE cctb00029.mensaje
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00029_mensaje_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00029_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "cctb00029.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00029_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cctb00029.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00029_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00029_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "cctb00029.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00029_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cctb00029.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00029_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00029_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "cctb00029.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00029_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cctb00029.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00029_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00029_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "cctb00029.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00029_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cctb00029.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00029_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00028_checkTableConstraints">}
-#+ Check constraints on the "cctb00028" table
-#+
-#+ @param p_data - a row data LIKE cctb00028.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00028_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cctb00028.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cctb00028_num_temp_req_checkColumnConstraints(p_data.num_temp_req) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00028_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00028_checkTableConstraints
-
-{<BLOCK Name="fct.cctb00028_num_temp_req_checkColumnConstraints">}
-#+ Check constraints on the "cctb00028.num_temp_req" column
-#+
-#+ @param p_num_temp_req - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00028_num_temp_req_checkColumnConstraints(p_num_temp_req)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_temp_req LIKE cctb00028.num_temp_req
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00028_num_temp_req_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00028_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "cctb00028.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00028_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cctb00028.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00028_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00027_checkTableConstraints">}
-#+ Check constraints on the "cctb00027" table
-#+
-#+ @param p_data - a row data LIKE cctb00027.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00027_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cctb00027.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cctb00027_num_req_checkColumnConstraints(p_data.num_req) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00027_etiqueta_checkColumnConstraints(p_data.etiqueta) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00027_num_oc_checkColumnConstraints(p_data.num_oc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00027_secuencia_checkColumnConstraints(p_data.secuencia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00027_area_checkColumnConstraints(p_data.area) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00027_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00027_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00027_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00027_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00027_lado_1_checkColumnConstraints(p_data.lado_1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00027_lado_2_checkColumnConstraints(p_data.lado_2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00027_lado_3_checkColumnConstraints(p_data.lado_3) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00027_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00027_medida_checkColumnConstraints(p_data.medida) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00027_cantidad_r_checkColumnConstraints(p_data.cantidad_r) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00027_medida_r_checkColumnConstraints(p_data.medida_r) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00027_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00027_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00027_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00027_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00027_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00027_checkTableConstraints
-
-{<BLOCK Name="fct.cctb00027_num_req_checkColumnConstraints">}
-#+ Check constraints on the "cctb00027.num_req" column
-#+
-#+ @param p_num_req - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00027_num_req_checkColumnConstraints(p_num_req)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_req LIKE cctb00027.num_req
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_num_req IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- num_req: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00027_num_req_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00027_etiqueta_checkColumnConstraints">}
-#+ Check constraints on the "cctb00027.etiqueta" column
-#+
-#+ @param p_etiqueta - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00027_etiqueta_checkColumnConstraints(p_etiqueta)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_etiqueta LIKE cctb00027.etiqueta
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00027_etiqueta_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00027_num_oc_checkColumnConstraints">}
-#+ Check constraints on the "cctb00027.num_oc" column
-#+
-#+ @param p_num_oc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00027_num_oc_checkColumnConstraints(p_num_oc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_oc LIKE cctb00027.num_oc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_num_oc IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- num_oc: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00027_num_oc_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00027_secuencia_checkColumnConstraints">}
-#+ Check constraints on the "cctb00027.secuencia" column
-#+
-#+ @param p_secuencia - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00027_secuencia_checkColumnConstraints(p_secuencia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_secuencia LIKE cctb00027.secuencia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_secuencia IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- secuencia: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00027_secuencia_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00027_area_checkColumnConstraints">}
-#+ Check constraints on the "cctb00027.area" column
-#+
-#+ @param p_area - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00027_area_checkColumnConstraints(p_area)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_area LIKE cctb00027.area
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00027_area_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00027_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "cctb00027.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00027_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE cctb00027.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_n IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_n: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00027_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00027_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "cctb00027.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00027_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE cctb00027.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_grupo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_grupo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00027_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00027_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "cctb00027.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00027_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE cctb00027.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_tipo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_tipo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00027_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00027_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "cctb00027.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00027_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE cctb00027.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_sec IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_sec: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00027_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00027_lado_1_checkColumnConstraints">}
-#+ Check constraints on the "cctb00027.lado_1" column
-#+
-#+ @param p_lado_1 - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00027_lado_1_checkColumnConstraints(p_lado_1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_lado_1 LIKE cctb00027.lado_1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00027_lado_1_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00027_lado_2_checkColumnConstraints">}
-#+ Check constraints on the "cctb00027.lado_2" column
-#+
-#+ @param p_lado_2 - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00027_lado_2_checkColumnConstraints(p_lado_2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_lado_2 LIKE cctb00027.lado_2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00027_lado_2_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00027_lado_3_checkColumnConstraints">}
-#+ Check constraints on the "cctb00027.lado_3" column
-#+
-#+ @param p_lado_3 - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00027_lado_3_checkColumnConstraints(p_lado_3)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_lado_3 LIKE cctb00027.lado_3
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00027_lado_3_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00027_cantidad_checkColumnConstraints">}
-#+ Check constraints on the "cctb00027.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00027_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE cctb00027.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cantidad IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cantidad: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00027_cantidad_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00027_medida_checkColumnConstraints">}
-#+ Check constraints on the "cctb00027.medida" column
-#+
-#+ @param p_medida - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00027_medida_checkColumnConstraints(p_medida)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_medida LIKE cctb00027.medida
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_medida IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- medida: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00027_medida_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00027_cantidad_r_checkColumnConstraints">}
-#+ Check constraints on the "cctb00027.cantidad_r" column
-#+
-#+ @param p_cantidad_r - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00027_cantidad_r_checkColumnConstraints(p_cantidad_r)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad_r LIKE cctb00027.cantidad_r
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cantidad_r IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cantidad_r: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00027_cantidad_r_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00027_medida_r_checkColumnConstraints">}
-#+ Check constraints on the "cctb00027.medida_r" column
-#+
-#+ @param p_medida_r - DECIMAL(12,5) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00027_medida_r_checkColumnConstraints(p_medida_r)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_medida_r LIKE cctb00027.medida_r
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_medida_r IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- medida_r: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00027_medida_r_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00027_status_t_checkColumnConstraints">}
-#+ Check constraints on the "cctb00027.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00027_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cctb00027.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00027_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00027_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "cctb00027.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00027_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cctb00027.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00027_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00027_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "cctb00027.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00027_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cctb00027.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00027_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00027_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "cctb00027.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00027_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cctb00027.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00027_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00027_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "cctb00027.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00027_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cctb00027.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00027_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00026_checkTableConstraints">}
-#+ Check constraints on the "cctb00026" table
-#+
-#+ @param p_data - a row data LIKE cctb00026.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00026_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cctb00026.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cctb00026_num_req_checkColumnConstraints(p_data.num_req) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00026_num_oc_checkColumnConstraints(p_data.num_oc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00026_cotizacion_no_checkColumnConstraints(p_data.cotizacion_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00026_id_checkColumnConstraints(p_data.id) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00026_area_checkColumnConstraints(p_data.area) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00026_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00026_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00026_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00026_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00026_cantidad_ord1_checkColumnConstraints(p_data.cantidad_ord1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00026_cantidad_ord_checkColumnConstraints(p_data.cantidad_ord) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00026_cantidad_1_checkColumnConstraints(p_data.cantidad_1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00026_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00026_precio_checkColumnConstraints(p_data.precio) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00026_descuento_checkColumnConstraints(p_data.descuento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00026_descvalor_checkColumnConstraints(p_data.descvalor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00026_valor_checkColumnConstraints(p_data.valor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00026_estado_checkColumnConstraints(p_data.estado) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00026_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00026_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00026_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00026_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00026_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00026_fecha_transporte_checkColumnConstraints(p_data.fecha_transporte) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00026_fecha_llegada_checkColumnConstraints(p_data.fecha_llegada) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00026_id_kit_checkColumnConstraints(p_data.id_kit) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- CALL smarmotech_dbxconstraints_cctb00026_pk_cctb00026_1_checkUniqueConstraint(p_forUpdate, p_data.num_req, p_data.num_oc, p_data.cotizacion_no, p_data.area, p_data.cod_n, p_data.cod_grupo, p_data.cod_tipo, p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00026_checkTableConstraints
-
-{<BLOCK Name="fct.cctb00026_pk_cctb00026_1_checkUniqueConstraint">}
-#+ Check the primary key uniqueness constraint on the "cctb00026"
-#+
-#+ @param p_key - Primary Key
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00026_pk_cctb00026_1_checkUniqueConstraint(p_forUpdate, p_key)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_key
- RECORD
- cctb00026_num_req LIKE cctb00026.num_req,
- cctb00026_num_oc LIKE cctb00026.num_oc,
- cctb00026_cotizacion_no LIKE cctb00026.cotizacion_no,
- cctb00026_area LIKE cctb00026.area,
- cctb00026_cod_n LIKE cctb00026.cod_n,
- cctb00026_cod_grupo LIKE cctb00026.cod_grupo,
- cctb00026_cod_tipo LIKE cctb00026.cod_tipo,
- cctb00026_cod_sec LIKE cctb00026.cod_sec
- END RECORD
- DEFINE l_key
- RECORD
- cctb00026_num_req LIKE cctb00026.num_req,
- cctb00026_num_oc LIKE cctb00026.num_oc,
- cctb00026_cotizacion_no LIKE cctb00026.cotizacion_no,
- cctb00026_area LIKE cctb00026.area,
- cctb00026_cod_n LIKE cctb00026.cod_n,
- cctb00026_cod_grupo LIKE cctb00026.cod_grupo,
- cctb00026_cod_tipo LIKE cctb00026.cod_tipo,
- cctb00026_cod_sec LIKE cctb00026.cod_sec
- END RECORD
- DEFINE l_where STRING
- DEFINE l_sqlQuery STRING
- DEFINE l_count INTEGER
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- LET l_where = "WHERE cctb00026.num_req = ?
- AND cctb00026.num_oc = ?
- AND cctb00026.cotizacion_no = ?
- AND cctb00026.area = ?
- AND cctb00026.cod_n = ?
- AND cctb00026.cod_grupo = ?
- AND cctb00026.cod_tipo = ?
- AND cctb00026.cod_sec = ? "
-
- let l_sqlQuery = "SELECT COUNT(*), num_req, num_oc, cotizacion_no, area, cod_n, cod_grupo, cod_tipo, cod_sec FROM cctb00026 ", l_where, " GROUP BY num_req, num_oc, cotizacion_no, area, cod_n, cod_grupo, cod_tipo, cod_sec"
-
- PREPARE cur_cctb00026_pk_cctb00026_1_checkUniqueConstraint FROM l_sqlQuery
- EXECUTE cur_cctb00026_pk_cctb00026_1_checkUniqueConstraint INTO l_count, l_key.* USING p_key.*
- FREE cur_cctb00026_pk_cctb00026_1_checkUniqueConstraint
- IF (NOT p_forUpdate AND l_count > 0) OR (p_forUpdate AND l_count > 0 AND p_key.* != l_key.*) THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- num_req + num_oc + cotizacion_no + area + cod_n + cod_grupo + cod_tipo + cod_sec: " || ERROR_BAM_00002) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00026_pk_cctb00026_1_checkUniqueConstraint
-
-{<BLOCK Name="fct.cctb00026_num_req_checkColumnConstraints">}
-#+ Check constraints on the "cctb00026.num_req" column
-#+
-#+ @param p_num_req - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00026_num_req_checkColumnConstraints(p_num_req)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_req LIKE cctb00026.num_req
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_num_req IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- num_req: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00026_num_req_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00026_num_oc_checkColumnConstraints">}
-#+ Check constraints on the "cctb00026.num_oc" column
-#+
-#+ @param p_num_oc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00026_num_oc_checkColumnConstraints(p_num_oc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_oc LIKE cctb00026.num_oc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_num_oc IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- num_oc: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00026_num_oc_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00026_cotizacion_no_checkColumnConstraints">}
-#+ Check constraints on the "cctb00026.cotizacion_no" column
-#+
-#+ @param p_cotizacion_no - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00026_cotizacion_no_checkColumnConstraints(p_cotizacion_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cotizacion_no LIKE cctb00026.cotizacion_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cotizacion_no IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cotizacion_no: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00026_cotizacion_no_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00026_id_checkColumnConstraints">}
-#+ Check constraints on the "cctb00026.id" column
-#+
-#+ @param p_id - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00026_id_checkColumnConstraints(p_id)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_id LIKE cctb00026.id
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_id IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- id: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00026_id_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00026_area_checkColumnConstraints">}
-#+ Check constraints on the "cctb00026.area" column
-#+
-#+ @param p_area - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00026_area_checkColumnConstraints(p_area)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_area LIKE cctb00026.area
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_area IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- area: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00026_area_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00026_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "cctb00026.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00026_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE cctb00026.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_n IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_n: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00026_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00026_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "cctb00026.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00026_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE cctb00026.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_grupo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_grupo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00026_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00026_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "cctb00026.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00026_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE cctb00026.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_tipo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_tipo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00026_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00026_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "cctb00026.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00026_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE cctb00026.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_sec IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_sec: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00026_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00026_cantidad_ord1_checkColumnConstraints">}
-#+ Check constraints on the "cctb00026.cantidad_ord1" column
-#+
-#+ @param p_cantidad_ord1 - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00026_cantidad_ord1_checkColumnConstraints(p_cantidad_ord1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad_ord1 LIKE cctb00026.cantidad_ord1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00026_cantidad_ord1_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00026_cantidad_ord_checkColumnConstraints">}
-#+ Check constraints on the "cctb00026.cantidad_ord" column
-#+
-#+ @param p_cantidad_ord - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00026_cantidad_ord_checkColumnConstraints(p_cantidad_ord)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad_ord LIKE cctb00026.cantidad_ord
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cantidad_ord IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cantidad_ord: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00026_cantidad_ord_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00026_cantidad_1_checkColumnConstraints">}
-#+ Check constraints on the "cctb00026.cantidad_1" column
-#+
-#+ @param p_cantidad_1 - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00026_cantidad_1_checkColumnConstraints(p_cantidad_1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad_1 LIKE cctb00026.cantidad_1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00026_cantidad_1_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00026_cantidad_checkColumnConstraints">}
-#+ Check constraints on the "cctb00026.cantidad" column
-#+
-#+ @param p_cantidad - DECIMAL(12,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00026_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE cctb00026.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cantidad IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cantidad: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00026_cantidad_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00026_precio_checkColumnConstraints">}
-#+ Check constraints on the "cctb00026.precio" column
-#+
-#+ @param p_precio - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00026_precio_checkColumnConstraints(p_precio)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_precio LIKE cctb00026.precio
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_precio IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- precio: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00026_precio_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00026_descuento_checkColumnConstraints">}
-#+ Check constraints on the "cctb00026.descuento" column
-#+
-#+ @param p_descuento - DECIMAL(8,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00026_descuento_checkColumnConstraints(p_descuento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descuento LIKE cctb00026.descuento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_descuento IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- descuento: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00026_descuento_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00026_descvalor_checkColumnConstraints">}
-#+ Check constraints on the "cctb00026.descvalor" column
-#+
-#+ @param p_descvalor - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00026_descvalor_checkColumnConstraints(p_descvalor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descvalor LIKE cctb00026.descvalor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_descvalor IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- descvalor: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00026_descvalor_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00026_valor_checkColumnConstraints">}
-#+ Check constraints on the "cctb00026.valor" column
-#+
-#+ @param p_valor - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00026_valor_checkColumnConstraints(p_valor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valor LIKE cctb00026.valor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_valor IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- valor: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00026_valor_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00026_estado_checkColumnConstraints">}
-#+ Check constraints on the "cctb00026.estado" column
-#+
-#+ @param p_estado - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00026_estado_checkColumnConstraints(p_estado)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_estado LIKE cctb00026.estado
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00026_estado_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00026_status_t_checkColumnConstraints">}
-#+ Check constraints on the "cctb00026.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00026_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cctb00026.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00026_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00026_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "cctb00026.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00026_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cctb00026.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_us_crea IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- us_crea: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00026_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00026_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "cctb00026.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00026_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cctb00026.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_fech_crea IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- fech_crea: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00026_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00026_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "cctb00026.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00026_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cctb00026.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00026_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00026_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "cctb00026.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00026_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cctb00026.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00026_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00026_fecha_transporte_checkColumnConstraints">}
-#+ Check constraints on the "cctb00026.fecha_transporte" column
-#+
-#+ @param p_fecha_transporte - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00026_fecha_transporte_checkColumnConstraints(p_fecha_transporte)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_transporte LIKE cctb00026.fecha_transporte
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00026_fecha_transporte_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00026_fecha_llegada_checkColumnConstraints">}
-#+ Check constraints on the "cctb00026.fecha_llegada" column
-#+
-#+ @param p_fecha_llegada - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00026_fecha_llegada_checkColumnConstraints(p_fecha_llegada)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_llegada LIKE cctb00026.fecha_llegada
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00026_fecha_llegada_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00026_id_kit_checkColumnConstraints">}
-#+ Check constraints on the "cctb00026.id_kit" column
-#+
-#+ @param p_id_kit - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00026_id_kit_checkColumnConstraints(p_id_kit)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_id_kit LIKE cctb00026.id_kit
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00026_id_kit_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00025_checkTableConstraints">}
-#+ Check constraints on the "cctb00025" table
-#+
-#+ @param p_data - a row data LIKE cctb00025.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00025_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cctb00025.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cctb00025_num_req_checkColumnConstraints(p_data.num_req) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00025_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00025_sec_vend_checkColumnConstraints(p_data.sec_vend) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00025_sec_vend_aprobado_checkColumnConstraints(p_data.sec_vend_aprobado) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00025_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00025_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00025_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00025_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00025_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00025_estado_checkColumnConstraints(p_data.estado) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00025_fecha_transporte_checkColumnConstraints(p_data.fecha_transporte) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00025_estado_despacho_checkColumnConstraints(p_data.estado_despacho) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00025_fecha_autorizacion_checkColumnConstraints(p_data.fecha_autorizacion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00025_monto_req_checkColumnConstraints(p_data.monto_req) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- CALL smarmotech_dbxconstraints_cctb00025_pk_cctb00025_checkUniqueConstraint(p_forUpdate, p_data.num_req) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00025_checkTableConstraints
-
-{<BLOCK Name="fct.cctb00025_pk_cctb00025_checkUniqueConstraint">}
-#+ Check the primary key uniqueness constraint on the "cctb00025"
-#+
-#+ @param p_key - Primary Key
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00025_pk_cctb00025_checkUniqueConstraint(p_forUpdate, p_key)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_key
- RECORD
- cctb00025_num_req LIKE cctb00025.num_req
- END RECORD
- DEFINE l_key
- RECORD
- cctb00025_num_req LIKE cctb00025.num_req
- END RECORD
- DEFINE l_where STRING
- DEFINE l_sqlQuery STRING
- DEFINE l_count INTEGER
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- LET l_where = "WHERE cctb00025.num_req = ? "
-
- let l_sqlQuery = "SELECT COUNT(*), num_req FROM cctb00025 ", l_where, " GROUP BY num_req"
-
- PREPARE cur_cctb00025_pk_cctb00025_checkUniqueConstraint FROM l_sqlQuery
- EXECUTE cur_cctb00025_pk_cctb00025_checkUniqueConstraint INTO l_count, l_key.* USING p_key.*
- FREE cur_cctb00025_pk_cctb00025_checkUniqueConstraint
- IF (NOT p_forUpdate AND l_count > 0) OR (p_forUpdate AND l_count > 0 AND p_key.* != l_key.*) THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- num_req: " || ERROR_BAM_00002) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00025_pk_cctb00025_checkUniqueConstraint
-
-{<BLOCK Name="fct.cctb00025_num_req_checkColumnConstraints">}
-#+ Check constraints on the "cctb00025.num_req" column
-#+
-#+ @param p_num_req - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00025_num_req_checkColumnConstraints(p_num_req)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_req LIKE cctb00025.num_req
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_num_req IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- num_req: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00025_num_req_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00025_fecha_checkColumnConstraints">}
-#+ Check constraints on the "cctb00025.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00025_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE cctb00025.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_fecha IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- fecha: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00025_fecha_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00025_sec_vend_checkColumnConstraints">}
-#+ Check constraints on the "cctb00025.sec_vend" column
-#+
-#+ @param p_sec_vend - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00025_sec_vend_checkColumnConstraints(p_sec_vend)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_vend LIKE cctb00025.sec_vend
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_sec_vend IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- sec_vend: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00025_sec_vend_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00025_sec_vend_aprobado_checkColumnConstraints">}
-#+ Check constraints on the "cctb00025.sec_vend_aprobado" column
-#+
-#+ @param p_sec_vend_aprobado - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00025_sec_vend_aprobado_checkColumnConstraints(p_sec_vend_aprobado)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_vend_aprobado LIKE cctb00025.sec_vend_aprobado
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00025_sec_vend_aprobado_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00025_status_t_checkColumnConstraints">}
-#+ Check constraints on the "cctb00025.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00025_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cctb00025.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00025_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00025_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "cctb00025.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00025_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cctb00025.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_us_crea IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- us_crea: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00025_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00025_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "cctb00025.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00025_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cctb00025.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_fech_crea IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- fech_crea: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00025_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00025_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "cctb00025.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00025_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cctb00025.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00025_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00025_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "cctb00025.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00025_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cctb00025.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00025_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00025_estado_checkColumnConstraints">}
-#+ Check constraints on the "cctb00025.estado" column
-#+
-#+ @param p_estado - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00025_estado_checkColumnConstraints(p_estado)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_estado LIKE cctb00025.estado
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00025_estado_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00025_fecha_transporte_checkColumnConstraints">}
-#+ Check constraints on the "cctb00025.fecha_transporte" column
-#+
-#+ @param p_fecha_transporte - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00025_fecha_transporte_checkColumnConstraints(p_fecha_transporte)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_transporte LIKE cctb00025.fecha_transporte
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00025_fecha_transporte_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00025_estado_despacho_checkColumnConstraints">}
-#+ Check constraints on the "cctb00025.estado_despacho" column
-#+
-#+ @param p_estado_despacho - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00025_estado_despacho_checkColumnConstraints(p_estado_despacho)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_estado_despacho LIKE cctb00025.estado_despacho
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00025_estado_despacho_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00025_fecha_autorizacion_checkColumnConstraints">}
-#+ Check constraints on the "cctb00025.fecha_autorizacion" column
-#+
-#+ @param p_fecha_autorizacion - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00025_fecha_autorizacion_checkColumnConstraints(p_fecha_autorizacion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_autorizacion LIKE cctb00025.fecha_autorizacion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00025_fecha_autorizacion_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00025_monto_req_checkColumnConstraints">}
-#+ Check constraints on the "cctb00025.monto_req" column
-#+
-#+ @param p_monto_req - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00025_monto_req_checkColumnConstraints(p_monto_req)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_monto_req LIKE cctb00025.monto_req
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00025_monto_req_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00024_checkTableConstraints">}
-#+ Check constraints on the "cctb00024" table
-#+
-#+ @param p_data - a row data LIKE cctb00024.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00024_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cctb00024.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cctb00024_status_mov_checkColumnConstraints(p_data.status_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00024_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00024_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00024_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00024_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00024_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00024_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00024_checkTableConstraints
-
-{<BLOCK Name="fct.cctb00024_status_mov_checkColumnConstraints">}
-#+ Check constraints on the "cctb00024.status_mov" column
-#+
-#+ @param p_status_mov - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00024_status_mov_checkColumnConstraints(p_status_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_mov LIKE cctb00024.status_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00024_status_mov_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00024_descripcion_checkColumnConstraints">}
-#+ Check constraints on the "cctb00024.descripcion" column
-#+
-#+ @param p_descripcion - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00024_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE cctb00024.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00024_descripcion_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00024_status_t_checkColumnConstraints">}
-#+ Check constraints on the "cctb00024.status_t" column
-#+
-#+ @param p_status_t - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00024_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cctb00024.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00024_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00024_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "cctb00024.us_crea" column
-#+
-#+ @param p_us_crea - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00024_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cctb00024.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00024_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00024_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "cctb00024.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00024_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cctb00024.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00024_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00024_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "cctb00024.us_mod" column
-#+
-#+ @param p_us_mod - VARCHAR2(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00024_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cctb00024.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00024_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00024_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "cctb00024.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00024_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cctb00024.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00024_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00023_checkTableConstraints">}
-#+ Check constraints on the "cctb00023" table
-#+
-#+ @param p_data - a row data LIKE cctb00023.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00023_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cctb00023.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cctb00023_num_doc_checkColumnConstraints(p_data.num_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00023_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00023_cod_moneda_checkColumnConstraints(p_data.cod_moneda) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00023_cantidad_checkColumnConstraints(p_data.cantidad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00023_valor_checkColumnConstraints(p_data.valor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00023_tipo_doc_checkColumnConstraints(p_data.tipo_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00023_tasa_checkColumnConstraints(p_data.tasa) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00023_cod_cia_checkColumnConstraints(p_data.cod_cia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00023_num_trans_checkColumnConstraints(p_data.num_trans) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00023_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00023_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00023_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00023_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00023_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00023_checkTableConstraints
-
-{<BLOCK Name="fct.cctb00023_num_doc_checkColumnConstraints">}
-#+ Check constraints on the "cctb00023.num_doc" column
-#+
-#+ @param p_num_doc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00023_num_doc_checkColumnConstraints(p_num_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_doc LIKE cctb00023.num_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00023_num_doc_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00023_fecha_checkColumnConstraints">}
-#+ Check constraints on the "cctb00023.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00023_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE cctb00023.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00023_fecha_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00023_cod_moneda_checkColumnConstraints">}
-#+ Check constraints on the "cctb00023.cod_moneda" column
-#+
-#+ @param p_cod_moneda - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00023_cod_moneda_checkColumnConstraints(p_cod_moneda)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_moneda LIKE cctb00023.cod_moneda
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00023_cod_moneda_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00023_cantidad_checkColumnConstraints">}
-#+ Check constraints on the "cctb00023.cantidad" column
-#+
-#+ @param p_cantidad - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00023_cantidad_checkColumnConstraints(p_cantidad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad LIKE cctb00023.cantidad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00023_cantidad_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00023_valor_checkColumnConstraints">}
-#+ Check constraints on the "cctb00023.valor" column
-#+
-#+ @param p_valor - DECIMAL(18,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00023_valor_checkColumnConstraints(p_valor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valor LIKE cctb00023.valor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00023_valor_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00023_tipo_doc_checkColumnConstraints">}
-#+ Check constraints on the "cctb00023.tipo_doc" column
-#+
-#+ @param p_tipo_doc - CHAR(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00023_tipo_doc_checkColumnConstraints(p_tipo_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_doc LIKE cctb00023.tipo_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00023_tipo_doc_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00023_tasa_checkColumnConstraints">}
-#+ Check constraints on the "cctb00023.tasa" column
-#+
-#+ @param p_tasa - DECIMAL(18,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00023_tasa_checkColumnConstraints(p_tasa)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tasa LIKE cctb00023.tasa
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00023_tasa_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00023_cod_cia_checkColumnConstraints">}
-#+ Check constraints on the "cctb00023.cod_cia" column
-#+
-#+ @param p_cod_cia - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00023_cod_cia_checkColumnConstraints(p_cod_cia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_cia LIKE cctb00023.cod_cia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00023_cod_cia_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00023_num_trans_checkColumnConstraints">}
-#+ Check constraints on the "cctb00023.num_trans" column
-#+
-#+ @param p_num_trans - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00023_num_trans_checkColumnConstraints(p_num_trans)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_trans LIKE cctb00023.num_trans
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00023_num_trans_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00023_status_t_checkColumnConstraints">}
-#+ Check constraints on the "cctb00023.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00023_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cctb00023.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00023_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00023_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "cctb00023.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00023_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cctb00023.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00023_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00023_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "cctb00023.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00023_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cctb00023.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00023_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00023_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "cctb00023.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00023_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cctb00023.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00023_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00023_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "cctb00023.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00023_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cctb00023.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00023_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00022_checkTableConstraints">}
-#+ Check constraints on the "cctb00022" table
-#+
-#+ @param p_data - a row data LIKE cctb00022.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00022_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cctb00022.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cctb00022_cod_moneda_checkColumnConstraints(p_data.cod_moneda) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00022_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00022_valor_checkColumnConstraints(p_data.valor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00022_tipo_moneda_checkColumnConstraints(p_data.tipo_moneda) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00022_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00022_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00022_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00022_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00022_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00022_checkTableConstraints
-
-{<BLOCK Name="fct.cctb00022_cod_moneda_checkColumnConstraints">}
-#+ Check constraints on the "cctb00022.cod_moneda" column
-#+
-#+ @param p_cod_moneda - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00022_cod_moneda_checkColumnConstraints(p_cod_moneda)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_moneda LIKE cctb00022.cod_moneda
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00022_cod_moneda_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00022_descripcion_checkColumnConstraints">}
-#+ Check constraints on the "cctb00022.descripcion" column
-#+
-#+ @param p_descripcion - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00022_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE cctb00022.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00022_descripcion_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00022_valor_checkColumnConstraints">}
-#+ Check constraints on the "cctb00022.valor" column
-#+
-#+ @param p_valor - DECIMAL(18,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00022_valor_checkColumnConstraints(p_valor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valor LIKE cctb00022.valor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00022_valor_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00022_tipo_moneda_checkColumnConstraints">}
-#+ Check constraints on the "cctb00022.tipo_moneda" column
-#+
-#+ @param p_tipo_moneda - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00022_tipo_moneda_checkColumnConstraints(p_tipo_moneda)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_moneda LIKE cctb00022.tipo_moneda
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00022_tipo_moneda_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00022_status_t_checkColumnConstraints">}
-#+ Check constraints on the "cctb00022.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00022_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cctb00022.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00022_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00022_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "cctb00022.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00022_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cctb00022.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00022_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00022_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "cctb00022.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00022_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cctb00022.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00022_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00022_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "cctb00022.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00022_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cctb00022.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00022_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00022_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "cctb00022.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00022_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cctb00022.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00022_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00021_checkTableConstraints">}
-#+ Check constraints on the "cctb00021" table
-#+
-#+ @param p_data - a row data LIKE cctb00021.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00021_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cctb00021.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cctb00021_cod_cia_checkColumnConstraints(p_data.cod_cia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00021_tipo_doc_checkColumnConstraints(p_data.tipo_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00021_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00021_debito_checkColumnConstraints(p_data.debito) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00021_departamento_checkColumnConstraints(p_data.departamento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00021_status_mov_checkColumnConstraints(p_data.status_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00021_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00021_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00021_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00021_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00021_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00021_secuencia_checkColumnConstraints(p_data.secuencia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00021_cxc_checkColumnConstraints(p_data.cxc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00021_credito_checkColumnConstraints(p_data.credito) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00021_checkTableConstraints
-
-{<BLOCK Name="fct.cctb00021_cod_cia_checkColumnConstraints">}
-#+ Check constraints on the "cctb00021.cod_cia" column
-#+
-#+ @param p_cod_cia - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00021_cod_cia_checkColumnConstraints(p_cod_cia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_cia LIKE cctb00021.cod_cia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_cia IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_cia: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00021_cod_cia_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00021_tipo_doc_checkColumnConstraints">}
-#+ Check constraints on the "cctb00021.tipo_doc" column
-#+
-#+ @param p_tipo_doc - CHAR(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00021_tipo_doc_checkColumnConstraints(p_tipo_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_doc LIKE cctb00021.tipo_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_tipo_doc IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- tipo_doc: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00021_tipo_doc_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00021_descripcion_checkColumnConstraints">}
-#+ Check constraints on the "cctb00021.descripcion" column
-#+
-#+ @param p_descripcion - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00021_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE cctb00021.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00021_descripcion_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00021_debito_checkColumnConstraints">}
-#+ Check constraints on the "cctb00021.debito" column
-#+
-#+ @param p_debito - CHAR(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00021_debito_checkColumnConstraints(p_debito)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_debito LIKE cctb00021.debito
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00021_debito_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00021_departamento_checkColumnConstraints">}
-#+ Check constraints on the "cctb00021.departamento" column
-#+
-#+ @param p_departamento - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00021_departamento_checkColumnConstraints(p_departamento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_departamento LIKE cctb00021.departamento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00021_departamento_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00021_status_mov_checkColumnConstraints">}
-#+ Check constraints on the "cctb00021.status_mov" column
-#+
-#+ @param p_status_mov - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00021_status_mov_checkColumnConstraints(p_status_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_mov LIKE cctb00021.status_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00021_status_mov_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00021_status_t_checkColumnConstraints">}
-#+ Check constraints on the "cctb00021.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00021_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cctb00021.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00021_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00021_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "cctb00021.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00021_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cctb00021.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00021_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00021_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "cctb00021.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00021_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cctb00021.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00021_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00021_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "cctb00021.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00021_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cctb00021.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00021_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00021_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "cctb00021.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00021_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cctb00021.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00021_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00021_secuencia_checkColumnConstraints">}
-#+ Check constraints on the "cctb00021.secuencia" column
-#+
-#+ @param p_secuencia - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00021_secuencia_checkColumnConstraints(p_secuencia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_secuencia LIKE cctb00021.secuencia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00021_secuencia_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00021_cxc_checkColumnConstraints">}
-#+ Check constraints on the "cctb00021.cxc" column
-#+
-#+ @param p_cxc - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00021_cxc_checkColumnConstraints(p_cxc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cxc LIKE cctb00021.cxc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00021_cxc_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00021_credito_checkColumnConstraints">}
-#+ Check constraints on the "cctb00021.credito" column
-#+
-#+ @param p_credito - CHAR(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00021_credito_checkColumnConstraints(p_credito)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_credito LIKE cctb00021.credito
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00021_credito_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00020_checkTableConstraints">}
-#+ Check constraints on the "cctb00020" table
-#+
-#+ @param p_data - a row data LIKE cctb00020.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00020_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cctb00020.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cctb00020_cod_cia_checkColumnConstraints(p_data.cod_cia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00020_tipo_doc_checkColumnConstraints(p_data.tipo_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00020_num_oc_checkColumnConstraints(p_data.num_oc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00020_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00020_tipo_cliente_checkColumnConstraints(p_data.tipo_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00020_sec_cliente_checkColumnConstraints(p_data.sec_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00020_factura_checkColumnConstraints(p_data.factura) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00020_tipo_tarjeta_checkColumnConstraints(p_data.tipo_tarjeta) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00020_banco_checkColumnConstraints(p_data.banco) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00020_referencia_checkColumnConstraints(p_data.referencia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00020_porc_desc_checkColumnConstraints(p_data.porc_desc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00020_valor_efectivo_checkColumnConstraints(p_data.valor_efectivo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00020_otro_valor_checkColumnConstraints(p_data.otro_valor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00020_observacion_checkColumnConstraints(p_data.observacion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00020_devuelta_checkColumnConstraints(p_data.devuelta) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00020_num_trans_checkColumnConstraints(p_data.num_trans) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00020_tipo_aplica_checkColumnConstraints(p_data.tipo_aplica) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00020_cajera_checkColumnConstraints(p_data.cajera) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00020_cobrador_checkColumnConstraints(p_data.cobrador) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00020_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00020_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00020_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00020_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00020_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00020_checkTableConstraints
-
-{<BLOCK Name="fct.cctb00020_cod_cia_checkColumnConstraints">}
-#+ Check constraints on the "cctb00020.cod_cia" column
-#+
-#+ @param p_cod_cia - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00020_cod_cia_checkColumnConstraints(p_cod_cia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_cia LIKE cctb00020.cod_cia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00020_cod_cia_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00020_tipo_doc_checkColumnConstraints">}
-#+ Check constraints on the "cctb00020.tipo_doc" column
-#+
-#+ @param p_tipo_doc - CHAR(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00020_tipo_doc_checkColumnConstraints(p_tipo_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_doc LIKE cctb00020.tipo_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00020_tipo_doc_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00020_num_oc_checkColumnConstraints">}
-#+ Check constraints on the "cctb00020.num_oc" column
-#+
-#+ @param p_num_oc - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00020_num_oc_checkColumnConstraints(p_num_oc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_oc LIKE cctb00020.num_oc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00020_num_oc_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00020_fecha_checkColumnConstraints">}
-#+ Check constraints on the "cctb00020.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00020_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE cctb00020.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00020_fecha_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00020_tipo_cliente_checkColumnConstraints">}
-#+ Check constraints on the "cctb00020.tipo_cliente" column
-#+
-#+ @param p_tipo_cliente - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00020_tipo_cliente_checkColumnConstraints(p_tipo_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_cliente LIKE cctb00020.tipo_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00020_tipo_cliente_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00020_sec_cliente_checkColumnConstraints">}
-#+ Check constraints on the "cctb00020.sec_cliente" column
-#+
-#+ @param p_sec_cliente - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00020_sec_cliente_checkColumnConstraints(p_sec_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_cliente LIKE cctb00020.sec_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00020_sec_cliente_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00020_factura_checkColumnConstraints">}
-#+ Check constraints on the "cctb00020.factura" column
-#+
-#+ @param p_factura - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00020_factura_checkColumnConstraints(p_factura)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_factura LIKE cctb00020.factura
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00020_factura_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00020_tipo_tarjeta_checkColumnConstraints">}
-#+ Check constraints on the "cctb00020.tipo_tarjeta" column
-#+
-#+ @param p_tipo_tarjeta - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00020_tipo_tarjeta_checkColumnConstraints(p_tipo_tarjeta)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_tarjeta LIKE cctb00020.tipo_tarjeta
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00020_tipo_tarjeta_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00020_banco_checkColumnConstraints">}
-#+ Check constraints on the "cctb00020.banco" column
-#+
-#+ @param p_banco - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00020_banco_checkColumnConstraints(p_banco)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_banco LIKE cctb00020.banco
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00020_banco_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00020_referencia_checkColumnConstraints">}
-#+ Check constraints on the "cctb00020.referencia" column
-#+
-#+ @param p_referencia - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00020_referencia_checkColumnConstraints(p_referencia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_referencia LIKE cctb00020.referencia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00020_referencia_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00020_porc_desc_checkColumnConstraints">}
-#+ Check constraints on the "cctb00020.porc_desc" column
-#+
-#+ @param p_porc_desc - DECIMAL(18,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00020_porc_desc_checkColumnConstraints(p_porc_desc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_porc_desc LIKE cctb00020.porc_desc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00020_porc_desc_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00020_valor_efectivo_checkColumnConstraints">}
-#+ Check constraints on the "cctb00020.valor_efectivo" column
-#+
-#+ @param p_valor_efectivo - DECIMAL(18,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00020_valor_efectivo_checkColumnConstraints(p_valor_efectivo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valor_efectivo LIKE cctb00020.valor_efectivo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00020_valor_efectivo_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00020_otro_valor_checkColumnConstraints">}
-#+ Check constraints on the "cctb00020.otro_valor" column
-#+
-#+ @param p_otro_valor - DECIMAL(18,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00020_otro_valor_checkColumnConstraints(p_otro_valor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_otro_valor LIKE cctb00020.otro_valor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00020_otro_valor_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00020_observacion_checkColumnConstraints">}
-#+ Check constraints on the "cctb00020.observacion" column
-#+
-#+ @param p_observacion - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00020_observacion_checkColumnConstraints(p_observacion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_observacion LIKE cctb00020.observacion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00020_observacion_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00020_devuelta_checkColumnConstraints">}
-#+ Check constraints on the "cctb00020.devuelta" column
-#+
-#+ @param p_devuelta - DECIMAL(18,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00020_devuelta_checkColumnConstraints(p_devuelta)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_devuelta LIKE cctb00020.devuelta
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00020_devuelta_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00020_num_trans_checkColumnConstraints">}
-#+ Check constraints on the "cctb00020.num_trans" column
-#+
-#+ @param p_num_trans - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00020_num_trans_checkColumnConstraints(p_num_trans)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_trans LIKE cctb00020.num_trans
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00020_num_trans_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00020_tipo_aplica_checkColumnConstraints">}
-#+ Check constraints on the "cctb00020.tipo_aplica" column
-#+
-#+ @param p_tipo_aplica - CHAR(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00020_tipo_aplica_checkColumnConstraints(p_tipo_aplica)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_aplica LIKE cctb00020.tipo_aplica
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00020_tipo_aplica_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00020_cajera_checkColumnConstraints">}
-#+ Check constraints on the "cctb00020.cajera" column
-#+
-#+ @param p_cajera - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00020_cajera_checkColumnConstraints(p_cajera)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cajera LIKE cctb00020.cajera
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00020_cajera_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00020_cobrador_checkColumnConstraints">}
-#+ Check constraints on the "cctb00020.cobrador" column
-#+
-#+ @param p_cobrador - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00020_cobrador_checkColumnConstraints(p_cobrador)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cobrador LIKE cctb00020.cobrador
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00020_cobrador_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00020_status_t_checkColumnConstraints">}
-#+ Check constraints on the "cctb00020.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00020_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cctb00020.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00020_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00020_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "cctb00020.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00020_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cctb00020.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00020_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00020_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "cctb00020.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00020_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cctb00020.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00020_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00020_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "cctb00020.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00020_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cctb00020.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00020_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00020_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "cctb00020.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00020_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cctb00020.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00020_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00013_checkTableConstraints">}
-#+ Check constraints on the "cctb00013" table
-#+
-#+ @param p_data - a row data LIKE cctb00013.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00013_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cctb00013.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cctb00013_tipo_negocio_checkColumnConstraints(p_data.tipo_negocio) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00013_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00013_cond_pago_checkColumnConstraints(p_data.cond_pago) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00013_porc_desc_checkColumnConstraints(p_data.porc_desc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00013_codigo_eis_checkColumnConstraints(p_data.codigo_eis) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00013_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00013_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00013_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00013_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00013_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00013_checkTableConstraints
-
-{<BLOCK Name="fct.cctb00013_tipo_negocio_checkColumnConstraints">}
-#+ Check constraints on the "cctb00013.tipo_negocio" column
-#+
-#+ @param p_tipo_negocio - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00013_tipo_negocio_checkColumnConstraints(p_tipo_negocio)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_negocio LIKE cctb00013.tipo_negocio
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00013_tipo_negocio_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00013_descripcion_checkColumnConstraints">}
-#+ Check constraints on the "cctb00013.descripcion" column
-#+
-#+ @param p_descripcion - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00013_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE cctb00013.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00013_descripcion_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00013_cond_pago_checkColumnConstraints">}
-#+ Check constraints on the "cctb00013.cond_pago" column
-#+
-#+ @param p_cond_pago - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00013_cond_pago_checkColumnConstraints(p_cond_pago)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cond_pago LIKE cctb00013.cond_pago
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00013_cond_pago_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00013_porc_desc_checkColumnConstraints">}
-#+ Check constraints on the "cctb00013.porc_desc" column
-#+
-#+ @param p_porc_desc - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00013_porc_desc_checkColumnConstraints(p_porc_desc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_porc_desc LIKE cctb00013.porc_desc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00013_porc_desc_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00013_codigo_eis_checkColumnConstraints">}
-#+ Check constraints on the "cctb00013.codigo_eis" column
-#+
-#+ @param p_codigo_eis - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00013_codigo_eis_checkColumnConstraints(p_codigo_eis)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codigo_eis LIKE cctb00013.codigo_eis
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00013_codigo_eis_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00013_status_t_checkColumnConstraints">}
-#+ Check constraints on the "cctb00013.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00013_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cctb00013.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00013_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00013_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "cctb00013.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00013_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cctb00013.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00013_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00013_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "cctb00013.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00013_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cctb00013.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00013_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00013_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "cctb00013.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00013_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cctb00013.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00013_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00013_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "cctb00013.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00013_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cctb00013.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00013_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00011_checkTableConstraints">}
-#+ Check constraints on the "cctb00011" table
-#+
-#+ @param p_data - a row data LIKE cctb00011.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00011_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cctb00011.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cctb00011_cod_cia_checkColumnConstraints(p_data.cod_cia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00011_num_doc_checkColumnConstraints(p_data.num_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00011_tipo_doc_checkColumnConstraints(p_data.tipo_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00011_tipo_cliente_checkColumnConstraints(p_data.tipo_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00011_sec_cliente_checkColumnConstraints(p_data.sec_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00011_comentario_checkColumnConstraints(p_data.comentario) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00011_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00011_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00011_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00011_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00011_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00011_sucid_checkColumnConstraints(p_data.sucid) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00011_chitbis_checkColumnConstraints(p_data.chitbis) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00011_checkTableConstraints
-
-{<BLOCK Name="fct.cctb00011_cod_cia_checkColumnConstraints">}
-#+ Check constraints on the "cctb00011.cod_cia" column
-#+
-#+ @param p_cod_cia - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00011_cod_cia_checkColumnConstraints(p_cod_cia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_cia LIKE cctb00011.cod_cia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00011_cod_cia_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00011_num_doc_checkColumnConstraints">}
-#+ Check constraints on the "cctb00011.num_doc" column
-#+
-#+ @param p_num_doc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00011_num_doc_checkColumnConstraints(p_num_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_doc LIKE cctb00011.num_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_num_doc IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- num_doc: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00011_num_doc_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00011_tipo_doc_checkColumnConstraints">}
-#+ Check constraints on the "cctb00011.tipo_doc" column
-#+
-#+ @param p_tipo_doc - CHAR(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00011_tipo_doc_checkColumnConstraints(p_tipo_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_doc LIKE cctb00011.tipo_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00011_tipo_doc_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00011_tipo_cliente_checkColumnConstraints">}
-#+ Check constraints on the "cctb00011.tipo_cliente" column
-#+
-#+ @param p_tipo_cliente - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00011_tipo_cliente_checkColumnConstraints(p_tipo_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_cliente LIKE cctb00011.tipo_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00011_tipo_cliente_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00011_sec_cliente_checkColumnConstraints">}
-#+ Check constraints on the "cctb00011.sec_cliente" column
-#+
-#+ @param p_sec_cliente - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00011_sec_cliente_checkColumnConstraints(p_sec_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_cliente LIKE cctb00011.sec_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00011_sec_cliente_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00011_comentario_checkColumnConstraints">}
-#+ Check constraints on the "cctb00011.comentario" column
-#+
-#+ @param p_comentario - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00011_comentario_checkColumnConstraints(p_comentario)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_comentario LIKE cctb00011.comentario
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00011_comentario_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00011_status_t_checkColumnConstraints">}
-#+ Check constraints on the "cctb00011.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00011_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cctb00011.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00011_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00011_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "cctb00011.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00011_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cctb00011.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00011_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00011_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "cctb00011.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00011_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cctb00011.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00011_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00011_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "cctb00011.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00011_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cctb00011.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00011_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00011_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "cctb00011.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00011_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cctb00011.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00011_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00011_sucid_checkColumnConstraints">}
-#+ Check constraints on the "cctb00011.sucid" column
-#+
-#+ @param p_sucid - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00011_sucid_checkColumnConstraints(p_sucid)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sucid LIKE cctb00011.sucid
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00011_sucid_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00011_chitbis_checkColumnConstraints">}
-#+ Check constraints on the "cctb00011.chitbis" column
-#+
-#+ @param p_chitbis - CHAR(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00011_chitbis_checkColumnConstraints(p_chitbis)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_chitbis LIKE cctb00011.chitbis
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_chitbis IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- chitbis: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00011_chitbis_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00008_checkTableConstraints">}
-#+ Check constraints on the "cctb00008" table
-#+
-#+ @param p_data - a row data LIKE cctb00008.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00008_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cctb00008.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cctb00008_sec_vend_checkColumnConstraints(p_data.sec_vend) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00008_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00008_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00008_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00008_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00008_porc_ventas_checkColumnConstraints(p_data.porc_ventas) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00008_porc_cobros_checkColumnConstraints(p_data.porc_cobros) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00008_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00008_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00008_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00008_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00008_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00008_checkTableConstraints
-
-{<BLOCK Name="fct.cctb00008_sec_vend_checkColumnConstraints">}
-#+ Check constraints on the "cctb00008.sec_vend" column
-#+
-#+ @param p_sec_vend - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00008_sec_vend_checkColumnConstraints(p_sec_vend)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_vend LIKE cctb00008.sec_vend
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_sec_vend IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- sec_vend: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00008_sec_vend_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00008_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "cctb00008.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00008_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE cctb00008.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_n IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_n: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00008_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00008_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "cctb00008.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00008_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE cctb00008.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_grupo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_grupo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00008_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00008_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "cctb00008.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00008_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE cctb00008.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_tipo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_tipo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00008_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00008_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "cctb00008.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00008_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE cctb00008.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_sec IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_sec: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00008_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00008_porc_ventas_checkColumnConstraints">}
-#+ Check constraints on the "cctb00008.porc_ventas" column
-#+
-#+ @param p_porc_ventas - DECIMAL(8,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00008_porc_ventas_checkColumnConstraints(p_porc_ventas)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_porc_ventas LIKE cctb00008.porc_ventas
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_porc_ventas IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- porc_ventas: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00008_porc_ventas_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00008_porc_cobros_checkColumnConstraints">}
-#+ Check constraints on the "cctb00008.porc_cobros" column
-#+
-#+ @param p_porc_cobros - DECIMAL(8,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00008_porc_cobros_checkColumnConstraints(p_porc_cobros)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_porc_cobros LIKE cctb00008.porc_cobros
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00008_porc_cobros_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00008_status_t_checkColumnConstraints">}
-#+ Check constraints on the "cctb00008.status_t" column
-#+
-#+ @param p_status_t - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00008_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cctb00008.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00008_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00008_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "cctb00008.us_crea" column
-#+
-#+ @param p_us_crea - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00008_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cctb00008.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00008_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00008_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "cctb00008.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00008_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cctb00008.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00008_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00008_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "cctb00008.us_mod" column
-#+
-#+ @param p_us_mod - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00008_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cctb00008.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00008_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00008_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "cctb00008.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00008_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cctb00008.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00008_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00003_checkTableConstraints">}
-#+ Check constraints on the "cctb00003" table
-#+
-#+ @param p_data - a row data LIKE cctb00003.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00003_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cctb00003.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cctb00003_cod_vend_checkColumnConstraints(p_data.cod_vend) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00003_sec_vend_checkColumnConstraints(p_data.sec_vend) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00003_ult_recibo_checkColumnConstraints(p_data.ult_recibo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00003_tipo_doc_checkColumnConstraints(p_data.tipo_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00003_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00003_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00003_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00003_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00003_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00003_sucid_checkColumnConstraints(p_data.sucid) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00003_checkTableConstraints
-
-{<BLOCK Name="fct.cctb00003_cod_vend_checkColumnConstraints">}
-#+ Check constraints on the "cctb00003.cod_vend" column
-#+
-#+ @param p_cod_vend - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00003_cod_vend_checkColumnConstraints(p_cod_vend)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_vend LIKE cctb00003.cod_vend
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00003_cod_vend_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00003_sec_vend_checkColumnConstraints">}
-#+ Check constraints on the "cctb00003.sec_vend" column
-#+
-#+ @param p_sec_vend - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00003_sec_vend_checkColumnConstraints(p_sec_vend)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_vend LIKE cctb00003.sec_vend
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00003_sec_vend_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00003_ult_recibo_checkColumnConstraints">}
-#+ Check constraints on the "cctb00003.ult_recibo" column
-#+
-#+ @param p_ult_recibo - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00003_ult_recibo_checkColumnConstraints(p_ult_recibo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ult_recibo LIKE cctb00003.ult_recibo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00003_ult_recibo_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00003_tipo_doc_checkColumnConstraints">}
-#+ Check constraints on the "cctb00003.tipo_doc" column
-#+
-#+ @param p_tipo_doc - CHAR(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00003_tipo_doc_checkColumnConstraints(p_tipo_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_doc LIKE cctb00003.tipo_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00003_tipo_doc_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00003_status_t_checkColumnConstraints">}
-#+ Check constraints on the "cctb00003.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00003_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cctb00003.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00003_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00003_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "cctb00003.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00003_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cctb00003.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00003_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00003_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "cctb00003.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00003_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cctb00003.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00003_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00003_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "cctb00003.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00003_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cctb00003.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00003_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00003_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "cctb00003.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00003_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cctb00003.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00003_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00003_sucid_checkColumnConstraints">}
-#+ Check constraints on the "cctb00003.sucid" column
-#+
-#+ @param p_sucid - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00003_sucid_checkColumnConstraints(p_sucid)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sucid LIKE cctb00003.sucid
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00003_sucid_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00002_checkTableConstraints">}
-#+ Check constraints on the "cctb00002" table
-#+
-#+ @param p_data - a row data LIKE cctb00002.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00002_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cctb00002.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cctb00002_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00002_cod_vend_checkColumnConstraints(p_data.cod_vend) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00002_sec_vend_checkColumnConstraints(p_data.sec_vend) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00002_sec_de_checkColumnConstraints(p_data.sec_de) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00002_sec_a_checkColumnConstraints(p_data.sec_a) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00002_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00002_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00002_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00002_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00002_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00002_checkTableConstraints
-
-{<BLOCK Name="fct.cctb00002_fecha_checkColumnConstraints">}
-#+ Check constraints on the "cctb00002.fecha" column
-#+
-#+ @param p_fecha - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00002_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE cctb00002.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00002_fecha_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00002_cod_vend_checkColumnConstraints">}
-#+ Check constraints on the "cctb00002.cod_vend" column
-#+
-#+ @param p_cod_vend - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00002_cod_vend_checkColumnConstraints(p_cod_vend)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_vend LIKE cctb00002.cod_vend
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00002_cod_vend_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00002_sec_vend_checkColumnConstraints">}
-#+ Check constraints on the "cctb00002.sec_vend" column
-#+
-#+ @param p_sec_vend - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00002_sec_vend_checkColumnConstraints(p_sec_vend)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_vend LIKE cctb00002.sec_vend
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00002_sec_vend_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00002_sec_de_checkColumnConstraints">}
-#+ Check constraints on the "cctb00002.sec_de" column
-#+
-#+ @param p_sec_de - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00002_sec_de_checkColumnConstraints(p_sec_de)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_de LIKE cctb00002.sec_de
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00002_sec_de_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00002_sec_a_checkColumnConstraints">}
-#+ Check constraints on the "cctb00002.sec_a" column
-#+
-#+ @param p_sec_a - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00002_sec_a_checkColumnConstraints(p_sec_a)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_a LIKE cctb00002.sec_a
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00002_sec_a_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00002_status_t_checkColumnConstraints">}
-#+ Check constraints on the "cctb00002.status_t" column
-#+
-#+ @param p_status_t - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00002_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cctb00002.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00002_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00002_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "cctb00002.us_crea" column
-#+
-#+ @param p_us_crea - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00002_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cctb00002.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00002_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00002_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "cctb00002.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00002_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cctb00002.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00002_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00002_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "cctb00002.us_mod" column
-#+
-#+ @param p_us_mod - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00002_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cctb00002.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00002_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00002_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "cctb00002.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00002_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cctb00002.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00002_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00001_checkTableConstraints">}
-#+ Check constraints on the "cctb00001" table
-#+
-#+ @param p_data - a row data LIKE cctb00001.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00001_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE cctb00001.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_cctb00001_cuenta_no_checkColumnConstraints(p_data.cuenta_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00001_cod_cia_checkColumnConstraints(p_data.cod_cia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00001_tipo_doc_checkColumnConstraints(p_data.tipo_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00001_num_doc_checkColumnConstraints(p_data.num_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00001_tipo_cliente_checkColumnConstraints(p_data.tipo_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00001_sec_cliente_checkColumnConstraints(p_data.sec_cliente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00001_cod_emp_checkColumnConstraints(p_data.cod_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00001_cod_emp_sec_checkColumnConstraints(p_data.cod_emp_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00001_fecha_orig_checkColumnConstraints(p_data.fecha_orig) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00001_fecha_ven_checkColumnConstraints(p_data.fecha_ven) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00001_aplica_a_checkColumnConstraints(p_data.aplica_a) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00001_banco_checkColumnConstraints(p_data.banco) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00001_num_cheque_checkColumnConstraints(p_data.num_cheque) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00001_valor_checkColumnConstraints(p_data.valor) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00001_valor_efectivo_checkColumnConstraints(p_data.valor_efectivo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00001_valor_cheque_checkColumnConstraints(p_data.valor_cheque) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00001_costo_checkColumnConstraints(p_data.costo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00001_monto_desc_checkColumnConstraints(p_data.monto_desc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00001_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00001_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00001_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00001_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_cctb00001_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00001_checkTableConstraints
-
-{<BLOCK Name="fct.cctb00001_cuenta_no_checkColumnConstraints">}
-#+ Check constraints on the "cctb00001.cuenta_no" column
-#+
-#+ @param p_cuenta_no - CHAR(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00001_cuenta_no_checkColumnConstraints(p_cuenta_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cuenta_no LIKE cctb00001.cuenta_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00001_cuenta_no_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00001_cod_cia_checkColumnConstraints">}
-#+ Check constraints on the "cctb00001.cod_cia" column
-#+
-#+ @param p_cod_cia - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00001_cod_cia_checkColumnConstraints(p_cod_cia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_cia LIKE cctb00001.cod_cia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00001_cod_cia_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00001_tipo_doc_checkColumnConstraints">}
-#+ Check constraints on the "cctb00001.tipo_doc" column
-#+
-#+ @param p_tipo_doc - CHAR(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00001_tipo_doc_checkColumnConstraints(p_tipo_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_doc LIKE cctb00001.tipo_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00001_tipo_doc_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00001_num_doc_checkColumnConstraints">}
-#+ Check constraints on the "cctb00001.num_doc" column
-#+
-#+ @param p_num_doc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00001_num_doc_checkColumnConstraints(p_num_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_doc LIKE cctb00001.num_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_num_doc IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- num_doc: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00001_num_doc_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00001_tipo_cliente_checkColumnConstraints">}
-#+ Check constraints on the "cctb00001.tipo_cliente" column
-#+
-#+ @param p_tipo_cliente - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00001_tipo_cliente_checkColumnConstraints(p_tipo_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_cliente LIKE cctb00001.tipo_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00001_tipo_cliente_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00001_sec_cliente_checkColumnConstraints">}
-#+ Check constraints on the "cctb00001.sec_cliente" column
-#+
-#+ @param p_sec_cliente - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00001_sec_cliente_checkColumnConstraints(p_sec_cliente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_cliente LIKE cctb00001.sec_cliente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00001_sec_cliente_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00001_cod_emp_checkColumnConstraints">}
-#+ Check constraints on the "cctb00001.cod_emp" column
-#+
-#+ @param p_cod_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00001_cod_emp_checkColumnConstraints(p_cod_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_emp LIKE cctb00001.cod_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00001_cod_emp_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00001_cod_emp_sec_checkColumnConstraints">}
-#+ Check constraints on the "cctb00001.cod_emp_sec" column
-#+
-#+ @param p_cod_emp_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00001_cod_emp_sec_checkColumnConstraints(p_cod_emp_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_emp_sec LIKE cctb00001.cod_emp_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00001_cod_emp_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00001_fecha_orig_checkColumnConstraints">}
-#+ Check constraints on the "cctb00001.fecha_orig" column
-#+
-#+ @param p_fecha_orig - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00001_fecha_orig_checkColumnConstraints(p_fecha_orig)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_orig LIKE cctb00001.fecha_orig
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00001_fecha_orig_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00001_fecha_ven_checkColumnConstraints">}
-#+ Check constraints on the "cctb00001.fecha_ven" column
-#+
-#+ @param p_fecha_ven - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00001_fecha_ven_checkColumnConstraints(p_fecha_ven)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_ven LIKE cctb00001.fecha_ven
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00001_fecha_ven_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00001_aplica_a_checkColumnConstraints">}
-#+ Check constraints on the "cctb00001.aplica_a" column
-#+
-#+ @param p_aplica_a - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00001_aplica_a_checkColumnConstraints(p_aplica_a)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_aplica_a LIKE cctb00001.aplica_a
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00001_aplica_a_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00001_banco_checkColumnConstraints">}
-#+ Check constraints on the "cctb00001.banco" column
-#+
-#+ @param p_banco - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00001_banco_checkColumnConstraints(p_banco)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_banco LIKE cctb00001.banco
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00001_banco_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00001_num_cheque_checkColumnConstraints">}
-#+ Check constraints on the "cctb00001.num_cheque" column
-#+
-#+ @param p_num_cheque - CHAR(12) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00001_num_cheque_checkColumnConstraints(p_num_cheque)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_cheque LIKE cctb00001.num_cheque
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00001_num_cheque_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00001_valor_checkColumnConstraints">}
-#+ Check constraints on the "cctb00001.valor" column
-#+
-#+ @param p_valor - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00001_valor_checkColumnConstraints(p_valor)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valor LIKE cctb00001.valor
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_valor IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- valor: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00001_valor_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00001_valor_efectivo_checkColumnConstraints">}
-#+ Check constraints on the "cctb00001.valor_efectivo" column
-#+
-#+ @param p_valor_efectivo - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00001_valor_efectivo_checkColumnConstraints(p_valor_efectivo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valor_efectivo LIKE cctb00001.valor_efectivo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00001_valor_efectivo_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00001_valor_cheque_checkColumnConstraints">}
-#+ Check constraints on the "cctb00001.valor_cheque" column
-#+
-#+ @param p_valor_cheque - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00001_valor_cheque_checkColumnConstraints(p_valor_cheque)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_valor_cheque LIKE cctb00001.valor_cheque
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00001_valor_cheque_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00001_costo_checkColumnConstraints">}
-#+ Check constraints on the "cctb00001.costo" column
-#+
-#+ @param p_costo - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00001_costo_checkColumnConstraints(p_costo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_costo LIKE cctb00001.costo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00001_costo_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00001_monto_desc_checkColumnConstraints">}
-#+ Check constraints on the "cctb00001.monto_desc" column
-#+
-#+ @param p_monto_desc - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00001_monto_desc_checkColumnConstraints(p_monto_desc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_monto_desc LIKE cctb00001.monto_desc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00001_monto_desc_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00001_status_t_checkColumnConstraints">}
-#+ Check constraints on the "cctb00001.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00001_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE cctb00001.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00001_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00001_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "cctb00001.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00001_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE cctb00001.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00001_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00001_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "cctb00001.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00001_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE cctb00001.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00001_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00001_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "cctb00001.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00001_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE cctb00001.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00001_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.cctb00001_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "cctb00001.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_cctb00001_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE cctb00001.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.cctb00001_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.category_checkTableConstraints">}
-#+ Check constraints on the "category" table
-#+
-#+ @param p_data - a row data LIKE category.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_category_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE category.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_category_catid_checkColumnConstraints(p_data.catid) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_category_catorder_checkColumnConstraints(p_data.catorder) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_category_catname_checkColumnConstraints(p_data.catname) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_category_catdesc_checkColumnConstraints(p_data.catdesc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_category_catpic_checkColumnConstraints(p_data.catpic) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.category_checkTableConstraints
-
-{<BLOCK Name="fct.category_catid_checkColumnConstraints">}
-#+ Check constraints on the "category.catid" column
-#+
-#+ @param p_catid - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_category_catid_checkColumnConstraints(p_catid)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_catid LIKE category.catid
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_catid IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- catid: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.category_catid_checkColumnConstraints
-
-{<BLOCK Name="fct.category_catorder_checkColumnConstraints">}
-#+ Check constraints on the "category.catorder" column
-#+
-#+ @param p_catorder - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_category_catorder_checkColumnConstraints(p_catorder)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_catorder LIKE category.catorder
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.category_catorder_checkColumnConstraints
-
-{<BLOCK Name="fct.category_catname_checkColumnConstraints">}
-#+ Check constraints on the "category.catname" column
-#+
-#+ @param p_catname - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_category_catname_checkColumnConstraints(p_catname)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_catname LIKE category.catname
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.category_catname_checkColumnConstraints
-
-{<BLOCK Name="fct.category_catdesc_checkColumnConstraints">}
-#+ Check constraints on the "category.catdesc" column
-#+
-#+ @param p_catdesc - CHAR(255) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_category_catdesc_checkColumnConstraints(p_catdesc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_catdesc LIKE category.catdesc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.category_catdesc_checkColumnConstraints
-
-{<BLOCK Name="fct.category_catpic_checkColumnConstraints">}
-#+ Check constraints on the "category.catpic" column
-#+
-#+ @param p_catpic - CHAR(255) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_category_catpic_checkColumnConstraints(p_catpic)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_catpic LIKE category.catpic
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.category_catpic_checkColumnConstraints
-
-{<BLOCK Name="fct.bono2011d_checkTableConstraints">}
-#+ Check constraints on the "bono2011d" table
-#+
-#+ @param p_data - a row data LIKE bono2011d.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_bono2011d_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE bono2011d.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_bono2011d_f1_checkColumnConstraints(p_data.f1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_bono2011d_f2_checkColumnConstraints(p_data.f2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_bono2011d_f3_checkColumnConstraints(p_data.f3) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_bono2011d_f4_checkColumnConstraints(p_data.f4) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_bono2011d_f5_checkColumnConstraints(p_data.f5) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_bono2011d_f6_checkColumnConstraints(p_data.f6) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_bono2011d_f7_checkColumnConstraints(p_data.f7) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_bono2011d_f8_checkColumnConstraints(p_data.f8) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_bono2011d_dias_checkColumnConstraints(p_data.dias) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_bono2011d_f10_checkColumnConstraints(p_data.f10) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_bono2011d_bonificacion_checkColumnConstraints(p_data.bonificacion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.bono2011d_checkTableConstraints
-
-{<BLOCK Name="fct.bono2011d_f1_checkColumnConstraints">}
-#+ Check constraints on the "bono2011d.f1" column
-#+
-#+ @param p_f1 - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_bono2011d_f1_checkColumnConstraints(p_f1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_f1 LIKE bono2011d.f1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.bono2011d_f1_checkColumnConstraints
-
-{<BLOCK Name="fct.bono2011d_f2_checkColumnConstraints">}
-#+ Check constraints on the "bono2011d.f2" column
-#+
-#+ @param p_f2 - VARCHAR2(255) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_bono2011d_f2_checkColumnConstraints(p_f2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_f2 LIKE bono2011d.f2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.bono2011d_f2_checkColumnConstraints
-
-{<BLOCK Name="fct.bono2011d_f3_checkColumnConstraints">}
-#+ Check constraints on the "bono2011d.f3" column
-#+
-#+ @param p_f3 - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_bono2011d_f3_checkColumnConstraints(p_f3)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_f3 LIKE bono2011d.f3
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.bono2011d_f3_checkColumnConstraints
-
-{<BLOCK Name="fct.bono2011d_f4_checkColumnConstraints">}
-#+ Check constraints on the "bono2011d.f4" column
-#+
-#+ @param p_f4 - VARCHAR2(255) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_bono2011d_f4_checkColumnConstraints(p_f4)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_f4 LIKE bono2011d.f4
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.bono2011d_f4_checkColumnConstraints
-
-{<BLOCK Name="fct.bono2011d_f5_checkColumnConstraints">}
-#+ Check constraints on the "bono2011d.f5" column
-#+
-#+ @param p_f5 - VARCHAR2(255) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_bono2011d_f5_checkColumnConstraints(p_f5)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_f5 LIKE bono2011d.f5
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.bono2011d_f5_checkColumnConstraints
-
-{<BLOCK Name="fct.bono2011d_f6_checkColumnConstraints">}
-#+ Check constraints on the "bono2011d.f6" column
-#+
-#+ @param p_f6 - VARCHAR2(255) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_bono2011d_f6_checkColumnConstraints(p_f6)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_f6 LIKE bono2011d.f6
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.bono2011d_f6_checkColumnConstraints
-
-{<BLOCK Name="fct.bono2011d_f7_checkColumnConstraints">}
-#+ Check constraints on the "bono2011d.f7" column
-#+
-#+ @param p_f7 - VARCHAR2(255) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_bono2011d_f7_checkColumnConstraints(p_f7)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_f7 LIKE bono2011d.f7
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.bono2011d_f7_checkColumnConstraints
-
-{<BLOCK Name="fct.bono2011d_f8_checkColumnConstraints">}
-#+ Check constraints on the "bono2011d.f8" column
-#+
-#+ @param p_f8 - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_bono2011d_f8_checkColumnConstraints(p_f8)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_f8 LIKE bono2011d.f8
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.bono2011d_f8_checkColumnConstraints
-
-{<BLOCK Name="fct.bono2011d_dias_checkColumnConstraints">}
-#+ Check constraints on the "bono2011d.dias" column
-#+
-#+ @param p_dias - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_bono2011d_dias_checkColumnConstraints(p_dias)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_dias LIKE bono2011d.dias
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.bono2011d_dias_checkColumnConstraints
-
-{<BLOCK Name="fct.bono2011d_f10_checkColumnConstraints">}
-#+ Check constraints on the "bono2011d.f10" column
-#+
-#+ @param p_f10 - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_bono2011d_f10_checkColumnConstraints(p_f10)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_f10 LIKE bono2011d.f10
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.bono2011d_f10_checkColumnConstraints
-
-{<BLOCK Name="fct.bono2011d_bonificacion_checkColumnConstraints">}
-#+ Check constraints on the "bono2011d.bonificacion" column
-#+
-#+ @param p_bonificacion - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_bono2011d_bonificacion_checkColumnConstraints(p_bonificacion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_bonificacion LIKE bono2011d.bonificacion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.bono2011d_bonificacion_checkColumnConstraints
-
-{<BLOCK Name="fct.bono2011_checkTableConstraints">}
-#+ Check constraints on the "bono2011" table
-#+
-#+ @param p_data - a row data LIKE bono2011.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_bono2011_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE bono2011.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_bono2011_f1_checkColumnConstraints(p_data.f1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_bono2011_f2_checkColumnConstraints(p_data.f2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_bono2011_f3_checkColumnConstraints(p_data.f3) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_bono2011_f4_checkColumnConstraints(p_data.f4) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_bono2011_f5_checkColumnConstraints(p_data.f5) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_bono2011_f6_checkColumnConstraints(p_data.f6) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_bono2011_f7_checkColumnConstraints(p_data.f7) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_bono2011_f8_checkColumnConstraints(p_data.f8) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_bono2011_dias_checkColumnConstraints(p_data.dias) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_bono2011_f10_checkColumnConstraints(p_data.f10) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_bono2011_sueldo1_checkColumnConstraints(p_data.sueldo1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_bono2011_sueldo_checkColumnConstraints(p_data.sueldo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_bono2011_bonificacion1_checkColumnConstraints(p_data.bonificacion1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_bono2011_bonificacion_checkColumnConstraints(p_data.bonificacion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_bono2011_infotep_checkColumnConstraints(p_data.infotep) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_bono2011_bonificacion2_checkColumnConstraints(p_data.bonificacion2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_bono2011_f17_checkColumnConstraints(p_data.f17) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_bono2011_f18_checkColumnConstraints(p_data.f18) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_bono2011_f19_checkColumnConstraints(p_data.f19) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_bono2011_f20_checkColumnConstraints(p_data.f20) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.bono2011_checkTableConstraints
-
-{<BLOCK Name="fct.bono2011_f1_checkColumnConstraints">}
-#+ Check constraints on the "bono2011.f1" column
-#+
-#+ @param p_f1 - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_bono2011_f1_checkColumnConstraints(p_f1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_f1 LIKE bono2011.f1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.bono2011_f1_checkColumnConstraints
-
-{<BLOCK Name="fct.bono2011_f2_checkColumnConstraints">}
-#+ Check constraints on the "bono2011.f2" column
-#+
-#+ @param p_f2 - VARCHAR2(255) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_bono2011_f2_checkColumnConstraints(p_f2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_f2 LIKE bono2011.f2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.bono2011_f2_checkColumnConstraints
-
-{<BLOCK Name="fct.bono2011_f3_checkColumnConstraints">}
-#+ Check constraints on the "bono2011.f3" column
-#+
-#+ @param p_f3 - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_bono2011_f3_checkColumnConstraints(p_f3)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_f3 LIKE bono2011.f3
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.bono2011_f3_checkColumnConstraints
-
-{<BLOCK Name="fct.bono2011_f4_checkColumnConstraints">}
-#+ Check constraints on the "bono2011.f4" column
-#+
-#+ @param p_f4 - VARCHAR2(255) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_bono2011_f4_checkColumnConstraints(p_f4)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_f4 LIKE bono2011.f4
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.bono2011_f4_checkColumnConstraints
-
-{<BLOCK Name="fct.bono2011_f5_checkColumnConstraints">}
-#+ Check constraints on the "bono2011.f5" column
-#+
-#+ @param p_f5 - VARCHAR2(255) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_bono2011_f5_checkColumnConstraints(p_f5)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_f5 LIKE bono2011.f5
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.bono2011_f5_checkColumnConstraints
-
-{<BLOCK Name="fct.bono2011_f6_checkColumnConstraints">}
-#+ Check constraints on the "bono2011.f6" column
-#+
-#+ @param p_f6 - VARCHAR2(255) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_bono2011_f6_checkColumnConstraints(p_f6)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_f6 LIKE bono2011.f6
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.bono2011_f6_checkColumnConstraints
-
-{<BLOCK Name="fct.bono2011_f7_checkColumnConstraints">}
-#+ Check constraints on the "bono2011.f7" column
-#+
-#+ @param p_f7 - VARCHAR2(255) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_bono2011_f7_checkColumnConstraints(p_f7)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_f7 LIKE bono2011.f7
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.bono2011_f7_checkColumnConstraints
-
-{<BLOCK Name="fct.bono2011_f8_checkColumnConstraints">}
-#+ Check constraints on the "bono2011.f8" column
-#+
-#+ @param p_f8 - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_bono2011_f8_checkColumnConstraints(p_f8)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_f8 LIKE bono2011.f8
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.bono2011_f8_checkColumnConstraints
-
-{<BLOCK Name="fct.bono2011_dias_checkColumnConstraints">}
-#+ Check constraints on the "bono2011.dias" column
-#+
-#+ @param p_dias - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_bono2011_dias_checkColumnConstraints(p_dias)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_dias LIKE bono2011.dias
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.bono2011_dias_checkColumnConstraints
-
-{<BLOCK Name="fct.bono2011_f10_checkColumnConstraints">}
-#+ Check constraints on the "bono2011.f10" column
-#+
-#+ @param p_f10 - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_bono2011_f10_checkColumnConstraints(p_f10)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_f10 LIKE bono2011.f10
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.bono2011_f10_checkColumnConstraints
-
-{<BLOCK Name="fct.bono2011_sueldo1_checkColumnConstraints">}
-#+ Check constraints on the "bono2011.sueldo1" column
-#+
-#+ @param p_sueldo1 - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_bono2011_sueldo1_checkColumnConstraints(p_sueldo1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sueldo1 LIKE bono2011.sueldo1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.bono2011_sueldo1_checkColumnConstraints
-
-{<BLOCK Name="fct.bono2011_sueldo_checkColumnConstraints">}
-#+ Check constraints on the "bono2011.sueldo" column
-#+
-#+ @param p_sueldo - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_bono2011_sueldo_checkColumnConstraints(p_sueldo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sueldo LIKE bono2011.sueldo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.bono2011_sueldo_checkColumnConstraints
-
-{<BLOCK Name="fct.bono2011_bonificacion1_checkColumnConstraints">}
-#+ Check constraints on the "bono2011.bonificacion1" column
-#+
-#+ @param p_bonificacion1 - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_bono2011_bonificacion1_checkColumnConstraints(p_bonificacion1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_bonificacion1 LIKE bono2011.bonificacion1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.bono2011_bonificacion1_checkColumnConstraints
-
-{<BLOCK Name="fct.bono2011_bonificacion_checkColumnConstraints">}
-#+ Check constraints on the "bono2011.bonificacion" column
-#+
-#+ @param p_bonificacion - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_bono2011_bonificacion_checkColumnConstraints(p_bonificacion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_bonificacion LIKE bono2011.bonificacion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.bono2011_bonificacion_checkColumnConstraints
-
-{<BLOCK Name="fct.bono2011_infotep_checkColumnConstraints">}
-#+ Check constraints on the "bono2011.infotep" column
-#+
-#+ @param p_infotep - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_bono2011_infotep_checkColumnConstraints(p_infotep)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_infotep LIKE bono2011.infotep
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.bono2011_infotep_checkColumnConstraints
-
-{<BLOCK Name="fct.bono2011_bonificacion2_checkColumnConstraints">}
-#+ Check constraints on the "bono2011.bonificacion2" column
-#+
-#+ @param p_bonificacion2 - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_bono2011_bonificacion2_checkColumnConstraints(p_bonificacion2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_bonificacion2 LIKE bono2011.bonificacion2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.bono2011_bonificacion2_checkColumnConstraints
-
-{<BLOCK Name="fct.bono2011_f17_checkColumnConstraints">}
-#+ Check constraints on the "bono2011.f17" column
-#+
-#+ @param p_f17 - VARCHAR2(255) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_bono2011_f17_checkColumnConstraints(p_f17)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_f17 LIKE bono2011.f17
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.bono2011_f17_checkColumnConstraints
-
-{<BLOCK Name="fct.bono2011_f18_checkColumnConstraints">}
-#+ Check constraints on the "bono2011.f18" column
-#+
-#+ @param p_f18 - VARCHAR2(255) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_bono2011_f18_checkColumnConstraints(p_f18)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_f18 LIKE bono2011.f18
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.bono2011_f18_checkColumnConstraints
-
-{<BLOCK Name="fct.bono2011_f19_checkColumnConstraints">}
-#+ Check constraints on the "bono2011.f19" column
-#+
-#+ @param p_f19 - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_bono2011_f19_checkColumnConstraints(p_f19)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_f19 LIKE bono2011.f19
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.bono2011_f19_checkColumnConstraints
-
-{<BLOCK Name="fct.bono2011_f20_checkColumnConstraints">}
-#+ Check constraints on the "bono2011.f20" column
-#+
-#+ @param p_f20 - FLOAT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_bono2011_f20_checkColumnConstraints(p_f20)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_f20 LIKE bono2011.f20
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.bono2011_f20_checkColumnConstraints
-
-{<BLOCK Name="fct.bloques_checkTableConstraints">}
-#+ Check constraints on the "bloques" table
-#+
-#+ @param p_data - a row data LIKE bloques.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_bloques_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE bloques.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_bloques_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_bloques_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_bloques_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_bloques_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.bloques_checkTableConstraints
-
-{<BLOCK Name="fct.bloques_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "bloques.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_bloques_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE bloques.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.bloques_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.bloques_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "bloques.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_bloques_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE bloques.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.bloques_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.bloques_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "bloques.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_bloques_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE bloques.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.bloques_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.bloques_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "bloques.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_bloques_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE bloques.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.bloques_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.altbm00001_checkTableConstraints">}
-#+ Check constraints on the "altbm00001" table
-#+
-#+ @param p_data - a row data LIKE altbm00001.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_altbm00001_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE altbm00001.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_altbm00001_num_doc_checkColumnConstraints(p_data.num_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_altbm00001_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_altbm00001_tipo_checkColumnConstraints(p_data.tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_altbm00001_orden_compra_checkColumnConstraints(p_data.orden_compra) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_altbm00001_cod_sp_checkColumnConstraints(p_data.cod_sp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_altbm00001_cod_sp_sec_checkColumnConstraints(p_data.cod_sp_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_altbm00001_conduce_no_checkColumnConstraints(p_data.conduce_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_altbm00001_fact_no_checkColumnConstraints(p_data.fact_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_altbm00001_bodega_checkColumnConstraints(p_data.bodega) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_altbm00001_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_altbm00001_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_altbm00001_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_altbm00001_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_altbm00001_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.altbm00001_checkTableConstraints
-
-{<BLOCK Name="fct.altbm00001_num_doc_checkColumnConstraints">}
-#+ Check constraints on the "altbm00001.num_doc" column
-#+
-#+ @param p_num_doc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_altbm00001_num_doc_checkColumnConstraints(p_num_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_doc LIKE altbm00001.num_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_num_doc IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- num_doc: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.altbm00001_num_doc_checkColumnConstraints
-
-{<BLOCK Name="fct.altbm00001_fecha_checkColumnConstraints">}
-#+ Check constraints on the "altbm00001.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_altbm00001_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE altbm00001.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_fecha IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- fecha: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.altbm00001_fecha_checkColumnConstraints
-
-{<BLOCK Name="fct.altbm00001_tipo_checkColumnConstraints">}
-#+ Check constraints on the "altbm00001.tipo" column
-#+
-#+ @param p_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_altbm00001_tipo_checkColumnConstraints(p_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo LIKE altbm00001.tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_tipo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- tipo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.altbm00001_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.altbm00001_orden_compra_checkColumnConstraints">}
-#+ Check constraints on the "altbm00001.orden_compra" column
-#+
-#+ @param p_orden_compra - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_altbm00001_orden_compra_checkColumnConstraints(p_orden_compra)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_orden_compra LIKE altbm00001.orden_compra
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_orden_compra IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- orden_compra: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.altbm00001_orden_compra_checkColumnConstraints
-
-{<BLOCK Name="fct.altbm00001_cod_sp_checkColumnConstraints">}
-#+ Check constraints on the "altbm00001.cod_sp" column
-#+
-#+ @param p_cod_sp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_altbm00001_cod_sp_checkColumnConstraints(p_cod_sp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sp LIKE altbm00001.cod_sp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_sp IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_sp: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.altbm00001_cod_sp_checkColumnConstraints
-
-{<BLOCK Name="fct.altbm00001_cod_sp_sec_checkColumnConstraints">}
-#+ Check constraints on the "altbm00001.cod_sp_sec" column
-#+
-#+ @param p_cod_sp_sec - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_altbm00001_cod_sp_sec_checkColumnConstraints(p_cod_sp_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sp_sec LIKE altbm00001.cod_sp_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_sp_sec IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_sp_sec: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.altbm00001_cod_sp_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.altbm00001_conduce_no_checkColumnConstraints">}
-#+ Check constraints on the "altbm00001.conduce_no" column
-#+
-#+ @param p_conduce_no - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_altbm00001_conduce_no_checkColumnConstraints(p_conduce_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_conduce_no LIKE altbm00001.conduce_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.altbm00001_conduce_no_checkColumnConstraints
-
-{<BLOCK Name="fct.altbm00001_fact_no_checkColumnConstraints">}
-#+ Check constraints on the "altbm00001.fact_no" column
-#+
-#+ @param p_fact_no - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_altbm00001_fact_no_checkColumnConstraints(p_fact_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fact_no LIKE altbm00001.fact_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.altbm00001_fact_no_checkColumnConstraints
-
-{<BLOCK Name="fct.altbm00001_bodega_checkColumnConstraints">}
-#+ Check constraints on the "altbm00001.bodega" column
-#+
-#+ @param p_bodega - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_altbm00001_bodega_checkColumnConstraints(p_bodega)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_bodega LIKE altbm00001.bodega
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_bodega IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- bodega: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.altbm00001_bodega_checkColumnConstraints
-
-{<BLOCK Name="fct.altbm00001_status_t_checkColumnConstraints">}
-#+ Check constraints on the "altbm00001.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_altbm00001_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE altbm00001.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.altbm00001_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.altbm00001_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "altbm00001.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_altbm00001_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE altbm00001.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.altbm00001_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.altbm00001_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "altbm00001.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_altbm00001_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE altbm00001.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.altbm00001_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.altbm00001_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "altbm00001.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_altbm00001_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE altbm00001.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.altbm00001_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.altbm00001_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "altbm00001.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_altbm00001_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE altbm00001.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.altbm00001_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.altbd00001_checkTableConstraints">}
-#+ Check constraints on the "altbd00001" table
-#+
-#+ @param p_data - a row data LIKE altbd00001.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_altbd00001_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE altbd00001.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_altbd00001_num_doc_checkColumnConstraints(p_data.num_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_altbd00001_cod_n_checkColumnConstraints(p_data.cod_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_altbd00001_cod_grupo_checkColumnConstraints(p_data.cod_grupo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_altbd00001_cod_tipo_checkColumnConstraints(p_data.cod_tipo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_altbd00001_cod_sec_checkColumnConstraints(p_data.cod_sec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_altbd00001_cantidad_1_checkColumnConstraints(p_data.cantidad_1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_altbd00001_cantdiad_2_checkColumnConstraints(p_data.cantdiad_2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_altbd00001_cod_mov_checkColumnConstraints(p_data.cod_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.altbd00001_checkTableConstraints
-
-{<BLOCK Name="fct.altbd00001_num_doc_checkColumnConstraints">}
-#+ Check constraints on the "altbd00001.num_doc" column
-#+
-#+ @param p_num_doc - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_altbd00001_num_doc_checkColumnConstraints(p_num_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_doc LIKE altbd00001.num_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_num_doc IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- num_doc: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.altbd00001_num_doc_checkColumnConstraints
-
-{<BLOCK Name="fct.altbd00001_cod_n_checkColumnConstraints">}
-#+ Check constraints on the "altbd00001.cod_n" column
-#+
-#+ @param p_cod_n - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_altbd00001_cod_n_checkColumnConstraints(p_cod_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_n LIKE altbd00001.cod_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_n IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_n: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.altbd00001_cod_n_checkColumnConstraints
-
-{<BLOCK Name="fct.altbd00001_cod_grupo_checkColumnConstraints">}
-#+ Check constraints on the "altbd00001.cod_grupo" column
-#+
-#+ @param p_cod_grupo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_altbd00001_cod_grupo_checkColumnConstraints(p_cod_grupo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_grupo LIKE altbd00001.cod_grupo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_grupo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_grupo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.altbd00001_cod_grupo_checkColumnConstraints
-
-{<BLOCK Name="fct.altbd00001_cod_tipo_checkColumnConstraints">}
-#+ Check constraints on the "altbd00001.cod_tipo" column
-#+
-#+ @param p_cod_tipo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_altbd00001_cod_tipo_checkColumnConstraints(p_cod_tipo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_tipo LIKE altbd00001.cod_tipo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_tipo IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_tipo: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.altbd00001_cod_tipo_checkColumnConstraints
-
-{<BLOCK Name="fct.altbd00001_cod_sec_checkColumnConstraints">}
-#+ Check constraints on the "altbd00001.cod_sec" column
-#+
-#+ @param p_cod_sec - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_altbd00001_cod_sec_checkColumnConstraints(p_cod_sec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sec LIKE altbd00001.cod_sec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_sec IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_sec: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.altbd00001_cod_sec_checkColumnConstraints
-
-{<BLOCK Name="fct.altbd00001_cantidad_1_checkColumnConstraints">}
-#+ Check constraints on the "altbd00001.cantidad_1" column
-#+
-#+ @param p_cantidad_1 - DECIMAL(18,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_altbd00001_cantidad_1_checkColumnConstraints(p_cantidad_1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantidad_1 LIKE altbd00001.cantidad_1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cantidad_1 IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cantidad_1: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.altbd00001_cantidad_1_checkColumnConstraints
-
-{<BLOCK Name="fct.altbd00001_cantdiad_2_checkColumnConstraints">}
-#+ Check constraints on the "altbd00001.cantdiad_2" column
-#+
-#+ @param p_cantdiad_2 - DECIMAL(18,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_altbd00001_cantdiad_2_checkColumnConstraints(p_cantdiad_2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cantdiad_2 LIKE altbd00001.cantdiad_2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cantdiad_2 IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cantdiad_2: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.altbd00001_cantdiad_2_checkColumnConstraints
-
-{<BLOCK Name="fct.altbd00001_cod_mov_checkColumnConstraints">}
-#+ Check constraints on the "altbd00001.cod_mov" column
-#+
-#+ @param p_cod_mov - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_altbd00001_cod_mov_checkColumnConstraints(p_cod_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mov LIKE altbd00001.cod_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cod_mov IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cod_mov: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.altbd00001_cod_mov_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00046_checkTableConstraints">}
-#+ Check constraints on the "adtb00046" table
-#+
-#+ @param p_data - a row data LIKE adtb00046.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00046_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE adtb00046.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_adtb00046_cod_sol_checkColumnConstraints(p_data.cod_sol) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00046_enfermedad_checkColumnConstraints(p_data.enfermedad) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00046_padecimiento_checkColumnConstraints(p_data.padecimiento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00046_observacion_checkColumnConstraints(p_data.observacion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00046_checkTableConstraints
-
-{<BLOCK Name="fct.adtb00046_cod_sol_checkColumnConstraints">}
-#+ Check constraints on the "adtb00046.cod_sol" column
-#+
-#+ @param p_cod_sol - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00046_cod_sol_checkColumnConstraints(p_cod_sol)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sol LIKE adtb00046.cod_sol
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00046_cod_sol_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00046_enfermedad_checkColumnConstraints">}
-#+ Check constraints on the "adtb00046.enfermedad" column
-#+
-#+ @param p_enfermedad - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00046_enfermedad_checkColumnConstraints(p_enfermedad)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_enfermedad LIKE adtb00046.enfermedad
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00046_enfermedad_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00046_padecimiento_checkColumnConstraints">}
-#+ Check constraints on the "adtb00046.padecimiento" column
-#+
-#+ @param p_padecimiento - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00046_padecimiento_checkColumnConstraints(p_padecimiento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_padecimiento LIKE adtb00046.padecimiento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00046_padecimiento_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00046_observacion_checkColumnConstraints">}
-#+ Check constraints on the "adtb00046.observacion" column
-#+
-#+ @param p_observacion - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00046_observacion_checkColumnConstraints(p_observacion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_observacion LIKE adtb00046.observacion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00046_observacion_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00045_checkTableConstraints">}
-#+ Check constraints on the "adtb00045" table
-#+
-#+ @param p_data - a row data LIKE adtb00045.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00045_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE adtb00045.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_adtb00045_cod_idioma_checkColumnConstraints(p_data.cod_idioma) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00045_idioma_checkColumnConstraints(p_data.idioma) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00045_pais_checkColumnConstraints(p_data.pais) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00045_region_checkColumnConstraints(p_data.region) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00045_continente_checkColumnConstraints(p_data.continente) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00045_checkTableConstraints
-
-{<BLOCK Name="fct.adtb00045_cod_idioma_checkColumnConstraints">}
-#+ Check constraints on the "adtb00045.cod_idioma" column
-#+
-#+ @param p_cod_idioma - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00045_cod_idioma_checkColumnConstraints(p_cod_idioma)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_idioma LIKE adtb00045.cod_idioma
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00045_cod_idioma_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00045_idioma_checkColumnConstraints">}
-#+ Check constraints on the "adtb00045.idioma" column
-#+
-#+ @param p_idioma - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00045_idioma_checkColumnConstraints(p_idioma)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_idioma LIKE adtb00045.idioma
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00045_idioma_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00045_pais_checkColumnConstraints">}
-#+ Check constraints on the "adtb00045.pais" column
-#+
-#+ @param p_pais - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00045_pais_checkColumnConstraints(p_pais)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_pais LIKE adtb00045.pais
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00045_pais_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00045_region_checkColumnConstraints">}
-#+ Check constraints on the "adtb00045.region" column
-#+
-#+ @param p_region - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00045_region_checkColumnConstraints(p_region)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_region LIKE adtb00045.region
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00045_region_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00045_continente_checkColumnConstraints">}
-#+ Check constraints on the "adtb00045.continente" column
-#+
-#+ @param p_continente - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00045_continente_checkColumnConstraints(p_continente)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_continente LIKE adtb00045.continente
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00045_continente_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00043_checkTableConstraints">}
-#+ Check constraints on the "adtb00043" table
-#+
-#+ @param p_data - a row data LIKE adtb00043.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00043_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE adtb00043.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_adtb00043_cod_sol_checkColumnConstraints(p_data.cod_sol) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00043_idioma_checkColumnConstraints(p_data.idioma) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00043_habla_checkColumnConstraints(p_data.habla) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00043_lee_checkColumnConstraints(p_data.lee) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00043_escribe_checkColumnConstraints(p_data.escribe) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00043_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00043_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00043_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00043_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00043_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00043_id_checkColumnConstraints(p_data.id) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00043_checkTableConstraints
-
-{<BLOCK Name="fct.adtb00043_cod_sol_checkColumnConstraints">}
-#+ Check constraints on the "adtb00043.cod_sol" column
-#+
-#+ @param p_cod_sol - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00043_cod_sol_checkColumnConstraints(p_cod_sol)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sol LIKE adtb00043.cod_sol
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00043_cod_sol_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00043_idioma_checkColumnConstraints">}
-#+ Check constraints on the "adtb00043.idioma" column
-#+
-#+ @param p_idioma - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00043_idioma_checkColumnConstraints(p_idioma)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_idioma LIKE adtb00043.idioma
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00043_idioma_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00043_habla_checkColumnConstraints">}
-#+ Check constraints on the "adtb00043.habla" column
-#+
-#+ @param p_habla - CHAR(4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00043_habla_checkColumnConstraints(p_habla)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_habla LIKE adtb00043.habla
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00043_habla_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00043_lee_checkColumnConstraints">}
-#+ Check constraints on the "adtb00043.lee" column
-#+
-#+ @param p_lee - CHAR(4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00043_lee_checkColumnConstraints(p_lee)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_lee LIKE adtb00043.lee
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00043_lee_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00043_escribe_checkColumnConstraints">}
-#+ Check constraints on the "adtb00043.escribe" column
-#+
-#+ @param p_escribe - CHAR(4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00043_escribe_checkColumnConstraints(p_escribe)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_escribe LIKE adtb00043.escribe
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00043_escribe_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00043_status_t_checkColumnConstraints">}
-#+ Check constraints on the "adtb00043.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00043_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE adtb00043.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00043_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00043_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "adtb00043.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00043_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE adtb00043.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00043_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00043_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "adtb00043.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00043_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE adtb00043.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00043_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00043_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "adtb00043.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00043_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE adtb00043.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00043_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00043_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "adtb00043.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00043_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE adtb00043.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00043_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00043_id_checkColumnConstraints">}
-#+ Check constraints on the "adtb00043.id" column
-#+
-#+ @param p_id - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00043_id_checkColumnConstraints(p_id)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_id LIKE adtb00043.id
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00043_id_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00042_checkTableConstraints">}
-#+ Check constraints on the "adtb00042" table
-#+
-#+ @param p_data - a row data LIKE adtb00042.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00042_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE adtb00042.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_adtb00042_dep_corp_checkColumnConstraints(p_data.dep_corp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00042_nombre_depto_checkColumnConstraints(p_data.nombre_depto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00042_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00042_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00042_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00042_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00042_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00042_checkTableConstraints
-
-{<BLOCK Name="fct.adtb00042_dep_corp_checkColumnConstraints">}
-#+ Check constraints on the "adtb00042.dep_corp" column
-#+
-#+ @param p_dep_corp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00042_dep_corp_checkColumnConstraints(p_dep_corp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_dep_corp LIKE adtb00042.dep_corp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00042_dep_corp_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00042_nombre_depto_checkColumnConstraints">}
-#+ Check constraints on the "adtb00042.nombre_depto" column
-#+
-#+ @param p_nombre_depto - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00042_nombre_depto_checkColumnConstraints(p_nombre_depto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombre_depto LIKE adtb00042.nombre_depto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00042_nombre_depto_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00042_status_t_checkColumnConstraints">}
-#+ Check constraints on the "adtb00042.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00042_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE adtb00042.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00042_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00042_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "adtb00042.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00042_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE adtb00042.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00042_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00042_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "adtb00042.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00042_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE adtb00042.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00042_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00042_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "adtb00042.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00042_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE adtb00042.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00042_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00042_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "adtb00042.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00042_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE adtb00042.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00042_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00041_checkTableConstraints">}
-#+ Check constraints on the "adtb00041" table
-#+
-#+ @param p_data - a row data LIKE adtb00041.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00041_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE adtb00041.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_adtb00041_mes_checkColumnConstraints(p_data.mes) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00041_ano_checkColumnConstraints(p_data.ano) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00041_num_sem_checkColumnConstraints(p_data.num_sem) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00041_fecha_del_checkColumnConstraints(p_data.fecha_del) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00041_fecha_al_checkColumnConstraints(p_data.fecha_al) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00041_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00041_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00041_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00041_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00041_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00041_checkTableConstraints
-
-{<BLOCK Name="fct.adtb00041_mes_checkColumnConstraints">}
-#+ Check constraints on the "adtb00041.mes" column
-#+
-#+ @param p_mes - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00041_mes_checkColumnConstraints(p_mes)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mes LIKE adtb00041.mes
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00041_mes_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00041_ano_checkColumnConstraints">}
-#+ Check constraints on the "adtb00041.ano" column
-#+
-#+ @param p_ano - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00041_ano_checkColumnConstraints(p_ano)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ano LIKE adtb00041.ano
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00041_ano_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00041_num_sem_checkColumnConstraints">}
-#+ Check constraints on the "adtb00041.num_sem" column
-#+
-#+ @param p_num_sem - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00041_num_sem_checkColumnConstraints(p_num_sem)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_sem LIKE adtb00041.num_sem
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00041_num_sem_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00041_fecha_del_checkColumnConstraints">}
-#+ Check constraints on the "adtb00041.fecha_del" column
-#+
-#+ @param p_fecha_del - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00041_fecha_del_checkColumnConstraints(p_fecha_del)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_del LIKE adtb00041.fecha_del
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00041_fecha_del_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00041_fecha_al_checkColumnConstraints">}
-#+ Check constraints on the "adtb00041.fecha_al" column
-#+
-#+ @param p_fecha_al - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00041_fecha_al_checkColumnConstraints(p_fecha_al)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_al LIKE adtb00041.fecha_al
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00041_fecha_al_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00041_status_t_checkColumnConstraints">}
-#+ Check constraints on the "adtb00041.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00041_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE adtb00041.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00041_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00041_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "adtb00041.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00041_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE adtb00041.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00041_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00041_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "adtb00041.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00041_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE adtb00041.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00041_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00041_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "adtb00041.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00041_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE adtb00041.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00041_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00041_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "adtb00041.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00041_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE adtb00041.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00041_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00040_checkTableConstraints">}
-#+ Check constraints on the "adtb00040" table
-#+
-#+ @param p_data - a row data LIKE adtb00040.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00040_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE adtb00040.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_adtb00040_cod_plan_checkColumnConstraints(p_data.cod_plan) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00040_plan_descrip_checkColumnConstraints(p_data.plan_descrip) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00040_porc_vida_checkColumnConstraints(p_data.porc_vida) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00040_porc_mid_checkColumnConstraints(p_data.porc_mid) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00040_porc_comision_checkColumnConstraints(p_data.porc_comision) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00040_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00040_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00040_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00040_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00040_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00040_checkTableConstraints
-
-{<BLOCK Name="fct.adtb00040_cod_plan_checkColumnConstraints">}
-#+ Check constraints on the "adtb00040.cod_plan" column
-#+
-#+ @param p_cod_plan - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00040_cod_plan_checkColumnConstraints(p_cod_plan)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_plan LIKE adtb00040.cod_plan
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00040_cod_plan_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00040_plan_descrip_checkColumnConstraints">}
-#+ Check constraints on the "adtb00040.plan_descrip" column
-#+
-#+ @param p_plan_descrip - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00040_plan_descrip_checkColumnConstraints(p_plan_descrip)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_plan_descrip LIKE adtb00040.plan_descrip
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00040_plan_descrip_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00040_porc_vida_checkColumnConstraints">}
-#+ Check constraints on the "adtb00040.porc_vida" column
-#+
-#+ @param p_porc_vida - DECIMAL(8,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00040_porc_vida_checkColumnConstraints(p_porc_vida)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_porc_vida LIKE adtb00040.porc_vida
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00040_porc_vida_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00040_porc_mid_checkColumnConstraints">}
-#+ Check constraints on the "adtb00040.porc_mid" column
-#+
-#+ @param p_porc_mid - DECIMAL(8,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00040_porc_mid_checkColumnConstraints(p_porc_mid)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_porc_mid LIKE adtb00040.porc_mid
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00040_porc_mid_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00040_porc_comision_checkColumnConstraints">}
-#+ Check constraints on the "adtb00040.porc_comision" column
-#+
-#+ @param p_porc_comision - DECIMAL(8,4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00040_porc_comision_checkColumnConstraints(p_porc_comision)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_porc_comision LIKE adtb00040.porc_comision
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00040_porc_comision_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00040_status_t_checkColumnConstraints">}
-#+ Check constraints on the "adtb00040.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00040_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE adtb00040.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00040_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00040_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "adtb00040.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00040_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE adtb00040.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00040_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00040_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "adtb00040.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00040_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE adtb00040.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00040_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00040_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "adtb00040.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00040_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE adtb00040.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00040_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00040_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "adtb00040.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00040_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE adtb00040.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00040_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00038_checkTableConstraints">}
-#+ Check constraints on the "adtb00038" table
-#+
-#+ @param p_data - a row data LIKE adtb00038.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00038_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE adtb00038.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_adtb00038_num_emp_checkColumnConstraints(p_data.num_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00038_cedula_n_checkColumnConstraints(p_data.cedula_n) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00038_checkTableConstraints
-
-{<BLOCK Name="fct.adtb00038_num_emp_checkColumnConstraints">}
-#+ Check constraints on the "adtb00038.num_emp" column
-#+
-#+ @param p_num_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00038_num_emp_checkColumnConstraints(p_num_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_emp LIKE adtb00038.num_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00038_num_emp_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00038_cedula_n_checkColumnConstraints">}
-#+ Check constraints on the "adtb00038.cedula_n" column
-#+
-#+ @param p_cedula_n - CHAR(13) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00038_cedula_n_checkColumnConstraints(p_cedula_n)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cedula_n LIKE adtb00038.cedula_n
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00038_cedula_n_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00036_checkTableConstraints">}
-#+ Check constraints on the "adtb00036" table
-#+
-#+ @param p_data - a row data LIKE adtb00036.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00036_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE adtb00036.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_adtb00036_num_emp_checkColumnConstraints(p_data.num_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00036_nom1_emp_checkColumnConstraints(p_data.nom1_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00036_nom2_emp_checkColumnConstraints(p_data.nom2_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00036_apell1_emp_checkColumnConstraints(p_data.apell1_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00036_apell2_emp_checkColumnConstraints(p_data.apell2_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00036_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00036_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00036_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00036_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00036_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00036_checkTableConstraints
-
-{<BLOCK Name="fct.adtb00036_num_emp_checkColumnConstraints">}
-#+ Check constraints on the "adtb00036.num_emp" column
-#+
-#+ @param p_num_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00036_num_emp_checkColumnConstraints(p_num_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_emp LIKE adtb00036.num_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00036_num_emp_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00036_nom1_emp_checkColumnConstraints">}
-#+ Check constraints on the "adtb00036.nom1_emp" column
-#+
-#+ @param p_nom1_emp - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00036_nom1_emp_checkColumnConstraints(p_nom1_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nom1_emp LIKE adtb00036.nom1_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00036_nom1_emp_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00036_nom2_emp_checkColumnConstraints">}
-#+ Check constraints on the "adtb00036.nom2_emp" column
-#+
-#+ @param p_nom2_emp - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00036_nom2_emp_checkColumnConstraints(p_nom2_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nom2_emp LIKE adtb00036.nom2_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00036_nom2_emp_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00036_apell1_emp_checkColumnConstraints">}
-#+ Check constraints on the "adtb00036.apell1_emp" column
-#+
-#+ @param p_apell1_emp - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00036_apell1_emp_checkColumnConstraints(p_apell1_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_apell1_emp LIKE adtb00036.apell1_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00036_apell1_emp_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00036_apell2_emp_checkColumnConstraints">}
-#+ Check constraints on the "adtb00036.apell2_emp" column
-#+
-#+ @param p_apell2_emp - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00036_apell2_emp_checkColumnConstraints(p_apell2_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_apell2_emp LIKE adtb00036.apell2_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00036_apell2_emp_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00036_status_t_checkColumnConstraints">}
-#+ Check constraints on the "adtb00036.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00036_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE adtb00036.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00036_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00036_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "adtb00036.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00036_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE adtb00036.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00036_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00036_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "adtb00036.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00036_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE adtb00036.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00036_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00036_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "adtb00036.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00036_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE adtb00036.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00036_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00036_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "adtb00036.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00036_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE adtb00036.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00036_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00033_checkTableConstraints">}
-#+ Check constraints on the "adtb00033" table
-#+
-#+ @param p_data - a row data LIKE adtb00033.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00033_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE adtb00033.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_adtb00033_dpto_checkColumnConstraints(p_data.dpto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00033_departamento_checkColumnConstraints(p_data.departamento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00033_nom_dpto_checkColumnConstraints(p_data.nom_dpto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00033_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00033_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00033_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00033_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00033_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00033_checkTableConstraints
-
-{<BLOCK Name="fct.adtb00033_dpto_checkColumnConstraints">}
-#+ Check constraints on the "adtb00033.dpto" column
-#+
-#+ @param p_dpto - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00033_dpto_checkColumnConstraints(p_dpto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_dpto LIKE adtb00033.dpto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00033_dpto_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00033_departamento_checkColumnConstraints">}
-#+ Check constraints on the "adtb00033.departamento" column
-#+
-#+ @param p_departamento - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00033_departamento_checkColumnConstraints(p_departamento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_departamento LIKE adtb00033.departamento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00033_departamento_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00033_nom_dpto_checkColumnConstraints">}
-#+ Check constraints on the "adtb00033.nom_dpto" column
-#+
-#+ @param p_nom_dpto - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00033_nom_dpto_checkColumnConstraints(p_nom_dpto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nom_dpto LIKE adtb00033.nom_dpto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00033_nom_dpto_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00033_status_t_checkColumnConstraints">}
-#+ Check constraints on the "adtb00033.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00033_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE adtb00033.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00033_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00033_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "adtb00033.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00033_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE adtb00033.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00033_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00033_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "adtb00033.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00033_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE adtb00033.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00033_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00033_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "adtb00033.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00033_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE adtb00033.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00033_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00033_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "adtb00033.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00033_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE adtb00033.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00033_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00032_checkTableConstraints">}
-#+ Check constraints on the "adtb00032" table
-#+
-#+ @param p_data - a row data LIKE adtb00032.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00032_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE adtb00032.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_adtb00032_num_trx_checkColumnConstraints(p_data.num_trx) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00032_num_emp_checkColumnConstraints(p_data.num_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00032_cod_mov_checkColumnConstraints(p_data.cod_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00032_sec_mov_checkColumnConstraints(p_data.sec_mov) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00032_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00032_num_dia_checkColumnConstraints(p_data.num_dia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00032_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00032_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00032_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00032_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00032_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00032_checkTableConstraints
-
-{<BLOCK Name="fct.adtb00032_num_trx_checkColumnConstraints">}
-#+ Check constraints on the "adtb00032.num_trx" column
-#+
-#+ @param p_num_trx - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00032_num_trx_checkColumnConstraints(p_num_trx)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_trx LIKE adtb00032.num_trx
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00032_num_trx_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00032_num_emp_checkColumnConstraints">}
-#+ Check constraints on the "adtb00032.num_emp" column
-#+
-#+ @param p_num_emp - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00032_num_emp_checkColumnConstraints(p_num_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_emp LIKE adtb00032.num_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00032_num_emp_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00032_cod_mov_checkColumnConstraints">}
-#+ Check constraints on the "adtb00032.cod_mov" column
-#+
-#+ @param p_cod_mov - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00032_cod_mov_checkColumnConstraints(p_cod_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mov LIKE adtb00032.cod_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00032_cod_mov_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00032_sec_mov_checkColumnConstraints">}
-#+ Check constraints on the "adtb00032.sec_mov" column
-#+
-#+ @param p_sec_mov - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00032_sec_mov_checkColumnConstraints(p_sec_mov)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_mov LIKE adtb00032.sec_mov
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00032_sec_mov_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00032_fecha_checkColumnConstraints">}
-#+ Check constraints on the "adtb00032.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00032_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE adtb00032.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00032_fecha_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00032_num_dia_checkColumnConstraints">}
-#+ Check constraints on the "adtb00032.num_dia" column
-#+
-#+ @param p_num_dia - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00032_num_dia_checkColumnConstraints(p_num_dia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_dia LIKE adtb00032.num_dia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00032_num_dia_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00032_status_t_checkColumnConstraints">}
-#+ Check constraints on the "adtb00032.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00032_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE adtb00032.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00032_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00032_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "adtb00032.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00032_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE adtb00032.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00032_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00032_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "adtb00032.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00032_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE adtb00032.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00032_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00032_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "adtb00032.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00032_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE adtb00032.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00032_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00032_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "adtb00032.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00032_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE adtb00032.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00032_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00030_checkTableConstraints">}
-#+ Check constraints on the "adtb00030" table
-#+
-#+ @param p_data - a row data LIKE adtb00030.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00030_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE adtb00030.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_adtb00030_num_emp_checkColumnConstraints(p_data.num_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00030_sexo_checkColumnConstraints(p_data.sexo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00030_nis_checkColumnConstraints(p_data.nis) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00030_checkTableConstraints
-
-{<BLOCK Name="fct.adtb00030_num_emp_checkColumnConstraints">}
-#+ Check constraints on the "adtb00030.num_emp" column
-#+
-#+ @param p_num_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00030_num_emp_checkColumnConstraints(p_num_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_emp LIKE adtb00030.num_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00030_num_emp_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00030_sexo_checkColumnConstraints">}
-#+ Check constraints on the "adtb00030.sexo" column
-#+
-#+ @param p_sexo - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00030_sexo_checkColumnConstraints(p_sexo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sexo LIKE adtb00030.sexo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00030_sexo_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00030_nis_checkColumnConstraints">}
-#+ Check constraints on the "adtb00030.nis" column
-#+
-#+ @param p_nis - CHAR(25) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00030_nis_checkColumnConstraints(p_nis)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nis LIKE adtb00030.nis
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00030_nis_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00029_checkTableConstraints">}
-#+ Check constraints on the "adtb00029" table
-#+
-#+ @param p_data - a row data LIKE adtb00029.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00029_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE adtb00029.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_adtb00029_departamento_checkColumnConstraints(p_data.departamento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00029_estado_a_checkColumnConstraints(p_data.estado_a) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00029_estado_m_checkColumnConstraints(p_data.estado_m) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00029_depto_ant_checkColumnConstraints(p_data.depto_ant) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00029_estatus_t_checkColumnConstraints(p_data.estatus_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00029_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00029_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00029_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00029_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00029_checkTableConstraints
-
-{<BLOCK Name="fct.adtb00029_departamento_checkColumnConstraints">}
-#+ Check constraints on the "adtb00029.departamento" column
-#+
-#+ @param p_departamento - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00029_departamento_checkColumnConstraints(p_departamento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_departamento LIKE adtb00029.departamento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00029_departamento_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00029_estado_a_checkColumnConstraints">}
-#+ Check constraints on the "adtb00029.estado_a" column
-#+
-#+ @param p_estado_a - CHAR(4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00029_estado_a_checkColumnConstraints(p_estado_a)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_estado_a LIKE adtb00029.estado_a
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00029_estado_a_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00029_estado_m_checkColumnConstraints">}
-#+ Check constraints on the "adtb00029.estado_m" column
-#+
-#+ @param p_estado_m - CHAR(4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00029_estado_m_checkColumnConstraints(p_estado_m)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_estado_m LIKE adtb00029.estado_m
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00029_estado_m_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00029_depto_ant_checkColumnConstraints">}
-#+ Check constraints on the "adtb00029.depto_ant" column
-#+
-#+ @param p_depto_ant - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00029_depto_ant_checkColumnConstraints(p_depto_ant)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_depto_ant LIKE adtb00029.depto_ant
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00029_depto_ant_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00029_estatus_t_checkColumnConstraints">}
-#+ Check constraints on the "adtb00029.estatus_t" column
-#+
-#+ @param p_estatus_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00029_estatus_t_checkColumnConstraints(p_estatus_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_estatus_t LIKE adtb00029.estatus_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00029_estatus_t_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00029_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "adtb00029.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00029_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE adtb00029.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00029_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00029_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "adtb00029.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00029_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE adtb00029.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00029_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00029_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "adtb00029.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00029_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE adtb00029.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00029_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00029_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "adtb00029.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00029_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE adtb00029.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00029_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00028_checkTableConstraints">}
-#+ Check constraints on the "adtb00028" table
-#+
-#+ @param p_data - a row data LIKE adtb00028.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00028_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE adtb00028.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_adtb00028_num_trx_checkColumnConstraints(p_data.num_trx) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00028_clave_checkColumnConstraints(p_data.clave) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00028_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00028_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00028_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00028_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00028_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00028_checkTableConstraints
-
-{<BLOCK Name="fct.adtb00028_num_trx_checkColumnConstraints">}
-#+ Check constraints on the "adtb00028.num_trx" column
-#+
-#+ @param p_num_trx - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00028_num_trx_checkColumnConstraints(p_num_trx)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_trx LIKE adtb00028.num_trx
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00028_num_trx_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00028_clave_checkColumnConstraints">}
-#+ Check constraints on the "adtb00028.clave" column
-#+
-#+ @param p_clave - CHAR(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00028_clave_checkColumnConstraints(p_clave)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_clave LIKE adtb00028.clave
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00028_clave_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00028_status_t_checkColumnConstraints">}
-#+ Check constraints on the "adtb00028.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00028_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE adtb00028.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00028_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00028_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "adtb00028.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00028_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE adtb00028.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00028_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00028_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "adtb00028.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00028_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE adtb00028.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00028_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00028_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "adtb00028.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00028_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE adtb00028.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00028_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00028_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "adtb00028.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00028_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE adtb00028.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00028_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00027_checkTableConstraints">}
-#+ Check constraints on the "adtb00027" table
-#+
-#+ @param p_data - a row data LIKE adtb00027.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00027_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE adtb00027.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_adtb00027_num_emp_checkColumnConstraints(p_data.num_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00027_departamento_checkColumnConstraints(p_data.departamento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00027_nivel_emp_checkColumnConstraints(p_data.nivel_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00027_cod_puesto_checkColumnConstraints(p_data.cod_puesto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00027_fecha_sal_checkColumnConstraints(p_data.fecha_sal) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00027_fecha_ent_checkColumnConstraints(p_data.fecha_ent) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00027_dias_tomados_checkColumnConstraints(p_data.dias_tomados) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00027_dias_vac_checkColumnConstraints(p_data.dias_vac) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00027_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00027_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00027_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00027_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00027_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00027_checkTableConstraints
-
-{<BLOCK Name="fct.adtb00027_num_emp_checkColumnConstraints">}
-#+ Check constraints on the "adtb00027.num_emp" column
-#+
-#+ @param p_num_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00027_num_emp_checkColumnConstraints(p_num_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_emp LIKE adtb00027.num_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00027_num_emp_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00027_departamento_checkColumnConstraints">}
-#+ Check constraints on the "adtb00027.departamento" column
-#+
-#+ @param p_departamento - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00027_departamento_checkColumnConstraints(p_departamento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_departamento LIKE adtb00027.departamento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00027_departamento_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00027_nivel_emp_checkColumnConstraints">}
-#+ Check constraints on the "adtb00027.nivel_emp" column
-#+
-#+ @param p_nivel_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00027_nivel_emp_checkColumnConstraints(p_nivel_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nivel_emp LIKE adtb00027.nivel_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00027_nivel_emp_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00027_cod_puesto_checkColumnConstraints">}
-#+ Check constraints on the "adtb00027.cod_puesto" column
-#+
-#+ @param p_cod_puesto - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00027_cod_puesto_checkColumnConstraints(p_cod_puesto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_puesto LIKE adtb00027.cod_puesto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00027_cod_puesto_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00027_fecha_sal_checkColumnConstraints">}
-#+ Check constraints on the "adtb00027.fecha_sal" column
-#+
-#+ @param p_fecha_sal - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00027_fecha_sal_checkColumnConstraints(p_fecha_sal)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_sal LIKE adtb00027.fecha_sal
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00027_fecha_sal_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00027_fecha_ent_checkColumnConstraints">}
-#+ Check constraints on the "adtb00027.fecha_ent" column
-#+
-#+ @param p_fecha_ent - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00027_fecha_ent_checkColumnConstraints(p_fecha_ent)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_ent LIKE adtb00027.fecha_ent
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00027_fecha_ent_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00027_dias_tomados_checkColumnConstraints">}
-#+ Check constraints on the "adtb00027.dias_tomados" column
-#+
-#+ @param p_dias_tomados - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00027_dias_tomados_checkColumnConstraints(p_dias_tomados)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_dias_tomados LIKE adtb00027.dias_tomados
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00027_dias_tomados_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00027_dias_vac_checkColumnConstraints">}
-#+ Check constraints on the "adtb00027.dias_vac" column
-#+
-#+ @param p_dias_vac - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00027_dias_vac_checkColumnConstraints(p_dias_vac)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_dias_vac LIKE adtb00027.dias_vac
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00027_dias_vac_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00027_status_t_checkColumnConstraints">}
-#+ Check constraints on the "adtb00027.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00027_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE adtb00027.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00027_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00027_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "adtb00027.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00027_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE adtb00027.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00027_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00027_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "adtb00027.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00027_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE adtb00027.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00027_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00027_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "adtb00027.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00027_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE adtb00027.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00027_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00027_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "adtb00027.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00027_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE adtb00027.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00027_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00026_checkTableConstraints">}
-#+ Check constraints on the "adtb00026" table
-#+
-#+ @param p_data - a row data LIKE adtb00026.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00026_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE adtb00026.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_adtb00026_amon_num_checkColumnConstraints(p_data.amon_num) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00026_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00026_num_emp_checkColumnConstraints(p_data.num_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00026_departamento_checkColumnConstraints(p_data.departamento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00026_nivel_emp_checkColumnConstraints(p_data.nivel_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00026_cod_puesto_checkColumnConstraints(p_data.cod_puesto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00026_violacion_checkColumnConstraints(p_data.violacion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00026_violacion1_checkColumnConstraints(p_data.violacion1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00026_num1_emp_checkColumnConstraints(p_data.num1_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00026_departamento1_checkColumnConstraints(p_data.departamento1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00026_nivel1_emp_checkColumnConstraints(p_data.nivel1_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00026_cod1_puesto_checkColumnConstraints(p_data.cod1_puesto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00026_num2_emp_checkColumnConstraints(p_data.num2_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00026_departamento2_checkColumnConstraints(p_data.departamento2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00026_nivel2_emp_checkColumnConstraints(p_data.nivel2_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00026_cod2_puesto_checkColumnConstraints(p_data.cod2_puesto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00026_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00026_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00026_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00026_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00026_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00026_checkTableConstraints
-
-{<BLOCK Name="fct.adtb00026_amon_num_checkColumnConstraints">}
-#+ Check constraints on the "adtb00026.amon_num" column
-#+
-#+ @param p_amon_num - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00026_amon_num_checkColumnConstraints(p_amon_num)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_amon_num LIKE adtb00026.amon_num
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00026_amon_num_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00026_fecha_checkColumnConstraints">}
-#+ Check constraints on the "adtb00026.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00026_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE adtb00026.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00026_fecha_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00026_num_emp_checkColumnConstraints">}
-#+ Check constraints on the "adtb00026.num_emp" column
-#+
-#+ @param p_num_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00026_num_emp_checkColumnConstraints(p_num_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_emp LIKE adtb00026.num_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00026_num_emp_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00026_departamento_checkColumnConstraints">}
-#+ Check constraints on the "adtb00026.departamento" column
-#+
-#+ @param p_departamento - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00026_departamento_checkColumnConstraints(p_departamento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_departamento LIKE adtb00026.departamento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00026_departamento_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00026_nivel_emp_checkColumnConstraints">}
-#+ Check constraints on the "adtb00026.nivel_emp" column
-#+
-#+ @param p_nivel_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00026_nivel_emp_checkColumnConstraints(p_nivel_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nivel_emp LIKE adtb00026.nivel_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00026_nivel_emp_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00026_cod_puesto_checkColumnConstraints">}
-#+ Check constraints on the "adtb00026.cod_puesto" column
-#+
-#+ @param p_cod_puesto - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00026_cod_puesto_checkColumnConstraints(p_cod_puesto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_puesto LIKE adtb00026.cod_puesto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00026_cod_puesto_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00026_violacion_checkColumnConstraints">}
-#+ Check constraints on the "adtb00026.violacion" column
-#+
-#+ @param p_violacion - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00026_violacion_checkColumnConstraints(p_violacion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_violacion LIKE adtb00026.violacion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00026_violacion_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00026_violacion1_checkColumnConstraints">}
-#+ Check constraints on the "adtb00026.violacion1" column
-#+
-#+ @param p_violacion1 - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00026_violacion1_checkColumnConstraints(p_violacion1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_violacion1 LIKE adtb00026.violacion1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00026_violacion1_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00026_num1_emp_checkColumnConstraints">}
-#+ Check constraints on the "adtb00026.num1_emp" column
-#+
-#+ @param p_num1_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00026_num1_emp_checkColumnConstraints(p_num1_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num1_emp LIKE adtb00026.num1_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00026_num1_emp_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00026_departamento1_checkColumnConstraints">}
-#+ Check constraints on the "adtb00026.departamento1" column
-#+
-#+ @param p_departamento1 - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00026_departamento1_checkColumnConstraints(p_departamento1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_departamento1 LIKE adtb00026.departamento1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00026_departamento1_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00026_nivel1_emp_checkColumnConstraints">}
-#+ Check constraints on the "adtb00026.nivel1_emp" column
-#+
-#+ @param p_nivel1_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00026_nivel1_emp_checkColumnConstraints(p_nivel1_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nivel1_emp LIKE adtb00026.nivel1_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00026_nivel1_emp_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00026_cod1_puesto_checkColumnConstraints">}
-#+ Check constraints on the "adtb00026.cod1_puesto" column
-#+
-#+ @param p_cod1_puesto - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00026_cod1_puesto_checkColumnConstraints(p_cod1_puesto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod1_puesto LIKE adtb00026.cod1_puesto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00026_cod1_puesto_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00026_num2_emp_checkColumnConstraints">}
-#+ Check constraints on the "adtb00026.num2_emp" column
-#+
-#+ @param p_num2_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00026_num2_emp_checkColumnConstraints(p_num2_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num2_emp LIKE adtb00026.num2_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00026_num2_emp_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00026_departamento2_checkColumnConstraints">}
-#+ Check constraints on the "adtb00026.departamento2" column
-#+
-#+ @param p_departamento2 - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00026_departamento2_checkColumnConstraints(p_departamento2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_departamento2 LIKE adtb00026.departamento2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00026_departamento2_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00026_nivel2_emp_checkColumnConstraints">}
-#+ Check constraints on the "adtb00026.nivel2_emp" column
-#+
-#+ @param p_nivel2_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00026_nivel2_emp_checkColumnConstraints(p_nivel2_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nivel2_emp LIKE adtb00026.nivel2_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00026_nivel2_emp_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00026_cod2_puesto_checkColumnConstraints">}
-#+ Check constraints on the "adtb00026.cod2_puesto" column
-#+
-#+ @param p_cod2_puesto - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00026_cod2_puesto_checkColumnConstraints(p_cod2_puesto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod2_puesto LIKE adtb00026.cod2_puesto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00026_cod2_puesto_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00026_status_t_checkColumnConstraints">}
-#+ Check constraints on the "adtb00026.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00026_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE adtb00026.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00026_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00026_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "adtb00026.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00026_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE adtb00026.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00026_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00026_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "adtb00026.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00026_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE adtb00026.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00026_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00026_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "adtb00026.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00026_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE adtb00026.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00026_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00026_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "adtb00026.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00026_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE adtb00026.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00026_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00025_checkTableConstraints">}
-#+ Check constraints on the "adtb00025" table
-#+
-#+ @param p_data - a row data LIKE adtb00025.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00025_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE adtb00025.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_adtb00025_cod_par_checkColumnConstraints(p_data.cod_par) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00025_desc_par_checkColumnConstraints(p_data.desc_par) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00025_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00025_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00025_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00025_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00025_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00025_checkTableConstraints
-
-{<BLOCK Name="fct.adtb00025_cod_par_checkColumnConstraints">}
-#+ Check constraints on the "adtb00025.cod_par" column
-#+
-#+ @param p_cod_par - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00025_cod_par_checkColumnConstraints(p_cod_par)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_par LIKE adtb00025.cod_par
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00025_cod_par_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00025_desc_par_checkColumnConstraints">}
-#+ Check constraints on the "adtb00025.desc_par" column
-#+
-#+ @param p_desc_par - CHAR(11) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00025_desc_par_checkColumnConstraints(p_desc_par)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_desc_par LIKE adtb00025.desc_par
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00025_desc_par_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00025_status_t_checkColumnConstraints">}
-#+ Check constraints on the "adtb00025.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00025_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE adtb00025.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00025_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00025_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "adtb00025.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00025_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE adtb00025.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00025_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00025_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "adtb00025.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00025_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE adtb00025.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00025_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00025_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "adtb00025.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00025_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE adtb00025.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00025_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00025_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "adtb00025.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00025_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE adtb00025.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00025_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00024_checkTableConstraints">}
-#+ Check constraints on the "adtb00024" table
-#+
-#+ @param p_data - a row data LIKE adtb00024.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00024_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE adtb00024.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_adtb00024_nivel_emp_checkColumnConstraints(p_data.nivel_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00024_desc_nivel_checkColumnConstraints(p_data.desc_nivel) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00024_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00024_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00024_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00024_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00024_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00024_checkTableConstraints
-
-{<BLOCK Name="fct.adtb00024_nivel_emp_checkColumnConstraints">}
-#+ Check constraints on the "adtb00024.nivel_emp" column
-#+
-#+ @param p_nivel_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00024_nivel_emp_checkColumnConstraints(p_nivel_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nivel_emp LIKE adtb00024.nivel_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00024_nivel_emp_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00024_desc_nivel_checkColumnConstraints">}
-#+ Check constraints on the "adtb00024.desc_nivel" column
-#+
-#+ @param p_desc_nivel - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00024_desc_nivel_checkColumnConstraints(p_desc_nivel)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_desc_nivel LIKE adtb00024.desc_nivel
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00024_desc_nivel_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00024_status_t_checkColumnConstraints">}
-#+ Check constraints on the "adtb00024.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00024_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE adtb00024.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00024_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00024_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "adtb00024.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00024_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE adtb00024.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00024_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00024_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "adtb00024.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00024_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE adtb00024.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00024_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00024_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "adtb00024.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00024_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE adtb00024.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00024_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00024_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "adtb00024.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00024_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE adtb00024.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00024_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00023_checkTableConstraints">}
-#+ Check constraints on the "adtb00023" table
-#+
-#+ @param p_data - a row data LIKE adtb00023.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00023_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE adtb00023.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_adtb00023_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00023_num_emp_checkColumnConstraints(p_data.num_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00023_departamento_checkColumnConstraints(p_data.departamento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00023_nivel_emp_checkColumnConstraints(p_data.nivel_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00023_cod_puesto_checkColumnConstraints(p_data.cod_puesto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00023_hora_ent_checkColumnConstraints(p_data.hora_ent) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00023_hora_sal_checkColumnConstraints(p_data.hora_sal) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00023_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00023_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00023_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00023_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00023_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00023_checkTableConstraints
-
-{<BLOCK Name="fct.adtb00023_fecha_checkColumnConstraints">}
-#+ Check constraints on the "adtb00023.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00023_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE adtb00023.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00023_fecha_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00023_num_emp_checkColumnConstraints">}
-#+ Check constraints on the "adtb00023.num_emp" column
-#+
-#+ @param p_num_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00023_num_emp_checkColumnConstraints(p_num_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_emp LIKE adtb00023.num_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00023_num_emp_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00023_departamento_checkColumnConstraints">}
-#+ Check constraints on the "adtb00023.departamento" column
-#+
-#+ @param p_departamento - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00023_departamento_checkColumnConstraints(p_departamento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_departamento LIKE adtb00023.departamento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00023_departamento_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00023_nivel_emp_checkColumnConstraints">}
-#+ Check constraints on the "adtb00023.nivel_emp" column
-#+
-#+ @param p_nivel_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00023_nivel_emp_checkColumnConstraints(p_nivel_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nivel_emp LIKE adtb00023.nivel_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00023_nivel_emp_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00023_cod_puesto_checkColumnConstraints">}
-#+ Check constraints on the "adtb00023.cod_puesto" column
-#+
-#+ @param p_cod_puesto - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00023_cod_puesto_checkColumnConstraints(p_cod_puesto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_puesto LIKE adtb00023.cod_puesto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00023_cod_puesto_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00023_hora_ent_checkColumnConstraints">}
-#+ Check constraints on the "adtb00023.hora_ent" column
-#+
-#+ @param p_hora_ent - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00023_hora_ent_checkColumnConstraints(p_hora_ent)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_hora_ent LIKE adtb00023.hora_ent
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00023_hora_ent_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00023_hora_sal_checkColumnConstraints">}
-#+ Check constraints on the "adtb00023.hora_sal" column
-#+
-#+ @param p_hora_sal - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00023_hora_sal_checkColumnConstraints(p_hora_sal)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_hora_sal LIKE adtb00023.hora_sal
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00023_hora_sal_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00023_status_t_checkColumnConstraints">}
-#+ Check constraints on the "adtb00023.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00023_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE adtb00023.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00023_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00023_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "adtb00023.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00023_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE adtb00023.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00023_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00023_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "adtb00023.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00023_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE adtb00023.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00023_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00023_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "adtb00023.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00023_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE adtb00023.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00023_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00023_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "adtb00023.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00023_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE adtb00023.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00023_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00022_checkTableConstraints">}
-#+ Check constraints on the "adtb00022" table
-#+
-#+ @param p_data - a row data LIKE adtb00022.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00022_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE adtb00022.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_adtb00022_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00022_num_emp_checkColumnConstraints(p_data.num_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00022_departamento_checkColumnConstraints(p_data.departamento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00022_nivel_emp_checkColumnConstraints(p_data.nivel_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00022_cod_puesto_checkColumnConstraints(p_data.cod_puesto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00022_cod_prof_checkColumnConstraints(p_data.cod_prof) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00022_evento_checkColumnConstraints(p_data.evento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00022_nom_evento_checkColumnConstraints(p_data.nom_evento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00022_fech_evento_checkColumnConstraints(p_data.fech_evento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00022_costo_evento_checkColumnConstraints(p_data.costo_evento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00022_num1_emp_checkColumnConstraints(p_data.num1_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00022_departamento1_checkColumnConstraints(p_data.departamento1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00022_nivel1_emp_checkColumnConstraints(p_data.nivel1_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00022_cod1_puesto_checkColumnConstraints(p_data.cod1_puesto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00022_num2_emp_checkColumnConstraints(p_data.num2_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00022_departamento2_checkColumnConstraints(p_data.departamento2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00022_nivel2_emp_checkColumnConstraints(p_data.nivel2_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00022_cod2_puesto_checkColumnConstraints(p_data.cod2_puesto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00022_num3_emp_checkColumnConstraints(p_data.num3_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00022_departamento3_checkColumnConstraints(p_data.departamento3) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00022_nivel3_emp_checkColumnConstraints(p_data.nivel3_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00022_cod3_puesto_checkColumnConstraints(p_data.cod3_puesto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00022_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00022_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00022_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00022_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00022_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00022_checkTableConstraints
-
-{<BLOCK Name="fct.adtb00022_fecha_checkColumnConstraints">}
-#+ Check constraints on the "adtb00022.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00022_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE adtb00022.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00022_fecha_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00022_num_emp_checkColumnConstraints">}
-#+ Check constraints on the "adtb00022.num_emp" column
-#+
-#+ @param p_num_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00022_num_emp_checkColumnConstraints(p_num_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_emp LIKE adtb00022.num_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00022_num_emp_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00022_departamento_checkColumnConstraints">}
-#+ Check constraints on the "adtb00022.departamento" column
-#+
-#+ @param p_departamento - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00022_departamento_checkColumnConstraints(p_departamento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_departamento LIKE adtb00022.departamento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00022_departamento_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00022_nivel_emp_checkColumnConstraints">}
-#+ Check constraints on the "adtb00022.nivel_emp" column
-#+
-#+ @param p_nivel_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00022_nivel_emp_checkColumnConstraints(p_nivel_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nivel_emp LIKE adtb00022.nivel_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00022_nivel_emp_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00022_cod_puesto_checkColumnConstraints">}
-#+ Check constraints on the "adtb00022.cod_puesto" column
-#+
-#+ @param p_cod_puesto - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00022_cod_puesto_checkColumnConstraints(p_cod_puesto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_puesto LIKE adtb00022.cod_puesto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00022_cod_puesto_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00022_cod_prof_checkColumnConstraints">}
-#+ Check constraints on the "adtb00022.cod_prof" column
-#+
-#+ @param p_cod_prof - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00022_cod_prof_checkColumnConstraints(p_cod_prof)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_prof LIKE adtb00022.cod_prof
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00022_cod_prof_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00022_evento_checkColumnConstraints">}
-#+ Check constraints on the "adtb00022.evento" column
-#+
-#+ @param p_evento - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00022_evento_checkColumnConstraints(p_evento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_evento LIKE adtb00022.evento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00022_evento_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00022_nom_evento_checkColumnConstraints">}
-#+ Check constraints on the "adtb00022.nom_evento" column
-#+
-#+ @param p_nom_evento - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00022_nom_evento_checkColumnConstraints(p_nom_evento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nom_evento LIKE adtb00022.nom_evento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00022_nom_evento_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00022_fech_evento_checkColumnConstraints">}
-#+ Check constraints on the "adtb00022.fech_evento" column
-#+
-#+ @param p_fech_evento - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00022_fech_evento_checkColumnConstraints(p_fech_evento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_evento LIKE adtb00022.fech_evento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00022_fech_evento_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00022_costo_evento_checkColumnConstraints">}
-#+ Check constraints on the "adtb00022.costo_evento" column
-#+
-#+ @param p_costo_evento - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00022_costo_evento_checkColumnConstraints(p_costo_evento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_costo_evento LIKE adtb00022.costo_evento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00022_costo_evento_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00022_num1_emp_checkColumnConstraints">}
-#+ Check constraints on the "adtb00022.num1_emp" column
-#+
-#+ @param p_num1_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00022_num1_emp_checkColumnConstraints(p_num1_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num1_emp LIKE adtb00022.num1_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00022_num1_emp_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00022_departamento1_checkColumnConstraints">}
-#+ Check constraints on the "adtb00022.departamento1" column
-#+
-#+ @param p_departamento1 - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00022_departamento1_checkColumnConstraints(p_departamento1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_departamento1 LIKE adtb00022.departamento1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00022_departamento1_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00022_nivel1_emp_checkColumnConstraints">}
-#+ Check constraints on the "adtb00022.nivel1_emp" column
-#+
-#+ @param p_nivel1_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00022_nivel1_emp_checkColumnConstraints(p_nivel1_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nivel1_emp LIKE adtb00022.nivel1_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00022_nivel1_emp_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00022_cod1_puesto_checkColumnConstraints">}
-#+ Check constraints on the "adtb00022.cod1_puesto" column
-#+
-#+ @param p_cod1_puesto - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00022_cod1_puesto_checkColumnConstraints(p_cod1_puesto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod1_puesto LIKE adtb00022.cod1_puesto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00022_cod1_puesto_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00022_num2_emp_checkColumnConstraints">}
-#+ Check constraints on the "adtb00022.num2_emp" column
-#+
-#+ @param p_num2_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00022_num2_emp_checkColumnConstraints(p_num2_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num2_emp LIKE adtb00022.num2_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00022_num2_emp_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00022_departamento2_checkColumnConstraints">}
-#+ Check constraints on the "adtb00022.departamento2" column
-#+
-#+ @param p_departamento2 - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00022_departamento2_checkColumnConstraints(p_departamento2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_departamento2 LIKE adtb00022.departamento2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00022_departamento2_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00022_nivel2_emp_checkColumnConstraints">}
-#+ Check constraints on the "adtb00022.nivel2_emp" column
-#+
-#+ @param p_nivel2_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00022_nivel2_emp_checkColumnConstraints(p_nivel2_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nivel2_emp LIKE adtb00022.nivel2_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00022_nivel2_emp_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00022_cod2_puesto_checkColumnConstraints">}
-#+ Check constraints on the "adtb00022.cod2_puesto" column
-#+
-#+ @param p_cod2_puesto - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00022_cod2_puesto_checkColumnConstraints(p_cod2_puesto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod2_puesto LIKE adtb00022.cod2_puesto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00022_cod2_puesto_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00022_num3_emp_checkColumnConstraints">}
-#+ Check constraints on the "adtb00022.num3_emp" column
-#+
-#+ @param p_num3_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00022_num3_emp_checkColumnConstraints(p_num3_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num3_emp LIKE adtb00022.num3_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00022_num3_emp_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00022_departamento3_checkColumnConstraints">}
-#+ Check constraints on the "adtb00022.departamento3" column
-#+
-#+ @param p_departamento3 - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00022_departamento3_checkColumnConstraints(p_departamento3)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_departamento3 LIKE adtb00022.departamento3
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00022_departamento3_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00022_nivel3_emp_checkColumnConstraints">}
-#+ Check constraints on the "adtb00022.nivel3_emp" column
-#+
-#+ @param p_nivel3_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00022_nivel3_emp_checkColumnConstraints(p_nivel3_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nivel3_emp LIKE adtb00022.nivel3_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00022_nivel3_emp_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00022_cod3_puesto_checkColumnConstraints">}
-#+ Check constraints on the "adtb00022.cod3_puesto" column
-#+
-#+ @param p_cod3_puesto - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00022_cod3_puesto_checkColumnConstraints(p_cod3_puesto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod3_puesto LIKE adtb00022.cod3_puesto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00022_cod3_puesto_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00022_status_t_checkColumnConstraints">}
-#+ Check constraints on the "adtb00022.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00022_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE adtb00022.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00022_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00022_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "adtb00022.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00022_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE adtb00022.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00022_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00022_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "adtb00022.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00022_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE adtb00022.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00022_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00022_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "adtb00022.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00022_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE adtb00022.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00022_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00022_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "adtb00022.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00022_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE adtb00022.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00022_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00021_checkTableConstraints">}
-#+ Check constraints on the "adtb00021" table
-#+
-#+ @param p_data - a row data LIKE adtb00021.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00021_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE adtb00021.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_adtb00021_num_emp_checkColumnConstraints(p_data.num_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00021_cod_par_checkColumnConstraints(p_data.cod_par) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00021_sec_par_checkColumnConstraints(p_data.sec_par) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00021_nombre_checkColumnConstraints(p_data.nombre) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00021_cedula_checkColumnConstraints(p_data.cedula) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00021_sexo_checkColumnConstraints(p_data.sexo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00021_fecha_nac_checkColumnConstraints(p_data.fecha_nac) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00021_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00021_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00021_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00021_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00021_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00021_checkTableConstraints
-
-{<BLOCK Name="fct.adtb00021_num_emp_checkColumnConstraints">}
-#+ Check constraints on the "adtb00021.num_emp" column
-#+
-#+ @param p_num_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00021_num_emp_checkColumnConstraints(p_num_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_emp LIKE adtb00021.num_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00021_num_emp_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00021_cod_par_checkColumnConstraints">}
-#+ Check constraints on the "adtb00021.cod_par" column
-#+
-#+ @param p_cod_par - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00021_cod_par_checkColumnConstraints(p_cod_par)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_par LIKE adtb00021.cod_par
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00021_cod_par_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00021_sec_par_checkColumnConstraints">}
-#+ Check constraints on the "adtb00021.sec_par" column
-#+
-#+ @param p_sec_par - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00021_sec_par_checkColumnConstraints(p_sec_par)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_par LIKE adtb00021.sec_par
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00021_sec_par_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00021_nombre_checkColumnConstraints">}
-#+ Check constraints on the "adtb00021.nombre" column
-#+
-#+ @param p_nombre - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00021_nombre_checkColumnConstraints(p_nombre)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombre LIKE adtb00021.nombre
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00021_nombre_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00021_cedula_checkColumnConstraints">}
-#+ Check constraints on the "adtb00021.cedula" column
-#+
-#+ @param p_cedula - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00021_cedula_checkColumnConstraints(p_cedula)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cedula LIKE adtb00021.cedula
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00021_cedula_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00021_sexo_checkColumnConstraints">}
-#+ Check constraints on the "adtb00021.sexo" column
-#+
-#+ @param p_sexo - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00021_sexo_checkColumnConstraints(p_sexo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sexo LIKE adtb00021.sexo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00021_sexo_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00021_fecha_nac_checkColumnConstraints">}
-#+ Check constraints on the "adtb00021.fecha_nac" column
-#+
-#+ @param p_fecha_nac - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00021_fecha_nac_checkColumnConstraints(p_fecha_nac)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_nac LIKE adtb00021.fecha_nac
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00021_fecha_nac_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00021_status_t_checkColumnConstraints">}
-#+ Check constraints on the "adtb00021.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00021_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE adtb00021.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00021_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00021_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "adtb00021.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00021_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE adtb00021.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00021_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00021_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "adtb00021.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00021_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE adtb00021.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00021_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00021_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "adtb00021.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00021_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE adtb00021.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00021_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00021_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "adtb00021.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00021_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE adtb00021.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00021_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00020_checkTableConstraints">}
-#+ Check constraints on the "adtb00020" table
-#+
-#+ @param p_data - a row data LIKE adtb00020.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00020_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE adtb00020.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_adtb00020_num_trx_checkColumnConstraints(p_data.num_trx) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00020_cod_sol_checkColumnConstraints(p_data.cod_sol) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00020_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00020_fech_efec_checkColumnConstraints(p_data.fech_efec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00020_num_emp_checkColumnConstraints(p_data.num_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00020_departamento_checkColumnConstraints(p_data.departamento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00020_nivel_emp_checkColumnConstraints(p_data.nivel_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00020_cod_puesto_checkColumnConstraints(p_data.cod_puesto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00020_sueldo_ac_checkColumnConstraints(p_data.sueldo_ac) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00020_nomina_checkColumnConstraints(p_data.nomina) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00020_estado_civil_checkColumnConstraints(p_data.estado_civil) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00020_tipo_sangre_checkColumnConstraints(p_data.tipo_sangre) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00020_cod_mto_checkColumnConstraints(p_data.cod_mto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00020_sec_mto_checkColumnConstraints(p_data.sec_mto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00020_observacion_checkColumnConstraints(p_data.observacion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00020_num1_emp_checkColumnConstraints(p_data.num1_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00020_departamento1_checkColumnConstraints(p_data.departamento1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00020_nivel1_emp_checkColumnConstraints(p_data.nivel1_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00020_cod1_puesto_checkColumnConstraints(p_data.cod1_puesto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00020_num2_emp_checkColumnConstraints(p_data.num2_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00020_departamento2_checkColumnConstraints(p_data.departamento2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00020_nivel2_emp_checkColumnConstraints(p_data.nivel2_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00020_cod2_puesto_checkColumnConstraints(p_data.cod2_puesto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00020_num3_emp_checkColumnConstraints(p_data.num3_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00020_departamento3_checkColumnConstraints(p_data.departamento3) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00020_nivel3_emp_checkColumnConstraints(p_data.nivel3_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00020_cod3_puesto_checkColumnConstraints(p_data.cod3_puesto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00020_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00020_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00020_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00020_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00020_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00020_checkTableConstraints
-
-{<BLOCK Name="fct.adtb00020_num_trx_checkColumnConstraints">}
-#+ Check constraints on the "adtb00020.num_trx" column
-#+
-#+ @param p_num_trx - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00020_num_trx_checkColumnConstraints(p_num_trx)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_trx LIKE adtb00020.num_trx
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00020_num_trx_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00020_cod_sol_checkColumnConstraints">}
-#+ Check constraints on the "adtb00020.cod_sol" column
-#+
-#+ @param p_cod_sol - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00020_cod_sol_checkColumnConstraints(p_cod_sol)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sol LIKE adtb00020.cod_sol
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00020_cod_sol_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00020_fecha_checkColumnConstraints">}
-#+ Check constraints on the "adtb00020.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00020_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE adtb00020.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00020_fecha_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00020_fech_efec_checkColumnConstraints">}
-#+ Check constraints on the "adtb00020.fech_efec" column
-#+
-#+ @param p_fech_efec - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00020_fech_efec_checkColumnConstraints(p_fech_efec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_efec LIKE adtb00020.fech_efec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00020_fech_efec_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00020_num_emp_checkColumnConstraints">}
-#+ Check constraints on the "adtb00020.num_emp" column
-#+
-#+ @param p_num_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00020_num_emp_checkColumnConstraints(p_num_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_emp LIKE adtb00020.num_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00020_num_emp_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00020_departamento_checkColumnConstraints">}
-#+ Check constraints on the "adtb00020.departamento" column
-#+
-#+ @param p_departamento - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00020_departamento_checkColumnConstraints(p_departamento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_departamento LIKE adtb00020.departamento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00020_departamento_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00020_nivel_emp_checkColumnConstraints">}
-#+ Check constraints on the "adtb00020.nivel_emp" column
-#+
-#+ @param p_nivel_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00020_nivel_emp_checkColumnConstraints(p_nivel_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nivel_emp LIKE adtb00020.nivel_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00020_nivel_emp_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00020_cod_puesto_checkColumnConstraints">}
-#+ Check constraints on the "adtb00020.cod_puesto" column
-#+
-#+ @param p_cod_puesto - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00020_cod_puesto_checkColumnConstraints(p_cod_puesto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_puesto LIKE adtb00020.cod_puesto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00020_cod_puesto_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00020_sueldo_ac_checkColumnConstraints">}
-#+ Check constraints on the "adtb00020.sueldo_ac" column
-#+
-#+ @param p_sueldo_ac - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00020_sueldo_ac_checkColumnConstraints(p_sueldo_ac)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sueldo_ac LIKE adtb00020.sueldo_ac
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00020_sueldo_ac_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00020_nomina_checkColumnConstraints">}
-#+ Check constraints on the "adtb00020.nomina" column
-#+
-#+ @param p_nomina - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00020_nomina_checkColumnConstraints(p_nomina)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nomina LIKE adtb00020.nomina
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00020_nomina_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00020_estado_civil_checkColumnConstraints">}
-#+ Check constraints on the "adtb00020.estado_civil" column
-#+
-#+ @param p_estado_civil - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00020_estado_civil_checkColumnConstraints(p_estado_civil)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_estado_civil LIKE adtb00020.estado_civil
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00020_estado_civil_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00020_tipo_sangre_checkColumnConstraints">}
-#+ Check constraints on the "adtb00020.tipo_sangre" column
-#+
-#+ @param p_tipo_sangre - CHAR(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00020_tipo_sangre_checkColumnConstraints(p_tipo_sangre)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_sangre LIKE adtb00020.tipo_sangre
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00020_tipo_sangre_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00020_cod_mto_checkColumnConstraints">}
-#+ Check constraints on the "adtb00020.cod_mto" column
-#+
-#+ @param p_cod_mto - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00020_cod_mto_checkColumnConstraints(p_cod_mto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mto LIKE adtb00020.cod_mto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00020_cod_mto_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00020_sec_mto_checkColumnConstraints">}
-#+ Check constraints on the "adtb00020.sec_mto" column
-#+
-#+ @param p_sec_mto - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00020_sec_mto_checkColumnConstraints(p_sec_mto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_mto LIKE adtb00020.sec_mto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00020_sec_mto_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00020_observacion_checkColumnConstraints">}
-#+ Check constraints on the "adtb00020.observacion" column
-#+
-#+ @param p_observacion - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00020_observacion_checkColumnConstraints(p_observacion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_observacion LIKE adtb00020.observacion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00020_observacion_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00020_num1_emp_checkColumnConstraints">}
-#+ Check constraints on the "adtb00020.num1_emp" column
-#+
-#+ @param p_num1_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00020_num1_emp_checkColumnConstraints(p_num1_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num1_emp LIKE adtb00020.num1_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00020_num1_emp_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00020_departamento1_checkColumnConstraints">}
-#+ Check constraints on the "adtb00020.departamento1" column
-#+
-#+ @param p_departamento1 - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00020_departamento1_checkColumnConstraints(p_departamento1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_departamento1 LIKE adtb00020.departamento1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00020_departamento1_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00020_nivel1_emp_checkColumnConstraints">}
-#+ Check constraints on the "adtb00020.nivel1_emp" column
-#+
-#+ @param p_nivel1_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00020_nivel1_emp_checkColumnConstraints(p_nivel1_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nivel1_emp LIKE adtb00020.nivel1_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00020_nivel1_emp_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00020_cod1_puesto_checkColumnConstraints">}
-#+ Check constraints on the "adtb00020.cod1_puesto" column
-#+
-#+ @param p_cod1_puesto - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00020_cod1_puesto_checkColumnConstraints(p_cod1_puesto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod1_puesto LIKE adtb00020.cod1_puesto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00020_cod1_puesto_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00020_num2_emp_checkColumnConstraints">}
-#+ Check constraints on the "adtb00020.num2_emp" column
-#+
-#+ @param p_num2_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00020_num2_emp_checkColumnConstraints(p_num2_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num2_emp LIKE adtb00020.num2_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00020_num2_emp_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00020_departamento2_checkColumnConstraints">}
-#+ Check constraints on the "adtb00020.departamento2" column
-#+
-#+ @param p_departamento2 - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00020_departamento2_checkColumnConstraints(p_departamento2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_departamento2 LIKE adtb00020.departamento2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00020_departamento2_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00020_nivel2_emp_checkColumnConstraints">}
-#+ Check constraints on the "adtb00020.nivel2_emp" column
-#+
-#+ @param p_nivel2_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00020_nivel2_emp_checkColumnConstraints(p_nivel2_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nivel2_emp LIKE adtb00020.nivel2_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00020_nivel2_emp_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00020_cod2_puesto_checkColumnConstraints">}
-#+ Check constraints on the "adtb00020.cod2_puesto" column
-#+
-#+ @param p_cod2_puesto - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00020_cod2_puesto_checkColumnConstraints(p_cod2_puesto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod2_puesto LIKE adtb00020.cod2_puesto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00020_cod2_puesto_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00020_num3_emp_checkColumnConstraints">}
-#+ Check constraints on the "adtb00020.num3_emp" column
-#+
-#+ @param p_num3_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00020_num3_emp_checkColumnConstraints(p_num3_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num3_emp LIKE adtb00020.num3_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00020_num3_emp_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00020_departamento3_checkColumnConstraints">}
-#+ Check constraints on the "adtb00020.departamento3" column
-#+
-#+ @param p_departamento3 - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00020_departamento3_checkColumnConstraints(p_departamento3)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_departamento3 LIKE adtb00020.departamento3
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00020_departamento3_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00020_nivel3_emp_checkColumnConstraints">}
-#+ Check constraints on the "adtb00020.nivel3_emp" column
-#+
-#+ @param p_nivel3_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00020_nivel3_emp_checkColumnConstraints(p_nivel3_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nivel3_emp LIKE adtb00020.nivel3_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00020_nivel3_emp_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00020_cod3_puesto_checkColumnConstraints">}
-#+ Check constraints on the "adtb00020.cod3_puesto" column
-#+
-#+ @param p_cod3_puesto - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00020_cod3_puesto_checkColumnConstraints(p_cod3_puesto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod3_puesto LIKE adtb00020.cod3_puesto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00020_cod3_puesto_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00020_status_t_checkColumnConstraints">}
-#+ Check constraints on the "adtb00020.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00020_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE adtb00020.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00020_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00020_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "adtb00020.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00020_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE adtb00020.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00020_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00020_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "adtb00020.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00020_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE adtb00020.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00020_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00020_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "adtb00020.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00020_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE adtb00020.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00020_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00020_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "adtb00020.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00020_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE adtb00020.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00020_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00019_checkTableConstraints">}
-#+ Check constraints on the "adtb00019" table
-#+
-#+ @param p_data - a row data LIKE adtb00019.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00019_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE adtb00019.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_adtb00019_cod_sol_checkColumnConstraints(p_data.cod_sol) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00019_fech_efec_checkColumnConstraints(p_data.fech_efec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00019_sueldo_checkColumnConstraints(p_data.sueldo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00019_cod_mto_checkColumnConstraints(p_data.cod_mto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00019_sec_mto_checkColumnConstraints(p_data.sec_mto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00019_periodo_checkColumnConstraints(p_data.periodo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00019_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00019_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00019_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00019_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00019_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00019_checkTableConstraints
-
-{<BLOCK Name="fct.adtb00019_cod_sol_checkColumnConstraints">}
-#+ Check constraints on the "adtb00019.cod_sol" column
-#+
-#+ @param p_cod_sol - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00019_cod_sol_checkColumnConstraints(p_cod_sol)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sol LIKE adtb00019.cod_sol
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00019_cod_sol_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00019_fech_efec_checkColumnConstraints">}
-#+ Check constraints on the "adtb00019.fech_efec" column
-#+
-#+ @param p_fech_efec - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00019_fech_efec_checkColumnConstraints(p_fech_efec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_efec LIKE adtb00019.fech_efec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00019_fech_efec_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00019_sueldo_checkColumnConstraints">}
-#+ Check constraints on the "adtb00019.sueldo" column
-#+
-#+ @param p_sueldo - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00019_sueldo_checkColumnConstraints(p_sueldo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sueldo LIKE adtb00019.sueldo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00019_sueldo_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00019_cod_mto_checkColumnConstraints">}
-#+ Check constraints on the "adtb00019.cod_mto" column
-#+
-#+ @param p_cod_mto - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00019_cod_mto_checkColumnConstraints(p_cod_mto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mto LIKE adtb00019.cod_mto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00019_cod_mto_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00019_sec_mto_checkColumnConstraints">}
-#+ Check constraints on the "adtb00019.sec_mto" column
-#+
-#+ @param p_sec_mto - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00019_sec_mto_checkColumnConstraints(p_sec_mto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_mto LIKE adtb00019.sec_mto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00019_sec_mto_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00019_periodo_checkColumnConstraints">}
-#+ Check constraints on the "adtb00019.periodo" column
-#+
-#+ @param p_periodo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00019_periodo_checkColumnConstraints(p_periodo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_periodo LIKE adtb00019.periodo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00019_periodo_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00019_status_t_checkColumnConstraints">}
-#+ Check constraints on the "adtb00019.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00019_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE adtb00019.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00019_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00019_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "adtb00019.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00019_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE adtb00019.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00019_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00019_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "adtb00019.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00019_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE adtb00019.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00019_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00019_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "adtb00019.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00019_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE adtb00019.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00019_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00019_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "adtb00019.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00019_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE adtb00019.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00019_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00018_checkTableConstraints">}
-#+ Check constraints on the "adtb00018" table
-#+
-#+ @param p_data - a row data LIKE adtb00018.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00018_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE adtb00018.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_adtb00018_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00018_cod_sol_checkColumnConstraints(p_data.cod_sol) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00018_num_emp_checkColumnConstraints(p_data.num_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00018_departamento_checkColumnConstraints(p_data.departamento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00018_nivel_emp_checkColumnConstraints(p_data.nivel_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00018_cod_puesto_checkColumnConstraints(p_data.cod_puesto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00018_num3_emp_checkColumnConstraints(p_data.num3_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00018_departamento3_checkColumnConstraints(p_data.departamento3) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00018_nivel3_emp_checkColumnConstraints(p_data.nivel3_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00018_cod3_puesto_checkColumnConstraints(p_data.cod3_puesto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00018_recomendacion_checkColumnConstraints(p_data.recomendacion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00018_otros_com_checkColumnConstraints(p_data.otros_com) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00018_num1_emp_checkColumnConstraints(p_data.num1_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00018_departamento1_checkColumnConstraints(p_data.departamento1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00018_nivel1_emp_checkColumnConstraints(p_data.nivel1_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00018_cod1_puesto_checkColumnConstraints(p_data.cod1_puesto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00018_num2_emp_checkColumnConstraints(p_data.num2_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00018_departamento2_checkColumnConstraints(p_data.departamento2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00018_nivel2_emp_checkColumnConstraints(p_data.nivel2_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00018_cod2_puesto_checkColumnConstraints(p_data.cod2_puesto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00018_cod_requi_checkColumnConstraints(p_data.cod_requi) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00018_ind_requi_checkColumnConstraints(p_data.ind_requi) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00018_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00018_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00018_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00018_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00018_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00018_checkTableConstraints
-
-{<BLOCK Name="fct.adtb00018_fecha_checkColumnConstraints">}
-#+ Check constraints on the "adtb00018.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00018_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE adtb00018.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00018_fecha_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00018_cod_sol_checkColumnConstraints">}
-#+ Check constraints on the "adtb00018.cod_sol" column
-#+
-#+ @param p_cod_sol - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00018_cod_sol_checkColumnConstraints(p_cod_sol)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sol LIKE adtb00018.cod_sol
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00018_cod_sol_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00018_num_emp_checkColumnConstraints">}
-#+ Check constraints on the "adtb00018.num_emp" column
-#+
-#+ @param p_num_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00018_num_emp_checkColumnConstraints(p_num_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_emp LIKE adtb00018.num_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00018_num_emp_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00018_departamento_checkColumnConstraints">}
-#+ Check constraints on the "adtb00018.departamento" column
-#+
-#+ @param p_departamento - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00018_departamento_checkColumnConstraints(p_departamento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_departamento LIKE adtb00018.departamento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00018_departamento_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00018_nivel_emp_checkColumnConstraints">}
-#+ Check constraints on the "adtb00018.nivel_emp" column
-#+
-#+ @param p_nivel_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00018_nivel_emp_checkColumnConstraints(p_nivel_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nivel_emp LIKE adtb00018.nivel_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00018_nivel_emp_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00018_cod_puesto_checkColumnConstraints">}
-#+ Check constraints on the "adtb00018.cod_puesto" column
-#+
-#+ @param p_cod_puesto - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00018_cod_puesto_checkColumnConstraints(p_cod_puesto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_puesto LIKE adtb00018.cod_puesto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00018_cod_puesto_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00018_num3_emp_checkColumnConstraints">}
-#+ Check constraints on the "adtb00018.num3_emp" column
-#+
-#+ @param p_num3_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00018_num3_emp_checkColumnConstraints(p_num3_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num3_emp LIKE adtb00018.num3_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00018_num3_emp_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00018_departamento3_checkColumnConstraints">}
-#+ Check constraints on the "adtb00018.departamento3" column
-#+
-#+ @param p_departamento3 - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00018_departamento3_checkColumnConstraints(p_departamento3)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_departamento3 LIKE adtb00018.departamento3
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00018_departamento3_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00018_nivel3_emp_checkColumnConstraints">}
-#+ Check constraints on the "adtb00018.nivel3_emp" column
-#+
-#+ @param p_nivel3_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00018_nivel3_emp_checkColumnConstraints(p_nivel3_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nivel3_emp LIKE adtb00018.nivel3_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00018_nivel3_emp_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00018_cod3_puesto_checkColumnConstraints">}
-#+ Check constraints on the "adtb00018.cod3_puesto" column
-#+
-#+ @param p_cod3_puesto - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00018_cod3_puesto_checkColumnConstraints(p_cod3_puesto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod3_puesto LIKE adtb00018.cod3_puesto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00018_cod3_puesto_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00018_recomendacion_checkColumnConstraints">}
-#+ Check constraints on the "adtb00018.recomendacion" column
-#+
-#+ @param p_recomendacion - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00018_recomendacion_checkColumnConstraints(p_recomendacion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_recomendacion LIKE adtb00018.recomendacion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00018_recomendacion_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00018_otros_com_checkColumnConstraints">}
-#+ Check constraints on the "adtb00018.otros_com" column
-#+
-#+ @param p_otros_com - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00018_otros_com_checkColumnConstraints(p_otros_com)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_otros_com LIKE adtb00018.otros_com
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00018_otros_com_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00018_num1_emp_checkColumnConstraints">}
-#+ Check constraints on the "adtb00018.num1_emp" column
-#+
-#+ @param p_num1_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00018_num1_emp_checkColumnConstraints(p_num1_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num1_emp LIKE adtb00018.num1_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00018_num1_emp_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00018_departamento1_checkColumnConstraints">}
-#+ Check constraints on the "adtb00018.departamento1" column
-#+
-#+ @param p_departamento1 - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00018_departamento1_checkColumnConstraints(p_departamento1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_departamento1 LIKE adtb00018.departamento1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00018_departamento1_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00018_nivel1_emp_checkColumnConstraints">}
-#+ Check constraints on the "adtb00018.nivel1_emp" column
-#+
-#+ @param p_nivel1_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00018_nivel1_emp_checkColumnConstraints(p_nivel1_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nivel1_emp LIKE adtb00018.nivel1_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00018_nivel1_emp_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00018_cod1_puesto_checkColumnConstraints">}
-#+ Check constraints on the "adtb00018.cod1_puesto" column
-#+
-#+ @param p_cod1_puesto - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00018_cod1_puesto_checkColumnConstraints(p_cod1_puesto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod1_puesto LIKE adtb00018.cod1_puesto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00018_cod1_puesto_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00018_num2_emp_checkColumnConstraints">}
-#+ Check constraints on the "adtb00018.num2_emp" column
-#+
-#+ @param p_num2_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00018_num2_emp_checkColumnConstraints(p_num2_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num2_emp LIKE adtb00018.num2_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00018_num2_emp_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00018_departamento2_checkColumnConstraints">}
-#+ Check constraints on the "adtb00018.departamento2" column
-#+
-#+ @param p_departamento2 - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00018_departamento2_checkColumnConstraints(p_departamento2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_departamento2 LIKE adtb00018.departamento2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00018_departamento2_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00018_nivel2_emp_checkColumnConstraints">}
-#+ Check constraints on the "adtb00018.nivel2_emp" column
-#+
-#+ @param p_nivel2_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00018_nivel2_emp_checkColumnConstraints(p_nivel2_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nivel2_emp LIKE adtb00018.nivel2_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00018_nivel2_emp_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00018_cod2_puesto_checkColumnConstraints">}
-#+ Check constraints on the "adtb00018.cod2_puesto" column
-#+
-#+ @param p_cod2_puesto - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00018_cod2_puesto_checkColumnConstraints(p_cod2_puesto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod2_puesto LIKE adtb00018.cod2_puesto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00018_cod2_puesto_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00018_cod_requi_checkColumnConstraints">}
-#+ Check constraints on the "adtb00018.cod_requi" column
-#+
-#+ @param p_cod_requi - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00018_cod_requi_checkColumnConstraints(p_cod_requi)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_requi LIKE adtb00018.cod_requi
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00018_cod_requi_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00018_ind_requi_checkColumnConstraints">}
-#+ Check constraints on the "adtb00018.ind_requi" column
-#+
-#+ @param p_ind_requi - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00018_ind_requi_checkColumnConstraints(p_ind_requi)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ind_requi LIKE adtb00018.ind_requi
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00018_ind_requi_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00018_status_t_checkColumnConstraints">}
-#+ Check constraints on the "adtb00018.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00018_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE adtb00018.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00018_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00018_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "adtb00018.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00018_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE adtb00018.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00018_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00018_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "adtb00018.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00018_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE adtb00018.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00018_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00018_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "adtb00018.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00018_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE adtb00018.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00018_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00018_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "adtb00018.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00018_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE adtb00018.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00018_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00017_checkTableConstraints">}
-#+ Check constraints on the "adtb00017" table
-#+
-#+ @param p_data - a row data LIKE adtb00017.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00017_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE adtb00017.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_adtb00017_num_trx_checkColumnConstraints(p_data.num_trx) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00017_cod_sol_checkColumnConstraints(p_data.cod_sol) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00017_num_emp_checkColumnConstraints(p_data.num_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00017_departamento_checkColumnConstraints(p_data.departamento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00017_nivel_emp_checkColumnConstraints(p_data.nivel_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00017_cod_puesto_checkColumnConstraints(p_data.cod_puesto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00017_fech_efec_checkColumnConstraints(p_data.fech_efec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00017_salario_checkColumnConstraints(p_data.salario) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00017_cod_mto_checkColumnConstraints(p_data.cod_mto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00017_sec_mto_checkColumnConstraints(p_data.sec_mto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00017_nivel_sal_checkColumnConstraints(p_data.nivel_sal) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00017_liquidacion_checkColumnConstraints(p_data.liquidacion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00017_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00017_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00017_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00017_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00017_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00017_checkTableConstraints
-
-{<BLOCK Name="fct.adtb00017_num_trx_checkColumnConstraints">}
-#+ Check constraints on the "adtb00017.num_trx" column
-#+
-#+ @param p_num_trx - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00017_num_trx_checkColumnConstraints(p_num_trx)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_trx LIKE adtb00017.num_trx
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00017_num_trx_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00017_cod_sol_checkColumnConstraints">}
-#+ Check constraints on the "adtb00017.cod_sol" column
-#+
-#+ @param p_cod_sol - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00017_cod_sol_checkColumnConstraints(p_cod_sol)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sol LIKE adtb00017.cod_sol
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00017_cod_sol_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00017_num_emp_checkColumnConstraints">}
-#+ Check constraints on the "adtb00017.num_emp" column
-#+
-#+ @param p_num_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00017_num_emp_checkColumnConstraints(p_num_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_emp LIKE adtb00017.num_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00017_num_emp_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00017_departamento_checkColumnConstraints">}
-#+ Check constraints on the "adtb00017.departamento" column
-#+
-#+ @param p_departamento - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00017_departamento_checkColumnConstraints(p_departamento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_departamento LIKE adtb00017.departamento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00017_departamento_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00017_nivel_emp_checkColumnConstraints">}
-#+ Check constraints on the "adtb00017.nivel_emp" column
-#+
-#+ @param p_nivel_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00017_nivel_emp_checkColumnConstraints(p_nivel_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nivel_emp LIKE adtb00017.nivel_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00017_nivel_emp_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00017_cod_puesto_checkColumnConstraints">}
-#+ Check constraints on the "adtb00017.cod_puesto" column
-#+
-#+ @param p_cod_puesto - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00017_cod_puesto_checkColumnConstraints(p_cod_puesto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_puesto LIKE adtb00017.cod_puesto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00017_cod_puesto_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00017_fech_efec_checkColumnConstraints">}
-#+ Check constraints on the "adtb00017.fech_efec" column
-#+
-#+ @param p_fech_efec - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00017_fech_efec_checkColumnConstraints(p_fech_efec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_efec LIKE adtb00017.fech_efec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00017_fech_efec_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00017_salario_checkColumnConstraints">}
-#+ Check constraints on the "adtb00017.salario" column
-#+
-#+ @param p_salario - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00017_salario_checkColumnConstraints(p_salario)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_salario LIKE adtb00017.salario
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00017_salario_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00017_cod_mto_checkColumnConstraints">}
-#+ Check constraints on the "adtb00017.cod_mto" column
-#+
-#+ @param p_cod_mto - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00017_cod_mto_checkColumnConstraints(p_cod_mto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mto LIKE adtb00017.cod_mto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00017_cod_mto_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00017_sec_mto_checkColumnConstraints">}
-#+ Check constraints on the "adtb00017.sec_mto" column
-#+
-#+ @param p_sec_mto - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00017_sec_mto_checkColumnConstraints(p_sec_mto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_mto LIKE adtb00017.sec_mto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00017_sec_mto_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00017_nivel_sal_checkColumnConstraints">}
-#+ Check constraints on the "adtb00017.nivel_sal" column
-#+
-#+ @param p_nivel_sal - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00017_nivel_sal_checkColumnConstraints(p_nivel_sal)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nivel_sal LIKE adtb00017.nivel_sal
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00017_nivel_sal_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00017_liquidacion_checkColumnConstraints">}
-#+ Check constraints on the "adtb00017.liquidacion" column
-#+
-#+ @param p_liquidacion - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00017_liquidacion_checkColumnConstraints(p_liquidacion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_liquidacion LIKE adtb00017.liquidacion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00017_liquidacion_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00017_status_t_checkColumnConstraints">}
-#+ Check constraints on the "adtb00017.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00017_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE adtb00017.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00017_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00017_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "adtb00017.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00017_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE adtb00017.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00017_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00017_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "adtb00017.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00017_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE adtb00017.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00017_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00017_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "adtb00017.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00017_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE adtb00017.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00017_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00017_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "adtb00017.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00017_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE adtb00017.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00017_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00016_checkTableConstraints">}
-#+ Check constraints on the "adtb00016" table
-#+
-#+ @param p_data - a row data LIKE adtb00016.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00016_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE adtb00016.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_adtb00016_cod_sol_checkColumnConstraints(p_data.cod_sol) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00016_nom_empr_checkColumnConstraints(p_data.nom_empr) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00016_calle_checkColumnConstraints(p_data.calle) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00016_casa_num_checkColumnConstraints(p_data.casa_num) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00016_barrio_checkColumnConstraints(p_data.barrio) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00016_urbanizacion_checkColumnConstraints(p_data.urbanizacion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00016_cod_puesto_checkColumnConstraints(p_data.cod_puesto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00016_sueldo_checkColumnConstraints(p_data.sueldo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00016_ano_ini_checkColumnConstraints(p_data.ano_ini) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00016_ano_fin_checkColumnConstraints(p_data.ano_fin) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00016_desc_retiro_checkColumnConstraints(p_data.desc_retiro) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00016_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00016_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00016_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00016_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00016_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00016_checkTableConstraints
-
-{<BLOCK Name="fct.adtb00016_cod_sol_checkColumnConstraints">}
-#+ Check constraints on the "adtb00016.cod_sol" column
-#+
-#+ @param p_cod_sol - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00016_cod_sol_checkColumnConstraints(p_cod_sol)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sol LIKE adtb00016.cod_sol
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00016_cod_sol_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00016_nom_empr_checkColumnConstraints">}
-#+ Check constraints on the "adtb00016.nom_empr" column
-#+
-#+ @param p_nom_empr - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00016_nom_empr_checkColumnConstraints(p_nom_empr)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nom_empr LIKE adtb00016.nom_empr
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00016_nom_empr_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00016_calle_checkColumnConstraints">}
-#+ Check constraints on the "adtb00016.calle" column
-#+
-#+ @param p_calle - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00016_calle_checkColumnConstraints(p_calle)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_calle LIKE adtb00016.calle
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00016_calle_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00016_casa_num_checkColumnConstraints">}
-#+ Check constraints on the "adtb00016.casa_num" column
-#+
-#+ @param p_casa_num - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00016_casa_num_checkColumnConstraints(p_casa_num)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_casa_num LIKE adtb00016.casa_num
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00016_casa_num_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00016_barrio_checkColumnConstraints">}
-#+ Check constraints on the "adtb00016.barrio" column
-#+
-#+ @param p_barrio - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00016_barrio_checkColumnConstraints(p_barrio)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_barrio LIKE adtb00016.barrio
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00016_barrio_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00016_urbanizacion_checkColumnConstraints">}
-#+ Check constraints on the "adtb00016.urbanizacion" column
-#+
-#+ @param p_urbanizacion - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00016_urbanizacion_checkColumnConstraints(p_urbanizacion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_urbanizacion LIKE adtb00016.urbanizacion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00016_urbanizacion_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00016_cod_puesto_checkColumnConstraints">}
-#+ Check constraints on the "adtb00016.cod_puesto" column
-#+
-#+ @param p_cod_puesto - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00016_cod_puesto_checkColumnConstraints(p_cod_puesto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_puesto LIKE adtb00016.cod_puesto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00016_cod_puesto_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00016_sueldo_checkColumnConstraints">}
-#+ Check constraints on the "adtb00016.sueldo" column
-#+
-#+ @param p_sueldo - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00016_sueldo_checkColumnConstraints(p_sueldo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sueldo LIKE adtb00016.sueldo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00016_sueldo_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00016_ano_ini_checkColumnConstraints">}
-#+ Check constraints on the "adtb00016.ano_ini" column
-#+
-#+ @param p_ano_ini - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00016_ano_ini_checkColumnConstraints(p_ano_ini)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ano_ini LIKE adtb00016.ano_ini
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00016_ano_ini_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00016_ano_fin_checkColumnConstraints">}
-#+ Check constraints on the "adtb00016.ano_fin" column
-#+
-#+ @param p_ano_fin - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00016_ano_fin_checkColumnConstraints(p_ano_fin)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ano_fin LIKE adtb00016.ano_fin
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00016_ano_fin_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00016_desc_retiro_checkColumnConstraints">}
-#+ Check constraints on the "adtb00016.desc_retiro" column
-#+
-#+ @param p_desc_retiro - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00016_desc_retiro_checkColumnConstraints(p_desc_retiro)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_desc_retiro LIKE adtb00016.desc_retiro
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00016_desc_retiro_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00016_status_t_checkColumnConstraints">}
-#+ Check constraints on the "adtb00016.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00016_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE adtb00016.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00016_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00016_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "adtb00016.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00016_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE adtb00016.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00016_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00016_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "adtb00016.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00016_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE adtb00016.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00016_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00016_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "adtb00016.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00016_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE adtb00016.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00016_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00016_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "adtb00016.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00016_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE adtb00016.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00016_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00015_checkTableConstraints">}
-#+ Check constraints on the "adtb00015" table
-#+
-#+ @param p_data - a row data LIKE adtb00015.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00015_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE adtb00015.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_adtb00015_cod_sol_checkColumnConstraints(p_data.cod_sol) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00015_nom_inst_checkColumnConstraints(p_data.nom_inst) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00015_calle_checkColumnConstraints(p_data.calle) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00015_casa_num_checkColumnConstraints(p_data.casa_num) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00015_barrio_checkColumnConstraints(p_data.barrio) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00015_urbanizacion_checkColumnConstraints(p_data.urbanizacion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00015_cod_educa_checkColumnConstraints(p_data.cod_educa) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00015_anos_checkColumnConstraints(p_data.anos) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00015_ano_term_checkColumnConstraints(p_data.ano_term) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00015_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00015_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00015_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00015_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00015_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00015_checkTableConstraints
-
-{<BLOCK Name="fct.adtb00015_cod_sol_checkColumnConstraints">}
-#+ Check constraints on the "adtb00015.cod_sol" column
-#+
-#+ @param p_cod_sol - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00015_cod_sol_checkColumnConstraints(p_cod_sol)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sol LIKE adtb00015.cod_sol
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00015_cod_sol_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00015_nom_inst_checkColumnConstraints">}
-#+ Check constraints on the "adtb00015.nom_inst" column
-#+
-#+ @param p_nom_inst - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00015_nom_inst_checkColumnConstraints(p_nom_inst)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nom_inst LIKE adtb00015.nom_inst
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00015_nom_inst_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00015_calle_checkColumnConstraints">}
-#+ Check constraints on the "adtb00015.calle" column
-#+
-#+ @param p_calle - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00015_calle_checkColumnConstraints(p_calle)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_calle LIKE adtb00015.calle
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00015_calle_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00015_casa_num_checkColumnConstraints">}
-#+ Check constraints on the "adtb00015.casa_num" column
-#+
-#+ @param p_casa_num - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00015_casa_num_checkColumnConstraints(p_casa_num)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_casa_num LIKE adtb00015.casa_num
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00015_casa_num_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00015_barrio_checkColumnConstraints">}
-#+ Check constraints on the "adtb00015.barrio" column
-#+
-#+ @param p_barrio - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00015_barrio_checkColumnConstraints(p_barrio)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_barrio LIKE adtb00015.barrio
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00015_barrio_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00015_urbanizacion_checkColumnConstraints">}
-#+ Check constraints on the "adtb00015.urbanizacion" column
-#+
-#+ @param p_urbanizacion - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00015_urbanizacion_checkColumnConstraints(p_urbanizacion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_urbanizacion LIKE adtb00015.urbanizacion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00015_urbanizacion_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00015_cod_educa_checkColumnConstraints">}
-#+ Check constraints on the "adtb00015.cod_educa" column
-#+
-#+ @param p_cod_educa - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00015_cod_educa_checkColumnConstraints(p_cod_educa)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_educa LIKE adtb00015.cod_educa
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00015_cod_educa_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00015_anos_checkColumnConstraints">}
-#+ Check constraints on the "adtb00015.anos" column
-#+
-#+ @param p_anos - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00015_anos_checkColumnConstraints(p_anos)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_anos LIKE adtb00015.anos
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00015_anos_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00015_ano_term_checkColumnConstraints">}
-#+ Check constraints on the "adtb00015.ano_term" column
-#+
-#+ @param p_ano_term - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00015_ano_term_checkColumnConstraints(p_ano_term)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ano_term LIKE adtb00015.ano_term
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00015_ano_term_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00015_status_t_checkColumnConstraints">}
-#+ Check constraints on the "adtb00015.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00015_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE adtb00015.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00015_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00015_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "adtb00015.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00015_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE adtb00015.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00015_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00015_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "adtb00015.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00015_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE adtb00015.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00015_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00015_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "adtb00015.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00015_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE adtb00015.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00015_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00015_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "adtb00015.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00015_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE adtb00015.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00015_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00014_checkTableConstraints">}
-#+ Check constraints on the "adtb00014" table
-#+
-#+ @param p_data - a row data LIKE adtb00014.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00014_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE adtb00014.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_adtb00014_cod_sol_checkColumnConstraints(p_data.cod_sol) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00014_nom_ref_checkColumnConstraints(p_data.nom_ref) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00014_anos_rel_checkColumnConstraints(p_data.anos_rel) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00014_telefono_checkColumnConstraints(p_data.telefono) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00014_calle_checkColumnConstraints(p_data.calle) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00014_casa_num_checkColumnConstraints(p_data.casa_num) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00014_barrio_checkColumnConstraints(p_data.barrio) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00014_urbanizacion_checkColumnConstraints(p_data.urbanizacion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00014_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00014_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00014_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00014_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00014_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00014_checkTableConstraints
-
-{<BLOCK Name="fct.adtb00014_cod_sol_checkColumnConstraints">}
-#+ Check constraints on the "adtb00014.cod_sol" column
-#+
-#+ @param p_cod_sol - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00014_cod_sol_checkColumnConstraints(p_cod_sol)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sol LIKE adtb00014.cod_sol
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00014_cod_sol_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00014_nom_ref_checkColumnConstraints">}
-#+ Check constraints on the "adtb00014.nom_ref" column
-#+
-#+ @param p_nom_ref - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00014_nom_ref_checkColumnConstraints(p_nom_ref)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nom_ref LIKE adtb00014.nom_ref
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00014_nom_ref_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00014_anos_rel_checkColumnConstraints">}
-#+ Check constraints on the "adtb00014.anos_rel" column
-#+
-#+ @param p_anos_rel - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00014_anos_rel_checkColumnConstraints(p_anos_rel)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_anos_rel LIKE adtb00014.anos_rel
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00014_anos_rel_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00014_telefono_checkColumnConstraints">}
-#+ Check constraints on the "adtb00014.telefono" column
-#+
-#+ @param p_telefono - CHAR(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00014_telefono_checkColumnConstraints(p_telefono)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_telefono LIKE adtb00014.telefono
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00014_telefono_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00014_calle_checkColumnConstraints">}
-#+ Check constraints on the "adtb00014.calle" column
-#+
-#+ @param p_calle - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00014_calle_checkColumnConstraints(p_calle)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_calle LIKE adtb00014.calle
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00014_calle_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00014_casa_num_checkColumnConstraints">}
-#+ Check constraints on the "adtb00014.casa_num" column
-#+
-#+ @param p_casa_num - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00014_casa_num_checkColumnConstraints(p_casa_num)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_casa_num LIKE adtb00014.casa_num
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00014_casa_num_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00014_barrio_checkColumnConstraints">}
-#+ Check constraints on the "adtb00014.barrio" column
-#+
-#+ @param p_barrio - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00014_barrio_checkColumnConstraints(p_barrio)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_barrio LIKE adtb00014.barrio
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00014_barrio_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00014_urbanizacion_checkColumnConstraints">}
-#+ Check constraints on the "adtb00014.urbanizacion" column
-#+
-#+ @param p_urbanizacion - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00014_urbanizacion_checkColumnConstraints(p_urbanizacion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_urbanizacion LIKE adtb00014.urbanizacion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00014_urbanizacion_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00014_status_t_checkColumnConstraints">}
-#+ Check constraints on the "adtb00014.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00014_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE adtb00014.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00014_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00014_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "adtb00014.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00014_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE adtb00014.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00014_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00014_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "adtb00014.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00014_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE adtb00014.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00014_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00014_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "adtb00014.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00014_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE adtb00014.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00014_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00014_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "adtb00014.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00014_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE adtb00014.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00014_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00013_checkTableConstraints">}
-#+ Check constraints on the "adtb00013" table
-#+
-#+ @param p_data - a row data LIKE adtb00013.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00013_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE adtb00013.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_adtb00013_cod_sol_checkColumnConstraints(p_data.cod_sol) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00013_cod_par_checkColumnConstraints(p_data.cod_par) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00013_sec_par_checkColumnConstraints(p_data.sec_par) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00013_nombre_checkColumnConstraints(p_data.nombre) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00013_cedula_checkColumnConstraints(p_data.cedula) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00013_sexo_checkColumnConstraints(p_data.sexo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00013_fecha_nac_checkColumnConstraints(p_data.fecha_nac) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00013_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00013_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00013_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00013_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00013_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00013_checkTableConstraints
-
-{<BLOCK Name="fct.adtb00013_cod_sol_checkColumnConstraints">}
-#+ Check constraints on the "adtb00013.cod_sol" column
-#+
-#+ @param p_cod_sol - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00013_cod_sol_checkColumnConstraints(p_cod_sol)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sol LIKE adtb00013.cod_sol
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00013_cod_sol_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00013_cod_par_checkColumnConstraints">}
-#+ Check constraints on the "adtb00013.cod_par" column
-#+
-#+ @param p_cod_par - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00013_cod_par_checkColumnConstraints(p_cod_par)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_par LIKE adtb00013.cod_par
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00013_cod_par_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00013_sec_par_checkColumnConstraints">}
-#+ Check constraints on the "adtb00013.sec_par" column
-#+
-#+ @param p_sec_par - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00013_sec_par_checkColumnConstraints(p_sec_par)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_par LIKE adtb00013.sec_par
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00013_sec_par_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00013_nombre_checkColumnConstraints">}
-#+ Check constraints on the "adtb00013.nombre" column
-#+
-#+ @param p_nombre - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00013_nombre_checkColumnConstraints(p_nombre)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nombre LIKE adtb00013.nombre
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00013_nombre_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00013_cedula_checkColumnConstraints">}
-#+ Check constraints on the "adtb00013.cedula" column
-#+
-#+ @param p_cedula - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00013_cedula_checkColumnConstraints(p_cedula)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cedula LIKE adtb00013.cedula
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00013_cedula_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00013_sexo_checkColumnConstraints">}
-#+ Check constraints on the "adtb00013.sexo" column
-#+
-#+ @param p_sexo - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00013_sexo_checkColumnConstraints(p_sexo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sexo LIKE adtb00013.sexo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00013_sexo_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00013_fecha_nac_checkColumnConstraints">}
-#+ Check constraints on the "adtb00013.fecha_nac" column
-#+
-#+ @param p_fecha_nac - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00013_fecha_nac_checkColumnConstraints(p_fecha_nac)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_nac LIKE adtb00013.fecha_nac
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00013_fecha_nac_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00013_status_t_checkColumnConstraints">}
-#+ Check constraints on the "adtb00013.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00013_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE adtb00013.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00013_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00013_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "adtb00013.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00013_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE adtb00013.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00013_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00013_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "adtb00013.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00013_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE adtb00013.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00013_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00013_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "adtb00013.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00013_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE adtb00013.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00013_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00013_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "adtb00013.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00013_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE adtb00013.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00013_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00012_checkTableConstraints">}
-#+ Check constraints on the "adtb00012" table
-#+
-#+ @param p_data - a row data LIKE adtb00012.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00012_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE adtb00012.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_adtb00012_cod_sol_checkColumnConstraints(p_data.cod_sol) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00012_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00012_nom1_sol_checkColumnConstraints(p_data.nom1_sol) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00012_nom2_sol_checkColumnConstraints(p_data.nom2_sol) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00012_apell1_sol_checkColumnConstraints(p_data.apell1_sol) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00012_apell2_sol_checkColumnConstraints(p_data.apell2_sol) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00012_calle_checkColumnConstraints(p_data.calle) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00012_casa_num_checkColumnConstraints(p_data.casa_num) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00012_barrio_checkColumnConstraints(p_data.barrio) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00012_urbanizacion_checkColumnConstraints(p_data.urbanizacion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00012_telefono_checkColumnConstraints(p_data.telefono) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00012_cod_provincia_checkColumnConstraints(p_data.cod_provincia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00012_fech_nac_checkColumnConstraints(p_data.fech_nac) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00012_cod_nac_checkColumnConstraints(p_data.cod_nac) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00012_estado_civil_checkColumnConstraints(p_data.estado_civil) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00012_estatura_checkColumnConstraints(p_data.estatura) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00012_peso_checkColumnConstraints(p_data.peso) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00012_cedula_checkColumnConstraints(p_data.cedula) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00012_serie_checkColumnConstraints(p_data.serie) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00012_licencia_checkColumnConstraints(p_data.licencia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00012_tipo_sangre_checkColumnConstraints(p_data.tipo_sangre) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00012_idioma_checkColumnConstraints(p_data.idioma) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00012_h_idioma_checkColumnConstraints(p_data.h_idioma) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00012_l_idioma_checkColumnConstraints(p_data.l_idioma) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00012_e_idioma_checkColumnConstraints(p_data.e_idioma) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00012_otros_idioma_checkColumnConstraints(p_data.otros_idioma) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00012_cod_puesto_checkColumnConstraints(p_data.cod_puesto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00012_cod_prof_checkColumnConstraints(p_data.cod_prof) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00012_sexo_checkColumnConstraints(p_data.sexo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00012_afp_checkColumnConstraints(p_data.afp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00012_ars_checkColumnConstraints(p_data.ars) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00012_numero_nss_checkColumnConstraints(p_data.numero_nss) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00012_seguro_complementario_checkColumnConstraints(p_data.seguro_complementario) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00012_categoria_licencia_conducir_checkColumnConstraints(p_data.categoria_licencia_conducir) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00012_sueldo_deseado_checkColumnConstraints(p_data.sueldo_deseado) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00012_pariente_emergencia_checkColumnConstraints(p_data.pariente_emergencia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00012_parentesco_emergencia_checkColumnConstraints(p_data.parentesco_emergencia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00012_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00012_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00012_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00012_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00012_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- CALL smarmotech_dbxconstraints_adtb00012_pk_adtb00012_checkUniqueConstraint(p_forUpdate, p_data.cedula) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00012_checkTableConstraints
-
-{<BLOCK Name="fct.adtb00012_pk_adtb00012_checkUniqueConstraint">}
-#+ Check the primary key uniqueness constraint on the "adtb00012"
-#+
-#+ @param p_key - Primary Key
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00012_pk_adtb00012_checkUniqueConstraint(p_forUpdate, p_key)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_key
- RECORD
- adtb00012_cedula LIKE adtb00012.cedula
- END RECORD
- DEFINE l_key
- RECORD
- adtb00012_cedula LIKE adtb00012.cedula
- END RECORD
- DEFINE l_where STRING
- DEFINE l_sqlQuery STRING
- DEFINE l_count INTEGER
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- LET l_where = "WHERE adtb00012.cedula = ? "
-
- let l_sqlQuery = "SELECT COUNT(*), cedula FROM adtb00012 ", l_where, " GROUP BY cedula"
-
- PREPARE cur_adtb00012_pk_adtb00012_checkUniqueConstraint FROM l_sqlQuery
- EXECUTE cur_adtb00012_pk_adtb00012_checkUniqueConstraint INTO l_count, l_key.* USING p_key.*
- FREE cur_adtb00012_pk_adtb00012_checkUniqueConstraint
- IF (NOT p_forUpdate AND l_count > 0) OR (p_forUpdate AND l_count > 0 AND p_key.* != l_key.*) THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cedula: " || ERROR_BAM_00002) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00012_pk_adtb00012_checkUniqueConstraint
-
-{<BLOCK Name="fct.adtb00012_cod_sol_checkColumnConstraints">}
-#+ Check constraints on the "adtb00012.cod_sol" column
-#+
-#+ @param p_cod_sol - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00012_cod_sol_checkColumnConstraints(p_cod_sol)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_sol LIKE adtb00012.cod_sol
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00012_cod_sol_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00012_fecha_checkColumnConstraints">}
-#+ Check constraints on the "adtb00012.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00012_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE adtb00012.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00012_fecha_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00012_nom1_sol_checkColumnConstraints">}
-#+ Check constraints on the "adtb00012.nom1_sol" column
-#+
-#+ @param p_nom1_sol - CHAR(15) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00012_nom1_sol_checkColumnConstraints(p_nom1_sol)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nom1_sol LIKE adtb00012.nom1_sol
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00012_nom1_sol_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00012_nom2_sol_checkColumnConstraints">}
-#+ Check constraints on the "adtb00012.nom2_sol" column
-#+
-#+ @param p_nom2_sol - CHAR(15) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00012_nom2_sol_checkColumnConstraints(p_nom2_sol)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nom2_sol LIKE adtb00012.nom2_sol
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00012_nom2_sol_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00012_apell1_sol_checkColumnConstraints">}
-#+ Check constraints on the "adtb00012.apell1_sol" column
-#+
-#+ @param p_apell1_sol - CHAR(15) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00012_apell1_sol_checkColumnConstraints(p_apell1_sol)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_apell1_sol LIKE adtb00012.apell1_sol
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00012_apell1_sol_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00012_apell2_sol_checkColumnConstraints">}
-#+ Check constraints on the "adtb00012.apell2_sol" column
-#+
-#+ @param p_apell2_sol - CHAR(15) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00012_apell2_sol_checkColumnConstraints(p_apell2_sol)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_apell2_sol LIKE adtb00012.apell2_sol
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00012_apell2_sol_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00012_calle_checkColumnConstraints">}
-#+ Check constraints on the "adtb00012.calle" column
-#+
-#+ @param p_calle - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00012_calle_checkColumnConstraints(p_calle)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_calle LIKE adtb00012.calle
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00012_calle_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00012_casa_num_checkColumnConstraints">}
-#+ Check constraints on the "adtb00012.casa_num" column
-#+
-#+ @param p_casa_num - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00012_casa_num_checkColumnConstraints(p_casa_num)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_casa_num LIKE adtb00012.casa_num
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00012_casa_num_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00012_barrio_checkColumnConstraints">}
-#+ Check constraints on the "adtb00012.barrio" column
-#+
-#+ @param p_barrio - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00012_barrio_checkColumnConstraints(p_barrio)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_barrio LIKE adtb00012.barrio
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00012_barrio_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00012_urbanizacion_checkColumnConstraints">}
-#+ Check constraints on the "adtb00012.urbanizacion" column
-#+
-#+ @param p_urbanizacion - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00012_urbanizacion_checkColumnConstraints(p_urbanizacion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_urbanizacion LIKE adtb00012.urbanizacion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00012_urbanizacion_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00012_telefono_checkColumnConstraints">}
-#+ Check constraints on the "adtb00012.telefono" column
-#+
-#+ @param p_telefono - CHAR(15) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00012_telefono_checkColumnConstraints(p_telefono)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_telefono LIKE adtb00012.telefono
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00012_telefono_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00012_cod_provincia_checkColumnConstraints">}
-#+ Check constraints on the "adtb00012.cod_provincia" column
-#+
-#+ @param p_cod_provincia - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00012_cod_provincia_checkColumnConstraints(p_cod_provincia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_provincia LIKE adtb00012.cod_provincia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00012_cod_provincia_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00012_fech_nac_checkColumnConstraints">}
-#+ Check constraints on the "adtb00012.fech_nac" column
-#+
-#+ @param p_fech_nac - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00012_fech_nac_checkColumnConstraints(p_fech_nac)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_nac LIKE adtb00012.fech_nac
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00012_fech_nac_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00012_cod_nac_checkColumnConstraints">}
-#+ Check constraints on the "adtb00012.cod_nac" column
-#+
-#+ @param p_cod_nac - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00012_cod_nac_checkColumnConstraints(p_cod_nac)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_nac LIKE adtb00012.cod_nac
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00012_cod_nac_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00012_estado_civil_checkColumnConstraints">}
-#+ Check constraints on the "adtb00012.estado_civil" column
-#+
-#+ @param p_estado_civil - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00012_estado_civil_checkColumnConstraints(p_estado_civil)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_estado_civil LIKE adtb00012.estado_civil
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00012_estado_civil_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00012_estatura_checkColumnConstraints">}
-#+ Check constraints on the "adtb00012.estatura" column
-#+
-#+ @param p_estatura - CHAR(4) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00012_estatura_checkColumnConstraints(p_estatura)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_estatura LIKE adtb00012.estatura
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00012_estatura_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00012_peso_checkColumnConstraints">}
-#+ Check constraints on the "adtb00012.peso" column
-#+
-#+ @param p_peso - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00012_peso_checkColumnConstraints(p_peso)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_peso LIKE adtb00012.peso
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00012_peso_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00012_cedula_checkColumnConstraints">}
-#+ Check constraints on the "adtb00012.cedula" column
-#+
-#+ @param p_cedula - CHAR(11) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00012_cedula_checkColumnConstraints(p_cedula)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cedula LIKE adtb00012.cedula
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_cedula IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- cedula: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00012_cedula_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00012_serie_checkColumnConstraints">}
-#+ Check constraints on the "adtb00012.serie" column
-#+
-#+ @param p_serie - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00012_serie_checkColumnConstraints(p_serie)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_serie LIKE adtb00012.serie
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00012_serie_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00012_licencia_checkColumnConstraints">}
-#+ Check constraints on the "adtb00012.licencia" column
-#+
-#+ @param p_licencia - CHAR(11) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00012_licencia_checkColumnConstraints(p_licencia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_licencia LIKE adtb00012.licencia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00012_licencia_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00012_tipo_sangre_checkColumnConstraints">}
-#+ Check constraints on the "adtb00012.tipo_sangre" column
-#+
-#+ @param p_tipo_sangre - CHAR(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00012_tipo_sangre_checkColumnConstraints(p_tipo_sangre)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_sangre LIKE adtb00012.tipo_sangre
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00012_tipo_sangre_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00012_idioma_checkColumnConstraints">}
-#+ Check constraints on the "adtb00012.idioma" column
-#+
-#+ @param p_idioma - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00012_idioma_checkColumnConstraints(p_idioma)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_idioma LIKE adtb00012.idioma
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00012_idioma_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00012_h_idioma_checkColumnConstraints">}
-#+ Check constraints on the "adtb00012.h_idioma" column
-#+
-#+ @param p_h_idioma - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00012_h_idioma_checkColumnConstraints(p_h_idioma)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_h_idioma LIKE adtb00012.h_idioma
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00012_h_idioma_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00012_l_idioma_checkColumnConstraints">}
-#+ Check constraints on the "adtb00012.l_idioma" column
-#+
-#+ @param p_l_idioma - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00012_l_idioma_checkColumnConstraints(p_l_idioma)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_l_idioma LIKE adtb00012.l_idioma
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00012_l_idioma_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00012_e_idioma_checkColumnConstraints">}
-#+ Check constraints on the "adtb00012.e_idioma" column
-#+
-#+ @param p_e_idioma - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00012_e_idioma_checkColumnConstraints(p_e_idioma)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_e_idioma LIKE adtb00012.e_idioma
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00012_e_idioma_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00012_otros_idioma_checkColumnConstraints">}
-#+ Check constraints on the "adtb00012.otros_idioma" column
-#+
-#+ @param p_otros_idioma - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00012_otros_idioma_checkColumnConstraints(p_otros_idioma)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_otros_idioma LIKE adtb00012.otros_idioma
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00012_otros_idioma_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00012_cod_puesto_checkColumnConstraints">}
-#+ Check constraints on the "adtb00012.cod_puesto" column
-#+
-#+ @param p_cod_puesto - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00012_cod_puesto_checkColumnConstraints(p_cod_puesto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_puesto LIKE adtb00012.cod_puesto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00012_cod_puesto_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00012_cod_prof_checkColumnConstraints">}
-#+ Check constraints on the "adtb00012.cod_prof" column
-#+
-#+ @param p_cod_prof - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00012_cod_prof_checkColumnConstraints(p_cod_prof)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_prof LIKE adtb00012.cod_prof
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00012_cod_prof_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00012_sexo_checkColumnConstraints">}
-#+ Check constraints on the "adtb00012.sexo" column
-#+
-#+ @param p_sexo - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00012_sexo_checkColumnConstraints(p_sexo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sexo LIKE adtb00012.sexo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00012_sexo_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00012_afp_checkColumnConstraints">}
-#+ Check constraints on the "adtb00012.afp" column
-#+
-#+ @param p_afp - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00012_afp_checkColumnConstraints(p_afp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_afp LIKE adtb00012.afp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00012_afp_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00012_ars_checkColumnConstraints">}
-#+ Check constraints on the "adtb00012.ars" column
-#+
-#+ @param p_ars - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00012_ars_checkColumnConstraints(p_ars)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_ars LIKE adtb00012.ars
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00012_ars_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00012_numero_nss_checkColumnConstraints">}
-#+ Check constraints on the "adtb00012.numero_nss" column
-#+
-#+ @param p_numero_nss - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00012_numero_nss_checkColumnConstraints(p_numero_nss)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_numero_nss LIKE adtb00012.numero_nss
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00012_numero_nss_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00012_seguro_complementario_checkColumnConstraints">}
-#+ Check constraints on the "adtb00012.seguro_complementario" column
-#+
-#+ @param p_seguro_complementario - CHAR(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00012_seguro_complementario_checkColumnConstraints(p_seguro_complementario)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_seguro_complementario LIKE adtb00012.seguro_complementario
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00012_seguro_complementario_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00012_categoria_licencia_conducir_checkColumnConstraints">}
-#+ Check constraints on the "adtb00012.categoria_licencia_conducir" column
-#+
-#+ @param p_categoria_licencia_conducir - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00012_categoria_licencia_conducir_checkColumnConstraints(p_categoria_licencia_conducir)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_categoria_licencia_conducir LIKE adtb00012.categoria_licencia_conducir
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00012_categoria_licencia_conducir_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00012_sueldo_deseado_checkColumnConstraints">}
-#+ Check constraints on the "adtb00012.sueldo_deseado" column
-#+
-#+ @param p_sueldo_deseado - DECIMAL(12,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00012_sueldo_deseado_checkColumnConstraints(p_sueldo_deseado)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sueldo_deseado LIKE adtb00012.sueldo_deseado
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00012_sueldo_deseado_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00012_pariente_emergencia_checkColumnConstraints">}
-#+ Check constraints on the "adtb00012.pariente_emergencia" column
-#+
-#+ @param p_pariente_emergencia - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00012_pariente_emergencia_checkColumnConstraints(p_pariente_emergencia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_pariente_emergencia LIKE adtb00012.pariente_emergencia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00012_pariente_emergencia_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00012_parentesco_emergencia_checkColumnConstraints">}
-#+ Check constraints on the "adtb00012.parentesco_emergencia" column
-#+
-#+ @param p_parentesco_emergencia - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00012_parentesco_emergencia_checkColumnConstraints(p_parentesco_emergencia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_parentesco_emergencia LIKE adtb00012.parentesco_emergencia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00012_parentesco_emergencia_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00012_status_t_checkColumnConstraints">}
-#+ Check constraints on the "adtb00012.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00012_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE adtb00012.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00012_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00012_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "adtb00012.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00012_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE adtb00012.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00012_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00012_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "adtb00012.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00012_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE adtb00012.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00012_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00012_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "adtb00012.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00012_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE adtb00012.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00012_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00012_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "adtb00012.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00012_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE adtb00012.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00012_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00011_checkTableConstraints">}
-#+ Check constraints on the "adtb00011" table
-#+
-#+ @param p_data - a row data LIKE adtb00011.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00011_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE adtb00011.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_adtb00011_num_doc_checkColumnConstraints(p_data.num_doc) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00011_fecha_checkColumnConstraints(p_data.fecha) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00011_fech_req_checkColumnConstraints(p_data.fech_req) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00011_depart_checkColumnConstraints(p_data.depart) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00011_tipo_req_checkColumnConstraints(p_data.tipo_req) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00011_razon_vac_checkColumnConstraints(p_data.razon_vac) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00011_cod_puesto_r_checkColumnConstraints(p_data.cod_puesto_r) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00011_edad_min_checkColumnConstraints(p_data.edad_min) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00011_salario_sem_checkColumnConstraints(p_data.salario_sem) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00011_salario_men_checkColumnConstraints(p_data.salario_men) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00011_experiencia_checkColumnConstraints(p_data.experiencia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00011_cod_educa_checkColumnConstraints(p_data.cod_educa) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00011_cod_pericia_checkColumnConstraints(p_data.cod_pericia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00011_status_per_checkColumnConstraints(p_data.status_per) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00011_num_emp_checkColumnConstraints(p_data.num_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00011_departamento_checkColumnConstraints(p_data.departamento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00011_nivel_emp_checkColumnConstraints(p_data.nivel_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00011_cod_puesto_checkColumnConstraints(p_data.cod_puesto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00011_num1_emp_checkColumnConstraints(p_data.num1_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00011_departamento1_checkColumnConstraints(p_data.departamento1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00011_nivel1_emp_checkColumnConstraints(p_data.nivel1_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00011_cod1_puesto_checkColumnConstraints(p_data.cod1_puesto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00011_num2_emp_checkColumnConstraints(p_data.num2_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00011_departamento2_checkColumnConstraints(p_data.departamento2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00011_nivel2_emp_checkColumnConstraints(p_data.nivel2_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00011_cod2_puesto_checkColumnConstraints(p_data.cod2_puesto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00011_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00011_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00011_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00011_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00011_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00011_checkTableConstraints
-
-{<BLOCK Name="fct.adtb00011_num_doc_checkColumnConstraints">}
-#+ Check constraints on the "adtb00011.num_doc" column
-#+
-#+ @param p_num_doc - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00011_num_doc_checkColumnConstraints(p_num_doc)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_doc LIKE adtb00011.num_doc
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00011_num_doc_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00011_fecha_checkColumnConstraints">}
-#+ Check constraints on the "adtb00011.fecha" column
-#+
-#+ @param p_fecha - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00011_fecha_checkColumnConstraints(p_fecha)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha LIKE adtb00011.fecha
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00011_fecha_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00011_fech_req_checkColumnConstraints">}
-#+ Check constraints on the "adtb00011.fech_req" column
-#+
-#+ @param p_fech_req - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00011_fech_req_checkColumnConstraints(p_fech_req)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_req LIKE adtb00011.fech_req
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00011_fech_req_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00011_depart_checkColumnConstraints">}
-#+ Check constraints on the "adtb00011.depart" column
-#+
-#+ @param p_depart - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00011_depart_checkColumnConstraints(p_depart)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_depart LIKE adtb00011.depart
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00011_depart_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00011_tipo_req_checkColumnConstraints">}
-#+ Check constraints on the "adtb00011.tipo_req" column
-#+
-#+ @param p_tipo_req - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00011_tipo_req_checkColumnConstraints(p_tipo_req)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_req LIKE adtb00011.tipo_req
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00011_tipo_req_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00011_razon_vac_checkColumnConstraints">}
-#+ Check constraints on the "adtb00011.razon_vac" column
-#+
-#+ @param p_razon_vac - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00011_razon_vac_checkColumnConstraints(p_razon_vac)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_razon_vac LIKE adtb00011.razon_vac
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00011_razon_vac_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00011_cod_puesto_r_checkColumnConstraints">}
-#+ Check constraints on the "adtb00011.cod_puesto_r" column
-#+
-#+ @param p_cod_puesto_r - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00011_cod_puesto_r_checkColumnConstraints(p_cod_puesto_r)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_puesto_r LIKE adtb00011.cod_puesto_r
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00011_cod_puesto_r_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00011_edad_min_checkColumnConstraints">}
-#+ Check constraints on the "adtb00011.edad_min" column
-#+
-#+ @param p_edad_min - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00011_edad_min_checkColumnConstraints(p_edad_min)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_edad_min LIKE adtb00011.edad_min
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00011_edad_min_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00011_salario_sem_checkColumnConstraints">}
-#+ Check constraints on the "adtb00011.salario_sem" column
-#+
-#+ @param p_salario_sem - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00011_salario_sem_checkColumnConstraints(p_salario_sem)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_salario_sem LIKE adtb00011.salario_sem
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00011_salario_sem_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00011_salario_men_checkColumnConstraints">}
-#+ Check constraints on the "adtb00011.salario_men" column
-#+
-#+ @param p_salario_men - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00011_salario_men_checkColumnConstraints(p_salario_men)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_salario_men LIKE adtb00011.salario_men
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00011_salario_men_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00011_experiencia_checkColumnConstraints">}
-#+ Check constraints on the "adtb00011.experiencia" column
-#+
-#+ @param p_experiencia - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00011_experiencia_checkColumnConstraints(p_experiencia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_experiencia LIKE adtb00011.experiencia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00011_experiencia_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00011_cod_educa_checkColumnConstraints">}
-#+ Check constraints on the "adtb00011.cod_educa" column
-#+
-#+ @param p_cod_educa - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00011_cod_educa_checkColumnConstraints(p_cod_educa)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_educa LIKE adtb00011.cod_educa
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00011_cod_educa_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00011_cod_pericia_checkColumnConstraints">}
-#+ Check constraints on the "adtb00011.cod_pericia" column
-#+
-#+ @param p_cod_pericia - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00011_cod_pericia_checkColumnConstraints(p_cod_pericia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_pericia LIKE adtb00011.cod_pericia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00011_cod_pericia_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00011_status_per_checkColumnConstraints">}
-#+ Check constraints on the "adtb00011.status_per" column
-#+
-#+ @param p_status_per - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00011_status_per_checkColumnConstraints(p_status_per)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_per LIKE adtb00011.status_per
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00011_status_per_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00011_num_emp_checkColumnConstraints">}
-#+ Check constraints on the "adtb00011.num_emp" column
-#+
-#+ @param p_num_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00011_num_emp_checkColumnConstraints(p_num_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_emp LIKE adtb00011.num_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00011_num_emp_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00011_departamento_checkColumnConstraints">}
-#+ Check constraints on the "adtb00011.departamento" column
-#+
-#+ @param p_departamento - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00011_departamento_checkColumnConstraints(p_departamento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_departamento LIKE adtb00011.departamento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00011_departamento_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00011_nivel_emp_checkColumnConstraints">}
-#+ Check constraints on the "adtb00011.nivel_emp" column
-#+
-#+ @param p_nivel_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00011_nivel_emp_checkColumnConstraints(p_nivel_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nivel_emp LIKE adtb00011.nivel_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00011_nivel_emp_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00011_cod_puesto_checkColumnConstraints">}
-#+ Check constraints on the "adtb00011.cod_puesto" column
-#+
-#+ @param p_cod_puesto - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00011_cod_puesto_checkColumnConstraints(p_cod_puesto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_puesto LIKE adtb00011.cod_puesto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00011_cod_puesto_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00011_num1_emp_checkColumnConstraints">}
-#+ Check constraints on the "adtb00011.num1_emp" column
-#+
-#+ @param p_num1_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00011_num1_emp_checkColumnConstraints(p_num1_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num1_emp LIKE adtb00011.num1_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00011_num1_emp_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00011_departamento1_checkColumnConstraints">}
-#+ Check constraints on the "adtb00011.departamento1" column
-#+
-#+ @param p_departamento1 - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00011_departamento1_checkColumnConstraints(p_departamento1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_departamento1 LIKE adtb00011.departamento1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00011_departamento1_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00011_nivel1_emp_checkColumnConstraints">}
-#+ Check constraints on the "adtb00011.nivel1_emp" column
-#+
-#+ @param p_nivel1_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00011_nivel1_emp_checkColumnConstraints(p_nivel1_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nivel1_emp LIKE adtb00011.nivel1_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00011_nivel1_emp_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00011_cod1_puesto_checkColumnConstraints">}
-#+ Check constraints on the "adtb00011.cod1_puesto" column
-#+
-#+ @param p_cod1_puesto - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00011_cod1_puesto_checkColumnConstraints(p_cod1_puesto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod1_puesto LIKE adtb00011.cod1_puesto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00011_cod1_puesto_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00011_num2_emp_checkColumnConstraints">}
-#+ Check constraints on the "adtb00011.num2_emp" column
-#+
-#+ @param p_num2_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00011_num2_emp_checkColumnConstraints(p_num2_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num2_emp LIKE adtb00011.num2_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00011_num2_emp_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00011_departamento2_checkColumnConstraints">}
-#+ Check constraints on the "adtb00011.departamento2" column
-#+
-#+ @param p_departamento2 - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00011_departamento2_checkColumnConstraints(p_departamento2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_departamento2 LIKE adtb00011.departamento2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00011_departamento2_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00011_nivel2_emp_checkColumnConstraints">}
-#+ Check constraints on the "adtb00011.nivel2_emp" column
-#+
-#+ @param p_nivel2_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00011_nivel2_emp_checkColumnConstraints(p_nivel2_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nivel2_emp LIKE adtb00011.nivel2_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00011_nivel2_emp_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00011_cod2_puesto_checkColumnConstraints">}
-#+ Check constraints on the "adtb00011.cod2_puesto" column
-#+
-#+ @param p_cod2_puesto - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00011_cod2_puesto_checkColumnConstraints(p_cod2_puesto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod2_puesto LIKE adtb00011.cod2_puesto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00011_cod2_puesto_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00011_status_t_checkColumnConstraints">}
-#+ Check constraints on the "adtb00011.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00011_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE adtb00011.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00011_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00011_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "adtb00011.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00011_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE adtb00011.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00011_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00011_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "adtb00011.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00011_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE adtb00011.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00011_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00011_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "adtb00011.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00011_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE adtb00011.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00011_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00011_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "adtb00011.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00011_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE adtb00011.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00011_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00010_checkTableConstraints">}
-#+ Check constraints on the "adtb00010" table
-#+
-#+ @param p_data - a row data LIKE adtb00010.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00010_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE adtb00010.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_adtb00010_cod_prof_checkColumnConstraints(p_data.cod_prof) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00010_nom_prof_checkColumnConstraints(p_data.nom_prof) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00010_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00010_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00010_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00010_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00010_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00010_checkTableConstraints
-
-{<BLOCK Name="fct.adtb00010_cod_prof_checkColumnConstraints">}
-#+ Check constraints on the "adtb00010.cod_prof" column
-#+
-#+ @param p_cod_prof - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00010_cod_prof_checkColumnConstraints(p_cod_prof)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_prof LIKE adtb00010.cod_prof
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00010_cod_prof_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00010_nom_prof_checkColumnConstraints">}
-#+ Check constraints on the "adtb00010.nom_prof" column
-#+
-#+ @param p_nom_prof - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00010_nom_prof_checkColumnConstraints(p_nom_prof)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nom_prof LIKE adtb00010.nom_prof
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00010_nom_prof_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00010_status_t_checkColumnConstraints">}
-#+ Check constraints on the "adtb00010.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00010_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE adtb00010.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00010_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00010_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "adtb00010.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00010_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE adtb00010.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00010_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00010_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "adtb00010.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00010_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE adtb00010.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00010_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00010_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "adtb00010.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00010_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE adtb00010.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00010_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00010_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "adtb00010.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00010_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE adtb00010.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00010_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00009_checkTableConstraints">}
-#+ Check constraints on the "adtb00009" table
-#+
-#+ @param p_data - a row data LIKE adtb00009.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00009_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE adtb00009.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_adtb00009_cod_mto_checkColumnConstraints(p_data.cod_mto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00009_sec_mto_checkColumnConstraints(p_data.sec_mto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00009_desc_mto_checkColumnConstraints(p_data.desc_mto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00009_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00009_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00009_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00009_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00009_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00009_checkTableConstraints
-
-{<BLOCK Name="fct.adtb00009_cod_mto_checkColumnConstraints">}
-#+ Check constraints on the "adtb00009.cod_mto" column
-#+
-#+ @param p_cod_mto - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00009_cod_mto_checkColumnConstraints(p_cod_mto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_mto LIKE adtb00009.cod_mto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00009_cod_mto_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00009_sec_mto_checkColumnConstraints">}
-#+ Check constraints on the "adtb00009.sec_mto" column
-#+
-#+ @param p_sec_mto - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00009_sec_mto_checkColumnConstraints(p_sec_mto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sec_mto LIKE adtb00009.sec_mto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00009_sec_mto_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00009_desc_mto_checkColumnConstraints">}
-#+ Check constraints on the "adtb00009.desc_mto" column
-#+
-#+ @param p_desc_mto - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00009_desc_mto_checkColumnConstraints(p_desc_mto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_desc_mto LIKE adtb00009.desc_mto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00009_desc_mto_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00009_status_t_checkColumnConstraints">}
-#+ Check constraints on the "adtb00009.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00009_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE adtb00009.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00009_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00009_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "adtb00009.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00009_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE adtb00009.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00009_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00009_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "adtb00009.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00009_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE adtb00009.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00009_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00009_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "adtb00009.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00009_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE adtb00009.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00009_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00009_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "adtb00009.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00009_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE adtb00009.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00009_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00008_checkTableConstraints">}
-#+ Check constraints on the "adtb00008" table
-#+
-#+ @param p_data - a row data LIKE adtb00008.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00008_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE adtb00008.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_adtb00008_cod_requi_checkColumnConstraints(p_data.cod_requi) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00008_requisito_checkColumnConstraints(p_data.requisito) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00008_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00008_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00008_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00008_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00008_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00008_checkTableConstraints
-
-{<BLOCK Name="fct.adtb00008_cod_requi_checkColumnConstraints">}
-#+ Check constraints on the "adtb00008.cod_requi" column
-#+
-#+ @param p_cod_requi - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00008_cod_requi_checkColumnConstraints(p_cod_requi)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_requi LIKE adtb00008.cod_requi
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00008_cod_requi_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00008_requisito_checkColumnConstraints">}
-#+ Check constraints on the "adtb00008.requisito" column
-#+
-#+ @param p_requisito - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00008_requisito_checkColumnConstraints(p_requisito)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_requisito LIKE adtb00008.requisito
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00008_requisito_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00008_status_t_checkColumnConstraints">}
-#+ Check constraints on the "adtb00008.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00008_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE adtb00008.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00008_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00008_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "adtb00008.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00008_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE adtb00008.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00008_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00008_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "adtb00008.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00008_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE adtb00008.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00008_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00008_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "adtb00008.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00008_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE adtb00008.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00008_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00008_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "adtb00008.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00008_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE adtb00008.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00008_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00007_checkTableConstraints">}
-#+ Check constraints on the "adtb00007" table
-#+
-#+ @param p_data - a row data LIKE adtb00007.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00007_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE adtb00007.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_adtb00007_cod_nac_checkColumnConstraints(p_data.cod_nac) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00007_nom_nac_checkColumnConstraints(p_data.nom_nac) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00007_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00007_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00007_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00007_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00007_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00007_checkTableConstraints
-
-{<BLOCK Name="fct.adtb00007_cod_nac_checkColumnConstraints">}
-#+ Check constraints on the "adtb00007.cod_nac" column
-#+
-#+ @param p_cod_nac - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00007_cod_nac_checkColumnConstraints(p_cod_nac)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_nac LIKE adtb00007.cod_nac
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00007_cod_nac_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00007_nom_nac_checkColumnConstraints">}
-#+ Check constraints on the "adtb00007.nom_nac" column
-#+
-#+ @param p_nom_nac - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00007_nom_nac_checkColumnConstraints(p_nom_nac)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nom_nac LIKE adtb00007.nom_nac
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00007_nom_nac_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00007_status_t_checkColumnConstraints">}
-#+ Check constraints on the "adtb00007.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00007_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE adtb00007.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00007_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00007_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "adtb00007.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00007_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE adtb00007.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00007_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00007_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "adtb00007.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00007_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE adtb00007.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00007_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00007_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "adtb00007.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00007_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE adtb00007.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00007_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00007_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "adtb00007.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00007_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE adtb00007.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00007_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00006_checkTableConstraints">}
-#+ Check constraints on the "adtb00006" table
-#+
-#+ @param p_data - a row data LIKE adtb00006.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00006_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE adtb00006.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_adtb00006_cod_pericia_checkColumnConstraints(p_data.cod_pericia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00006_nom_pericia_checkColumnConstraints(p_data.nom_pericia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00006_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00006_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00006_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00006_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00006_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00006_checkTableConstraints
-
-{<BLOCK Name="fct.adtb00006_cod_pericia_checkColumnConstraints">}
-#+ Check constraints on the "adtb00006.cod_pericia" column
-#+
-#+ @param p_cod_pericia - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00006_cod_pericia_checkColumnConstraints(p_cod_pericia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_pericia LIKE adtb00006.cod_pericia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00006_cod_pericia_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00006_nom_pericia_checkColumnConstraints">}
-#+ Check constraints on the "adtb00006.nom_pericia" column
-#+
-#+ @param p_nom_pericia - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00006_nom_pericia_checkColumnConstraints(p_nom_pericia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nom_pericia LIKE adtb00006.nom_pericia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00006_nom_pericia_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00006_status_t_checkColumnConstraints">}
-#+ Check constraints on the "adtb00006.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00006_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE adtb00006.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00006_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00006_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "adtb00006.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00006_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE adtb00006.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00006_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00006_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "adtb00006.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00006_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE adtb00006.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00006_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00006_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "adtb00006.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00006_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE adtb00006.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00006_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00006_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "adtb00006.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00006_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE adtb00006.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00006_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00005_checkTableConstraints">}
-#+ Check constraints on the "adtb00005" table
-#+
-#+ @param p_data - a row data LIKE adtb00005.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00005_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE adtb00005.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_adtb00005_cod_educa_checkColumnConstraints(p_data.cod_educa) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00005_nom_educa_checkColumnConstraints(p_data.nom_educa) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00005_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00005_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00005_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00005_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00005_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00005_checkTableConstraints
-
-{<BLOCK Name="fct.adtb00005_cod_educa_checkColumnConstraints">}
-#+ Check constraints on the "adtb00005.cod_educa" column
-#+
-#+ @param p_cod_educa - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00005_cod_educa_checkColumnConstraints(p_cod_educa)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_educa LIKE adtb00005.cod_educa
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00005_cod_educa_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00005_nom_educa_checkColumnConstraints">}
-#+ Check constraints on the "adtb00005.nom_educa" column
-#+
-#+ @param p_nom_educa - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00005_nom_educa_checkColumnConstraints(p_nom_educa)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nom_educa LIKE adtb00005.nom_educa
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00005_nom_educa_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00005_status_t_checkColumnConstraints">}
-#+ Check constraints on the "adtb00005.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00005_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE adtb00005.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00005_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00005_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "adtb00005.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00005_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE adtb00005.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00005_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00005_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "adtb00005.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00005_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE adtb00005.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00005_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00005_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "adtb00005.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00005_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE adtb00005.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00005_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00005_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "adtb00005.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00005_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE adtb00005.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00005_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00004_checkTableConstraints">}
-#+ Check constraints on the "adtb00004" table
-#+
-#+ @param p_data - a row data LIKE adtb00004.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00004_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE adtb00004.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_adtb00004_cod_puesto_checkColumnConstraints(p_data.cod_puesto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00004_nom_puesto_checkColumnConstraints(p_data.nom_puesto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00004_otra_descripcion_checkColumnConstraints(p_data.otra_descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00004_funciones_checkColumnConstraints(p_data.funciones) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00004_funcion1_checkColumnConstraints(p_data.funcion1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00004_nivel_sal_checkColumnConstraints(p_data.nivel_sal) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00004_salario_min_checkColumnConstraints(p_data.salario_min) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00004_salario_max_checkColumnConstraints(p_data.salario_max) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00004_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00004_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00004_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00004_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00004_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00004_checkTableConstraints
-
-{<BLOCK Name="fct.adtb00004_cod_puesto_checkColumnConstraints">}
-#+ Check constraints on the "adtb00004.cod_puesto" column
-#+
-#+ @param p_cod_puesto - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00004_cod_puesto_checkColumnConstraints(p_cod_puesto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_puesto LIKE adtb00004.cod_puesto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00004_cod_puesto_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00004_nom_puesto_checkColumnConstraints">}
-#+ Check constraints on the "adtb00004.nom_puesto" column
-#+
-#+ @param p_nom_puesto - CHAR(180) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00004_nom_puesto_checkColumnConstraints(p_nom_puesto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nom_puesto LIKE adtb00004.nom_puesto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00004_nom_puesto_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00004_otra_descripcion_checkColumnConstraints">}
-#+ Check constraints on the "adtb00004.otra_descripcion" column
-#+
-#+ @param p_otra_descripcion - CHAR(180) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00004_otra_descripcion_checkColumnConstraints(p_otra_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_otra_descripcion LIKE adtb00004.otra_descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00004_otra_descripcion_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00004_funciones_checkColumnConstraints">}
-#+ Check constraints on the "adtb00004.funciones" column
-#+
-#+ @param p_funciones - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00004_funciones_checkColumnConstraints(p_funciones)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_funciones LIKE adtb00004.funciones
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00004_funciones_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00004_funcion1_checkColumnConstraints">}
-#+ Check constraints on the "adtb00004.funcion1" column
-#+
-#+ @param p_funcion1 - CHAR(60) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00004_funcion1_checkColumnConstraints(p_funcion1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_funcion1 LIKE adtb00004.funcion1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00004_funcion1_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00004_nivel_sal_checkColumnConstraints">}
-#+ Check constraints on the "adtb00004.nivel_sal" column
-#+
-#+ @param p_nivel_sal - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00004_nivel_sal_checkColumnConstraints(p_nivel_sal)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nivel_sal LIKE adtb00004.nivel_sal
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00004_nivel_sal_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00004_salario_min_checkColumnConstraints">}
-#+ Check constraints on the "adtb00004.salario_min" column
-#+
-#+ @param p_salario_min - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00004_salario_min_checkColumnConstraints(p_salario_min)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_salario_min LIKE adtb00004.salario_min
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00004_salario_min_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00004_salario_max_checkColumnConstraints">}
-#+ Check constraints on the "adtb00004.salario_max" column
-#+
-#+ @param p_salario_max - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00004_salario_max_checkColumnConstraints(p_salario_max)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_salario_max LIKE adtb00004.salario_max
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00004_salario_max_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00004_status_t_checkColumnConstraints">}
-#+ Check constraints on the "adtb00004.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00004_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE adtb00004.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00004_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00004_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "adtb00004.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00004_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE adtb00004.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00004_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00004_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "adtb00004.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00004_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE adtb00004.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00004_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00004_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "adtb00004.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00004_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE adtb00004.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00004_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00004_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "adtb00004.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00004_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE adtb00004.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00004_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00003_checkTableConstraints">}
-#+ Check constraints on the "adtb00003" table
-#+
-#+ @param p_data - a row data LIKE adtb00003.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00003_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE adtb00003.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_adtb00003_num_emp_checkColumnConstraints(p_data.num_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00003_departamento_checkColumnConstraints(p_data.departamento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00003_nivel_emp_checkColumnConstraints(p_data.nivel_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00003_cod_puesto_checkColumnConstraints(p_data.cod_puesto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00003_nom1_emp_checkColumnConstraints(p_data.nom1_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00003_nom2_emp_checkColumnConstraints(p_data.nom2_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00003_apell1_emp_checkColumnConstraints(p_data.apell1_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00003_apell2_emp_checkColumnConstraints(p_data.apell2_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00003_tipo_empleado_checkColumnConstraints(p_data.tipo_empleado) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00003_fecha_termino_c_checkColumnConstraints(p_data.fecha_termino_c) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00003_calle_checkColumnConstraints(p_data.calle) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00003_casa_num_checkColumnConstraints(p_data.casa_num) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00003_barrio_checkColumnConstraints(p_data.barrio) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00003_urbanizacion_checkColumnConstraints(p_data.urbanizacion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00003_telefono_checkColumnConstraints(p_data.telefono) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00003_fech_nac_checkColumnConstraints(p_data.fech_nac) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00003_cod_nac_checkColumnConstraints(p_data.cod_nac) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00003_estado_civil_checkColumnConstraints(p_data.estado_civil) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00003_tipo_sangre_checkColumnConstraints(p_data.tipo_sangre) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00003_cedula_checkColumnConstraints(p_data.cedula) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00003_serie_checkColumnConstraints(p_data.serie) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00003_licencia_checkColumnConstraints(p_data.licencia) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00003_sueldo_ac_checkColumnConstraints(p_data.sueldo_ac) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00003_nomina_checkColumnConstraints(p_data.nomina) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00003_fech_efec_checkColumnConstraints(p_data.fech_efec) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00003_fecha_salida_checkColumnConstraints(p_data.fecha_salida) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00003_paga_seg_checkColumnConstraints(p_data.paga_seg) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00003_cod_seg1_checkColumnConstraints(p_data.cod_seg1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00003_cod_seg2_checkColumnConstraints(p_data.cod_seg2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00003_cod_seg3_checkColumnConstraints(p_data.cod_seg3) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00003_cuenta_no_checkColumnConstraints(p_data.cuenta_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00003_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00003_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00003_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00003_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00003_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00003_foto_empleado_checkColumnConstraints(p_data.foto_empleado) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00003_sucid_checkColumnConstraints(p_data.sucid) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00003_monto_seg_med_checkColumnConstraints(p_data.monto_seg_med) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00003_monto_seg_int_checkColumnConstraints(p_data.monto_seg_int) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00003_monto_care_checkColumnConstraints(p_data.monto_care) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- CALL smarmotech_dbxconstraints_adtb00003_pk_adtb00003_checkUniqueConstraint(p_forUpdate, p_data.num_emp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00003_checkTableConstraints
-
-{<BLOCK Name="fct.adtb00003_pk_adtb00003_checkUniqueConstraint">}
-#+ Check the primary key uniqueness constraint on the "adtb00003"
-#+
-#+ @param p_key - Primary Key
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00003_pk_adtb00003_checkUniqueConstraint(p_forUpdate, p_key)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_key
- RECORD
- adtb00003_num_emp LIKE adtb00003.num_emp
- END RECORD
- DEFINE l_key
- RECORD
- adtb00003_num_emp LIKE adtb00003.num_emp
- END RECORD
- DEFINE l_where STRING
- DEFINE l_sqlQuery STRING
- DEFINE l_count INTEGER
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- LET l_where = "WHERE adtb00003.num_emp = ? "
-
- let l_sqlQuery = "SELECT COUNT(*), num_emp FROM adtb00003 ", l_where, " GROUP BY num_emp"
-
- PREPARE cur_adtb00003_pk_adtb00003_checkUniqueConstraint FROM l_sqlQuery
- EXECUTE cur_adtb00003_pk_adtb00003_checkUniqueConstraint INTO l_count, l_key.* USING p_key.*
- FREE cur_adtb00003_pk_adtb00003_checkUniqueConstraint
- IF (NOT p_forUpdate AND l_count > 0) OR (p_forUpdate AND l_count > 0 AND p_key.* != l_key.*) THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- num_emp: " || ERROR_BAM_00002) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00003_pk_adtb00003_checkUniqueConstraint
-
-{<BLOCK Name="fct.adtb00003_num_emp_checkColumnConstraints">}
-#+ Check constraints on the "adtb00003.num_emp" column
-#+
-#+ @param p_num_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00003_num_emp_checkColumnConstraints(p_num_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_num_emp LIKE adtb00003.num_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_num_emp IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- num_emp: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00003_num_emp_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00003_departamento_checkColumnConstraints">}
-#+ Check constraints on the "adtb00003.departamento" column
-#+
-#+ @param p_departamento - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00003_departamento_checkColumnConstraints(p_departamento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_departamento LIKE adtb00003.departamento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00003_departamento_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00003_nivel_emp_checkColumnConstraints">}
-#+ Check constraints on the "adtb00003.nivel_emp" column
-#+
-#+ @param p_nivel_emp - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00003_nivel_emp_checkColumnConstraints(p_nivel_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nivel_emp LIKE adtb00003.nivel_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00003_nivel_emp_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00003_cod_puesto_checkColumnConstraints">}
-#+ Check constraints on the "adtb00003.cod_puesto" column
-#+
-#+ @param p_cod_puesto - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00003_cod_puesto_checkColumnConstraints(p_cod_puesto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_puesto LIKE adtb00003.cod_puesto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00003_cod_puesto_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00003_nom1_emp_checkColumnConstraints">}
-#+ Check constraints on the "adtb00003.nom1_emp" column
-#+
-#+ @param p_nom1_emp - CHAR(15) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00003_nom1_emp_checkColumnConstraints(p_nom1_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nom1_emp LIKE adtb00003.nom1_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00003_nom1_emp_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00003_nom2_emp_checkColumnConstraints">}
-#+ Check constraints on the "adtb00003.nom2_emp" column
-#+
-#+ @param p_nom2_emp - CHAR(15) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00003_nom2_emp_checkColumnConstraints(p_nom2_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nom2_emp LIKE adtb00003.nom2_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00003_nom2_emp_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00003_apell1_emp_checkColumnConstraints">}
-#+ Check constraints on the "adtb00003.apell1_emp" column
-#+
-#+ @param p_apell1_emp - CHAR(15) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00003_apell1_emp_checkColumnConstraints(p_apell1_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_apell1_emp LIKE adtb00003.apell1_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00003_apell1_emp_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00003_apell2_emp_checkColumnConstraints">}
-#+ Check constraints on the "adtb00003.apell2_emp" column
-#+
-#+ @param p_apell2_emp - CHAR(15) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00003_apell2_emp_checkColumnConstraints(p_apell2_emp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_apell2_emp LIKE adtb00003.apell2_emp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00003_apell2_emp_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00003_tipo_empleado_checkColumnConstraints">}
-#+ Check constraints on the "adtb00003.tipo_empleado" column
-#+
-#+ @param p_tipo_empleado - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00003_tipo_empleado_checkColumnConstraints(p_tipo_empleado)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_empleado LIKE adtb00003.tipo_empleado
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00003_tipo_empleado_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00003_fecha_termino_c_checkColumnConstraints">}
-#+ Check constraints on the "adtb00003.fecha_termino_c" column
-#+
-#+ @param p_fecha_termino_c - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00003_fecha_termino_c_checkColumnConstraints(p_fecha_termino_c)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_termino_c LIKE adtb00003.fecha_termino_c
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00003_fecha_termino_c_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00003_calle_checkColumnConstraints">}
-#+ Check constraints on the "adtb00003.calle" column
-#+
-#+ @param p_calle - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00003_calle_checkColumnConstraints(p_calle)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_calle LIKE adtb00003.calle
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00003_calle_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00003_casa_num_checkColumnConstraints">}
-#+ Check constraints on the "adtb00003.casa_num" column
-#+
-#+ @param p_casa_num - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00003_casa_num_checkColumnConstraints(p_casa_num)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_casa_num LIKE adtb00003.casa_num
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00003_casa_num_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00003_barrio_checkColumnConstraints">}
-#+ Check constraints on the "adtb00003.barrio" column
-#+
-#+ @param p_barrio - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00003_barrio_checkColumnConstraints(p_barrio)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_barrio LIKE adtb00003.barrio
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00003_barrio_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00003_urbanizacion_checkColumnConstraints">}
-#+ Check constraints on the "adtb00003.urbanizacion" column
-#+
-#+ @param p_urbanizacion - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00003_urbanizacion_checkColumnConstraints(p_urbanizacion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_urbanizacion LIKE adtb00003.urbanizacion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00003_urbanizacion_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00003_telefono_checkColumnConstraints">}
-#+ Check constraints on the "adtb00003.telefono" column
-#+
-#+ @param p_telefono - CHAR(15) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00003_telefono_checkColumnConstraints(p_telefono)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_telefono LIKE adtb00003.telefono
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00003_telefono_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00003_fech_nac_checkColumnConstraints">}
-#+ Check constraints on the "adtb00003.fech_nac" column
-#+
-#+ @param p_fech_nac - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00003_fech_nac_checkColumnConstraints(p_fech_nac)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_nac LIKE adtb00003.fech_nac
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00003_fech_nac_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00003_cod_nac_checkColumnConstraints">}
-#+ Check constraints on the "adtb00003.cod_nac" column
-#+
-#+ @param p_cod_nac - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00003_cod_nac_checkColumnConstraints(p_cod_nac)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_nac LIKE adtb00003.cod_nac
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00003_cod_nac_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00003_estado_civil_checkColumnConstraints">}
-#+ Check constraints on the "adtb00003.estado_civil" column
-#+
-#+ @param p_estado_civil - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00003_estado_civil_checkColumnConstraints(p_estado_civil)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_estado_civil LIKE adtb00003.estado_civil
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00003_estado_civil_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00003_tipo_sangre_checkColumnConstraints">}
-#+ Check constraints on the "adtb00003.tipo_sangre" column
-#+
-#+ @param p_tipo_sangre - CHAR(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00003_tipo_sangre_checkColumnConstraints(p_tipo_sangre)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_tipo_sangre LIKE adtb00003.tipo_sangre
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00003_tipo_sangre_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00003_cedula_checkColumnConstraints">}
-#+ Check constraints on the "adtb00003.cedula" column
-#+
-#+ @param p_cedula - CHAR(11) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00003_cedula_checkColumnConstraints(p_cedula)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cedula LIKE adtb00003.cedula
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00003_cedula_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00003_serie_checkColumnConstraints">}
-#+ Check constraints on the "adtb00003.serie" column
-#+
-#+ @param p_serie - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00003_serie_checkColumnConstraints(p_serie)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_serie LIKE adtb00003.serie
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00003_serie_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00003_licencia_checkColumnConstraints">}
-#+ Check constraints on the "adtb00003.licencia" column
-#+
-#+ @param p_licencia - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00003_licencia_checkColumnConstraints(p_licencia)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_licencia LIKE adtb00003.licencia
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00003_licencia_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00003_sueldo_ac_checkColumnConstraints">}
-#+ Check constraints on the "adtb00003.sueldo_ac" column
-#+
-#+ @param p_sueldo_ac - DECIMAL(10,2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00003_sueldo_ac_checkColumnConstraints(p_sueldo_ac)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sueldo_ac LIKE adtb00003.sueldo_ac
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00003_sueldo_ac_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00003_nomina_checkColumnConstraints">}
-#+ Check constraints on the "adtb00003.nomina" column
-#+
-#+ @param p_nomina - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00003_nomina_checkColumnConstraints(p_nomina)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nomina LIKE adtb00003.nomina
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00003_nomina_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00003_fech_efec_checkColumnConstraints">}
-#+ Check constraints on the "adtb00003.fech_efec" column
-#+
-#+ @param p_fech_efec - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00003_fech_efec_checkColumnConstraints(p_fech_efec)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_efec LIKE adtb00003.fech_efec
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00003_fech_efec_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00003_fecha_salida_checkColumnConstraints">}
-#+ Check constraints on the "adtb00003.fecha_salida" column
-#+
-#+ @param p_fecha_salida - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00003_fecha_salida_checkColumnConstraints(p_fecha_salida)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fecha_salida LIKE adtb00003.fecha_salida
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00003_fecha_salida_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00003_paga_seg_checkColumnConstraints">}
-#+ Check constraints on the "adtb00003.paga_seg" column
-#+
-#+ @param p_paga_seg - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00003_paga_seg_checkColumnConstraints(p_paga_seg)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_paga_seg LIKE adtb00003.paga_seg
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00003_paga_seg_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00003_cod_seg1_checkColumnConstraints">}
-#+ Check constraints on the "adtb00003.cod_seg1" column
-#+
-#+ @param p_cod_seg1 - CHAR(11) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00003_cod_seg1_checkColumnConstraints(p_cod_seg1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_seg1 LIKE adtb00003.cod_seg1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00003_cod_seg1_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00003_cod_seg2_checkColumnConstraints">}
-#+ Check constraints on the "adtb00003.cod_seg2" column
-#+
-#+ @param p_cod_seg2 - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00003_cod_seg2_checkColumnConstraints(p_cod_seg2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_seg2 LIKE adtb00003.cod_seg2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00003_cod_seg2_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00003_cod_seg3_checkColumnConstraints">}
-#+ Check constraints on the "adtb00003.cod_seg3" column
-#+
-#+ @param p_cod_seg3 - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00003_cod_seg3_checkColumnConstraints(p_cod_seg3)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_seg3 LIKE adtb00003.cod_seg3
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00003_cod_seg3_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00003_cuenta_no_checkColumnConstraints">}
-#+ Check constraints on the "adtb00003.cuenta_no" column
-#+
-#+ @param p_cuenta_no - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00003_cuenta_no_checkColumnConstraints(p_cuenta_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cuenta_no LIKE adtb00003.cuenta_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00003_cuenta_no_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00003_status_t_checkColumnConstraints">}
-#+ Check constraints on the "adtb00003.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00003_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE adtb00003.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00003_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00003_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "adtb00003.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00003_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE adtb00003.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00003_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00003_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "adtb00003.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00003_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE adtb00003.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00003_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00003_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "adtb00003.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(50) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00003_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE adtb00003.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00003_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00003_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "adtb00003.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00003_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE adtb00003.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00003_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00003_foto_empleado_checkColumnConstraints">}
-#+ Check constraints on the "adtb00003.foto_empleado" column
-#+
-#+ @param p_foto_empleado - CHAR(255) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00003_foto_empleado_checkColumnConstraints(p_foto_empleado)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_foto_empleado LIKE adtb00003.foto_empleado
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00003_foto_empleado_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00003_sucid_checkColumnConstraints">}
-#+ Check constraints on the "adtb00003.sucid" column
-#+
-#+ @param p_sucid - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00003_sucid_checkColumnConstraints(p_sucid)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sucid LIKE adtb00003.sucid
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00003_sucid_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00003_monto_seg_med_checkColumnConstraints">}
-#+ Check constraints on the "adtb00003.monto_seg_med" column
-#+
-#+ @param p_monto_seg_med - DECIMAL(18,0) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00003_monto_seg_med_checkColumnConstraints(p_monto_seg_med)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_monto_seg_med LIKE adtb00003.monto_seg_med
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00003_monto_seg_med_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00003_monto_seg_int_checkColumnConstraints">}
-#+ Check constraints on the "adtb00003.monto_seg_int" column
-#+
-#+ @param p_monto_seg_int - DECIMAL(18,0) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00003_monto_seg_int_checkColumnConstraints(p_monto_seg_int)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_monto_seg_int LIKE adtb00003.monto_seg_int
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00003_monto_seg_int_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00003_monto_care_checkColumnConstraints">}
-#+ Check constraints on the "adtb00003.monto_care" column
-#+
-#+ @param p_monto_care - DECIMAL(18,0) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00003_monto_care_checkColumnConstraints(p_monto_care)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_monto_care LIKE adtb00003.monto_care
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00003_monto_care_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00002_checkTableConstraints">}
-#+ Check constraints on the "adtb00002" table
-#+
-#+ @param p_data - a row data LIKE adtb00002.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00002_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE adtb00002.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_adtb00002_cod_seccion_checkColumnConstraints(p_data.cod_seccion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00002_departamento_checkColumnConstraints(p_data.departamento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00002_nom_seccion_checkColumnConstraints(p_data.nom_seccion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00002_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00002_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00002_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00002_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00002_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00002_checkTableConstraints
-
-{<BLOCK Name="fct.adtb00002_cod_seccion_checkColumnConstraints">}
-#+ Check constraints on the "adtb00002.cod_seccion" column
-#+
-#+ @param p_cod_seccion - VARCHAR2(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00002_cod_seccion_checkColumnConstraints(p_cod_seccion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cod_seccion LIKE adtb00002.cod_seccion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00002_cod_seccion_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00002_departamento_checkColumnConstraints">}
-#+ Check constraints on the "adtb00002.departamento" column
-#+
-#+ @param p_departamento - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00002_departamento_checkColumnConstraints(p_departamento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_departamento LIKE adtb00002.departamento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00002_departamento_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00002_nom_seccion_checkColumnConstraints">}
-#+ Check constraints on the "adtb00002.nom_seccion" column
-#+
-#+ @param p_nom_seccion - VARCHAR2(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00002_nom_seccion_checkColumnConstraints(p_nom_seccion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nom_seccion LIKE adtb00002.nom_seccion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00002_nom_seccion_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00002_status_t_checkColumnConstraints">}
-#+ Check constraints on the "adtb00002.status_t" column
-#+
-#+ @param p_status_t - VARCHAR2(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00002_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE adtb00002.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00002_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00002_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "adtb00002.us_crea" column
-#+
-#+ @param p_us_crea - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00002_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE adtb00002.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00002_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00002_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "adtb00002.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00002_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE adtb00002.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00002_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00002_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "adtb00002.us_mod" column
-#+
-#+ @param p_us_mod - VARCHAR2(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00002_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE adtb00002.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00002_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00002_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "adtb00002.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00002_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE adtb00002.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00002_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00001_checkTableConstraints">}
-#+ Check constraints on the "adtb00001" table
-#+
-#+ @param p_data - a row data LIKE adtb00001.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00001_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE adtb00001.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_adtb00001_departamento_checkColumnConstraints(p_data.departamento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00001_nom_dpto_checkColumnConstraints(p_data.nom_dpto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00001_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00001_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00001_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00001_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_adtb00001_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00001_checkTableConstraints
-
-{<BLOCK Name="fct.adtb00001_departamento_checkColumnConstraints">}
-#+ Check constraints on the "adtb00001.departamento" column
-#+
-#+ @param p_departamento - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00001_departamento_checkColumnConstraints(p_departamento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_departamento LIKE adtb00001.departamento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00001_departamento_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00001_nom_dpto_checkColumnConstraints">}
-#+ Check constraints on the "adtb00001.nom_dpto" column
-#+
-#+ @param p_nom_dpto - CHAR(30) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00001_nom_dpto_checkColumnConstraints(p_nom_dpto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_nom_dpto LIKE adtb00001.nom_dpto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00001_nom_dpto_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00001_status_t_checkColumnConstraints">}
-#+ Check constraints on the "adtb00001.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00001_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE adtb00001.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00001_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00001_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "adtb00001.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00001_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE adtb00001.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00001_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00001_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "adtb00001.fech_crea" column
-#+
-#+ @param p_fech_crea - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00001_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE adtb00001.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00001_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00001_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "adtb00001.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00001_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE adtb00001.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00001_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.adtb00001_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "adtb00001.fech_mod" column
-#+
-#+ @param p_fech_mod - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_adtb00001_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE adtb00001.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.adtb00001_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.actb00001_checkTableConstraints">}
-#+ Check constraints on the "actb00001" table
-#+
-#+ @param p_data - a row data LIKE actb00001.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_actb00001_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE actb00001.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_actb00001_codigo_checkColumnConstraints(p_data.codigo) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_actb00001_descripcion_checkColumnConstraints(p_data.descripcion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_actb00001_cuenta_no_checkColumnConstraints(p_data.cuenta_no) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_actb00001_cta_depr_checkColumnConstraints(p_data.cta_depr) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_actb00001_cta_gasto_checkColumnConstraints(p_data.cta_gasto) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_actb00001_departamento_checkColumnConstraints(p_data.departamento) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_actb00001_fech_compra_checkColumnConstraints(p_data.fech_compra) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_actb00001_duracion_checkColumnConstraints(p_data.duracion) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_actb00001_fech_elim_checkColumnConstraints(p_data.fech_elim) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_actb00001_status_t_checkColumnConstraints(p_data.status_t) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_actb00001_us_crea_checkColumnConstraints(p_data.us_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_actb00001_fech_crea_checkColumnConstraints(p_data.fech_crea) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_actb00001_us_mod_checkColumnConstraints(p_data.us_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_actb00001_fech_mod_checkColumnConstraints(p_data.fech_mod) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.actb00001_checkTableConstraints
-
-{<BLOCK Name="fct.actb00001_codigo_checkColumnConstraints">}
-#+ Check constraints on the "actb00001.codigo" column
-#+
-#+ @param p_codigo - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_actb00001_codigo_checkColumnConstraints(p_codigo)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_codigo LIKE actb00001.codigo
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.actb00001_codigo_checkColumnConstraints
-
-{<BLOCK Name="fct.actb00001_descripcion_checkColumnConstraints">}
-#+ Check constraints on the "actb00001.descripcion" column
-#+
-#+ @param p_descripcion - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_actb00001_descripcion_checkColumnConstraints(p_descripcion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_descripcion LIKE actb00001.descripcion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.actb00001_descripcion_checkColumnConstraints
-
-{<BLOCK Name="fct.actb00001_cuenta_no_checkColumnConstraints">}
-#+ Check constraints on the "actb00001.cuenta_no" column
-#+
-#+ @param p_cuenta_no - CHAR(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_actb00001_cuenta_no_checkColumnConstraints(p_cuenta_no)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cuenta_no LIKE actb00001.cuenta_no
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.actb00001_cuenta_no_checkColumnConstraints
-
-{<BLOCK Name="fct.actb00001_cta_depr_checkColumnConstraints">}
-#+ Check constraints on the "actb00001.cta_depr" column
-#+
-#+ @param p_cta_depr - CHAR(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_actb00001_cta_depr_checkColumnConstraints(p_cta_depr)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cta_depr LIKE actb00001.cta_depr
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.actb00001_cta_depr_checkColumnConstraints
-
-{<BLOCK Name="fct.actb00001_cta_gasto_checkColumnConstraints">}
-#+ Check constraints on the "actb00001.cta_gasto" column
-#+
-#+ @param p_cta_gasto - CHAR(8) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_actb00001_cta_gasto_checkColumnConstraints(p_cta_gasto)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_cta_gasto LIKE actb00001.cta_gasto
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.actb00001_cta_gasto_checkColumnConstraints
-
-{<BLOCK Name="fct.actb00001_departamento_checkColumnConstraints">}
-#+ Check constraints on the "actb00001.departamento" column
-#+
-#+ @param p_departamento - SMALLINT -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_actb00001_departamento_checkColumnConstraints(p_departamento)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_departamento LIKE actb00001.departamento
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.actb00001_departamento_checkColumnConstraints
-
-{<BLOCK Name="fct.actb00001_fech_compra_checkColumnConstraints">}
-#+ Check constraints on the "actb00001.fech_compra" column
-#+
-#+ @param p_fech_compra - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_actb00001_fech_compra_checkColumnConstraints(p_fech_compra)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_compra LIKE actb00001.fech_compra
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.actb00001_fech_compra_checkColumnConstraints
-
-{<BLOCK Name="fct.actb00001_duracion_checkColumnConstraints">}
-#+ Check constraints on the "actb00001.duracion" column
-#+
-#+ @param p_duracion - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_actb00001_duracion_checkColumnConstraints(p_duracion)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_duracion LIKE actb00001.duracion
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.actb00001_duracion_checkColumnConstraints
-
-{<BLOCK Name="fct.actb00001_fech_elim_checkColumnConstraints">}
-#+ Check constraints on the "actb00001.fech_elim" column
-#+
-#+ @param p_fech_elim - DATE -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_actb00001_fech_elim_checkColumnConstraints(p_fech_elim)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_elim LIKE actb00001.fech_elim
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.actb00001_fech_elim_checkColumnConstraints
-
-{<BLOCK Name="fct.actb00001_status_t_checkColumnConstraints">}
-#+ Check constraints on the "actb00001.status_t" column
-#+
-#+ @param p_status_t - CHAR(1) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_actb00001_status_t_checkColumnConstraints(p_status_t)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status_t LIKE actb00001.status_t
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.actb00001_status_t_checkColumnConstraints
-
-{<BLOCK Name="fct.actb00001_us_crea_checkColumnConstraints">}
-#+ Check constraints on the "actb00001.us_crea" column
-#+
-#+ @param p_us_crea - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_actb00001_us_crea_checkColumnConstraints(p_us_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_crea LIKE actb00001.us_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.actb00001_us_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.actb00001_fech_crea_checkColumnConstraints">}
-#+ Check constraints on the "actb00001.fech_crea" column
-#+
-#+ @param p_fech_crea - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_actb00001_fech_crea_checkColumnConstraints(p_fech_crea)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_crea LIKE actb00001.fech_crea
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.actb00001_fech_crea_checkColumnConstraints
-
-{<BLOCK Name="fct.actb00001_us_mod_checkColumnConstraints">}
-#+ Check constraints on the "actb00001.us_mod" column
-#+
-#+ @param p_us_mod - CHAR(9) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_actb00001_us_mod_checkColumnConstraints(p_us_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_us_mod LIKE actb00001.us_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.actb00001_us_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.actb00001_fech_mod_checkColumnConstraints">}
-#+ Check constraints on the "actb00001.fech_mod" column
-#+
-#+ @param p_fech_mod - DATETIME YEAR TO FRACTION(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_actb00001_fech_mod_checkColumnConstraints(p_fech_mod)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_fech_mod LIKE actb00001.fech_mod
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.actb00001_fech_mod_checkColumnConstraints
-
-{<BLOCK Name="fct.account_checkTableConstraints">}
-#+ Check constraints on the "account" table
-#+
-#+ @param p_data - a row data LIKE account.*
-#+
-#+ @returnType - INTEGER, STRING
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE, message error
-PUBLIC FUNCTION smarmotech_dbxconstraints_account_checkTableConstraints(p_forUpdate, p_data)
- DEFINE p_forUpdate BOOLEAN
- DEFINE p_data RECORD LIKE account.*
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE l_errNo INTEGER
- DEFINE l_errMsg STRING
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- CALL smarmotech_dbxconstraints_account_userid_checkColumnConstraints(p_data.userid) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_account_email_checkColumnConstraints(p_data.email) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_account_firstname_checkColumnConstraints(p_data.firstname) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_account_lastname_checkColumnConstraints(p_data.lastname) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_account_status_checkColumnConstraints(p_data.status) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_account_addr1_checkColumnConstraints(p_data.addr1) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_account_addr2_checkColumnConstraints(p_data.addr2) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_account_city_checkColumnConstraints(p_data.city) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_account_state_checkColumnConstraints(p_data.state) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_account_zip_checkColumnConstraints(p_data.zip) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_account_country_checkColumnConstraints(p_data.country) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_account_phone_checkColumnConstraints(p_data.phone) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_account_langpref_checkColumnConstraints(p_data.langpref) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_account_favcategory_checkColumnConstraints(p_data.favcategory) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_account_mylistopt_checkColumnConstraints(p_data.mylistopt) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_account_banneropt_checkColumnConstraints(p_data.banneropt) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
- CALL smarmotech_dbxconstraints_account_sourceapp_checkColumnConstraints(p_data.sourceapp) RETURNING l_errNo, l_errMsg
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, l_errNo, l_errMsg) RETURNING errNo, errMsg
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.account_checkTableConstraints
-
-{<BLOCK Name="fct.account_userid_checkColumnConstraints">}
-#+ Check constraints on the "account.userid" column
-#+
-#+ @param p_userid - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_account_userid_checkColumnConstraints(p_userid)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_userid LIKE account.userid
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_userid IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- userid: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.account_userid_checkColumnConstraints
-
-{<BLOCK Name="fct.account_email_checkColumnConstraints">}
-#+ Check constraints on the "account.email" column
-#+
-#+ @param p_email - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_account_email_checkColumnConstraints(p_email)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_email LIKE account.email
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_email IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- email: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.account_email_checkColumnConstraints
-
-{<BLOCK Name="fct.account_firstname_checkColumnConstraints">}
-#+ Check constraints on the "account.firstname" column
-#+
-#+ @param p_firstname - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_account_firstname_checkColumnConstraints(p_firstname)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_firstname LIKE account.firstname
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_firstname IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- firstname: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.account_firstname_checkColumnConstraints
-
-{<BLOCK Name="fct.account_lastname_checkColumnConstraints">}
-#+ Check constraints on the "account.lastname" column
-#+
-#+ @param p_lastname - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_account_lastname_checkColumnConstraints(p_lastname)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_lastname LIKE account.lastname
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_lastname IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- lastname: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.account_lastname_checkColumnConstraints
-
-{<BLOCK Name="fct.account_status_checkColumnConstraints">}
-#+ Check constraints on the "account.status" column
-#+
-#+ @param p_status - CHAR(2) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_account_status_checkColumnConstraints(p_status)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_status LIKE account.status
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.account_status_checkColumnConstraints
-
-{<BLOCK Name="fct.account_addr1_checkColumnConstraints">}
-#+ Check constraints on the "account.addr1" column
-#+
-#+ @param p_addr1 - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_account_addr1_checkColumnConstraints(p_addr1)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_addr1 LIKE account.addr1
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_addr1 IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- addr1: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.account_addr1_checkColumnConstraints
-
-{<BLOCK Name="fct.account_addr2_checkColumnConstraints">}
-#+ Check constraints on the "account.addr2" column
-#+
-#+ @param p_addr2 - CHAR(40) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_account_addr2_checkColumnConstraints(p_addr2)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_addr2 LIKE account.addr2
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.account_addr2_checkColumnConstraints
-
-{<BLOCK Name="fct.account_city_checkColumnConstraints">}
-#+ Check constraints on the "account.city" column
-#+
-#+ @param p_city - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_account_city_checkColumnConstraints(p_city)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_city LIKE account.city
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_city IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- city: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.account_city_checkColumnConstraints
-
-{<BLOCK Name="fct.account_state_checkColumnConstraints">}
-#+ Check constraints on the "account.state" column
-#+
-#+ @param p_state - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_account_state_checkColumnConstraints(p_state)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_state LIKE account.state
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.account_state_checkColumnConstraints
-
-{<BLOCK Name="fct.account_zip_checkColumnConstraints">}
-#+ Check constraints on the "account.zip" column
-#+
-#+ @param p_zip - CHAR(20) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_account_zip_checkColumnConstraints(p_zip)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_zip LIKE account.zip
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_zip IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- zip: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.account_zip_checkColumnConstraints
-
-{<BLOCK Name="fct.account_country_checkColumnConstraints">}
-#+ Check constraints on the "account.country" column
-#+
-#+ @param p_country - CHAR(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_account_country_checkColumnConstraints(p_country)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_country LIKE account.country
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_country IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- country: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.account_country_checkColumnConstraints
-
-{<BLOCK Name="fct.account_phone_checkColumnConstraints">}
-#+ Check constraints on the "account.phone" column
-#+
-#+ @param p_phone - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_account_phone_checkColumnConstraints(p_phone)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_phone LIKE account.phone
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_phone IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- phone: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.account_phone_checkColumnConstraints
-
-{<BLOCK Name="fct.account_langpref_checkColumnConstraints">}
-#+ Check constraints on the "account.langpref" column
-#+
-#+ @param p_langpref - CHAR(80) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_account_langpref_checkColumnConstraints(p_langpref)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_langpref LIKE account.langpref
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_langpref IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- langpref: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.account_langpref_checkColumnConstraints
-
-{<BLOCK Name="fct.account_favcategory_checkColumnConstraints">}
-#+ Check constraints on the "account.favcategory" column
-#+
-#+ @param p_favcategory - CHAR(10) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_account_favcategory_checkColumnConstraints(p_favcategory)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_favcategory LIKE account.favcategory
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.account_favcategory_checkColumnConstraints
-
-{<BLOCK Name="fct.account_mylistopt_checkColumnConstraints">}
-#+ Check constraints on the "account.mylistopt" column
-#+
-#+ @param p_mylistopt - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_account_mylistopt_checkColumnConstraints(p_mylistopt)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_mylistopt LIKE account.mylistopt
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.account_mylistopt_checkColumnConstraints
-
-{<BLOCK Name="fct.account_banneropt_checkColumnConstraints">}
-#+ Check constraints on the "account.banneropt" column
-#+
-#+ @param p_banneropt - INTEGER -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_account_banneropt_checkColumnConstraints(p_banneropt)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_banneropt LIKE account.banneropt
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.account_banneropt_checkColumnConstraints
-
-{<BLOCK Name="fct.account_sourceapp_checkColumnConstraints">}
-#+ Check constraints on the "account.sourceapp" column
-#+
-#+ @param p_sourceapp - CHAR(3) -
-#+
-#+ @returnType - INTEGER
-#+ @return - ERROR_SUCCESS|ERROR_FAILURE
-PUBLIC FUNCTION smarmotech_dbxconstraints_account_sourceapp_checkColumnConstraints(p_sourceapp)
- DEFINE errNo INTEGER
- DEFINE errMsg STRING
- DEFINE p_sourceapp LIKE account.sourceapp
-
- LET errNo = ERROR_SUCCESS
- INITIALIZE errMsg TO NULL
-
- IF p_sourceapp IS NULL THEN
- CALL libdbapp_utilBuildErrorNoAndErrorMsg(errNo, errMsg, ERROR_FAILURE, "\n- sourceapp: " || ERROR_BAM_00001) RETURNING errNo, errMsg
- END IF
-
- RETURN errNo, errMsg
-END FUNCTION
-{</BLOCK>} --fct.account_sourceapp_checkColumnConstraints
-
---------------------------------------------------------------------------------
---Add user functions
-{<POINT Name="user.functions">}
-{</POINT>}
-
-
-
-
\ No newline at end of file
diff --git a/PROYECTO/database/mydatabase.4db b/PROYECTO/database/mydatabase.4db
deleted file mode 100644
index 3561676..0000000
--- a/PROYECTO/database/mydatabase.4db
+++ /dev/null
@@ -1,26 +0,0 @@
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
\ No newline at end of file
diff --git a/PROYECTO/database/mydatabase.sch b/PROYECTO/database/mydatabase.sch
deleted file mode 100644
index 694b2d0..0000000
--- a/PROYECTO/database/mydatabase.sch
+++ /dev/null
@@ -1,2 +0,0 @@
-seqreg^sr_name^457^30^1^
-seqreg^sr_last^258^4^2^
diff --git a/PROYECTO/mbsERP.4pw b/PROYECTO/mbsERP.4pw
index 83cbd29..bb407bc 100644
--- a/PROYECTO/mbsERP.4pw
+++ b/PROYECTO/mbsERP.4pw
@@ -70,8 +70,13 @@
+
+
+
+
+
-
+
@@ -81,7 +86,16 @@
-
+
+
+
+
+
+
+
+
+
+
@@ -127,7 +141,7 @@
-
+
@@ -142,23 +156,19 @@
-
-
-
-
-
+
-
+
-
+